Einzelnen Beitrag anzeigen

HLukas

Registriert seit: 27. Nov 2006
Ort: Frickenhausen
14 Beiträge
 
Delphi 6 Professional
 
#20

Re: Einstellungen im Editfenster

  Alt 1. Jan 2008, 12:15
und warum nicht so !

procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
begin
case Key of
#65..#90 : begin end;
else key := #0;
end;
end;
  Mit Zitat antworten Zitat