Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#5

Re: listbox tastatur Ereignis

  Alt 1. Aug 2005, 15:00
Hallo,

nimm das onKeyPress-Event:
Delphi-Quellcode:
if key in ['0'..'9'] then
  begin
  showmessage(key);//irgendwas ausführen
  key := #0;//Taste unterdrücken
  end;
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat