Thema: Delphi Loop? Delphi

Einzelnen Beitrag anzeigen

peterbelow

Registriert seit: 12. Jan 2019
Ort: Hessen
702 Beiträge
 
Delphi 12 Athens
 
#5

AW: Loop? Delphi

  Alt 21. Mär 2019, 12:16
Hay ich möchte eine ganz normal schleife machen um zu kontrollieren ob eine taste gedrückt worden ist.


Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
If(Key = VK_NUMPAD0)then
  begin
  EingabeEdt.Text:= EingabeEdt.Text + '0';
  end;
end;
Ich weiß noch nichtmal ob das richtig ist, Es soll eine 0 in EingabeEdt eingefügt werden wenn die 0 Auf der Tastatur gedrückt wird oder wenn die 0 auf dem nunpad gedrückt wird.
Warum machst Du dir diese Mühe? Ein TEdit oder TMemo verarbeitet Zeichen von der Tastatur (inkl. Numpad) von selbst, das Control muß nur den Fokus haben.
Peter Below
  Mit Zitat antworten Zitat