Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Scroll-Eigenschaften der Listbox


Waldkauz - Sa 27.06.09 19:43
Titel: Scroll-Eigenschaften der Listbox
Kann man bei einer ListBox die Möglichkeit, mit den Pfeiltasten zu scrollen, deaktivieren?


Moderiert von user profile iconNarses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am So 28.06.2009 um 00:59


Tropby - Sa 27.06.09 20:01

Eine Eigenschaft die das deaktiviert kenne ich nicht aber du kannst mal das hier versuchen:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  // 37 => Pfeiltaste Links
  // 38 => Pfeiltaste Oben
  // 39 => Pfeiltaste Rechts
  // 40 => Pfeiltaste Unten

 if (key >= 37and (key <= 40then Key := 0;
end;


Waldkauz - So 28.06.09 12:59

Ja, das funktioniert, danke.