Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Enter und OnClick (https://www.delphipraxis.net/91101-enter-und-onclick.html)

daredd 29. Apr 2007 15:54


Enter und OnClick
 
Hallo freunde,
hab ein problem mit der Enter-Eingabe kann mir da einer Helfen???

Folgender Code:
Delphi-Quellcode:
procedure TFormNewPacient.onkeydown;
begin
if Key = VK_return then
begin
bbOkClick(Self);
end;
Folgende Fehlermeldung:
[Error] NewPacnt.pas(201): Undeclared identifier: 'Key'
[Warning] NewPacnt.pas(201): Comparing signed and unsigned types - widened both operands
[Error] NewPacnt.pas(206): Statement expected but 'PROCEDURE' found

Was hab ich da vergessen??

mkinzler 29. Apr 2007 16:01

Re: Enter und OnClick
 
Die Parameter (passende Signatur) der Methode

Jürgen Thomas 29. Apr 2007 16:04

Re: Enter und OnClick
 
... (siehe die Antwort von mkinzler) sowie 1x end. Jürgen

daredd 29. Apr 2007 16:07

Re: Enter und OnClick
 
Delphi-Quellcode:
procedure TFormNewPacient.onkeydown(Sender: TObject; Key);
begin
if Key = VK_return then
begin
bbOkClick(Self);
end
end;
Nun weiß ich leider noch nicht welchen Parametertyp ich für den Key eingeben muss? Ich kenn nur int, double, float, string ......
Aber welchen typ haben die Tasten?

Jürgen Thomas 29. Apr 2007 16:10

Re: Enter und OnClick
 
Dafür gibt es doch die Hilfe, z.B. Delphi-Referenz durchsuchenTWinControl.OnKeyDown und Virtuelle Tastencodes. Jürgen

mkinzler 29. Apr 2007 16:11

Re: Enter und OnClick
 
Schau doch in der Delphi-Hilfe nach, dort wird die Signatur des Events beschrieben:
Delphi-Quellcode:
.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);

daredd 29. Apr 2007 16:13

Re: Enter und OnClick
 
Ok, stimmt daran hab ich nicht gedacht.
Klappt jetzt alles Danke an Alle


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:46 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz