Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
Delphi XE2 Professional
|
Re: Ord...
22. Feb 2008, 20:56
Hallo,
so gehts:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
//Gibt die Nummer des Zeichens aus
ShowMessage(IntToStr(Key));
//prüfen auf #
If Key = 191 then
ShowMessage('#');
end;
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
|