Thema: Delphi On keypress

Einzelnen Beitrag anzeigen

schniede

Registriert seit: 20. Sep 2003
Ort: Woltersdorf
104 Beiträge
 
Delphi 7 Professional
 
#1

On keypress

  Alt 6. Dez 2003, 16:52
HAllo

Warum Funzt das bei mir nicht???

Ist in jedem Forum zu finden nur klappen tut es nicht.


Code:
procedure TMyForm.FormKeyPress(Sender: TObject; var Key:
Char);
begin
  if Key = #13 then //Ist die gedrückte Taste ASCII-Return?
  begin
    Perform(WM_NEXTDLGCTL, 0, 0); //Zum nächsten Element wechseln
    Key := #0; //Gedrückte Taste unwirksam machen
  end;
end;

Ich möchte eigentlich nur verhindern das die Enter Taste nicht funktioniert.

etwa wie panel.visible --- Entertaste tot

das der code oben was anderes bewirkt ,schon klar.

mfg schniede
  Mit Zitat antworten Zitat