edit-enter

[tom_po]

wollte eine Edit-Eingabe durch Enter bestätigen und damit automatisch button1 ausführen, geht aber nicht, warum?

Delphi-Quellcode:

procedure Tsuchform.Edit1Enter(Sender: TObject);
begin
button1.Click;
end;

wenn ich button1 normal anklicke, geht es, button1 macht dies:

Delphi-Quellcode:

procedure Tsuchform.Button1Click(Sender: TObject);
begin
modalresult:=1;
end;

[Andreas L.]

Das Enter-Ereignis ist nicht für die Taste Enter sondern für das "betreten" des Editfeldes. D.h. Enter wird ausgeführt sobald du in das Edit klickst. Willst du das eine Aktion bei der Entertaste passiert musst du das OnKeyPress (oder ähnlich)-Eregnis nehmen und dort die gedrückte Taste abfragen.

[Helmi]

Hallo,

Edit1Enter wird ausgeführt wenn du diesem Edit den Fokus gibst (z. B. reinklickst)

Wenn du das mit der Entertaste ausführen willst, dann musst du KeyPress verwenden:

Beispiel:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  If Key = #13 then
    Button1.Click;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Hallo');
end;

[Phistev]

Oder benutze TButton.Default

[zer00]

Hilft dir dieser Code?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Hallo');
end;

procedure TForm1.Edit1Enter(Sender: TObject);
begin
Button1Click(self);
end;

grz zer00

[StarFire]

Immer wieder schön...

Wenn man über Tom_po und seine Fragen nur in einem Forum stolpern würde, könnte man es ja noch irgendwo hinnehmen... aber quer durch alle Delphi-Foren und dann mit einer konsequens von Ahnungslosigkeit und Desinteresse, das ist schon dummdreist.

Wenn wirst du ENDLICH versuchen, deinen Quellcode nicht nur zu KOPIEREN sondern auch zu KAPIEREN?

Und nach diesem Satz wissen wohl die meisten User, wer "StarFire" ist und ich kann mit meinem "Kürzel" unterschreiben.
Normalerweise halte ich mich aus diesem Forum raus.

DL
PS: nachdem ich mir jetzt die Beitrage von Tom_po hier mal angesehen habe, werde ich noch "stinkiger"

[SirThornberry]

@StarFire: Wenn du ein Problem mit jemand anderem hast kläre dies bitte per pn. Wenn du etwas zum Thema zu sagen hast kannst du gern weiter in diesem Thread posten, ansonsten halte dich bitte zurück und mach das Thema nicht "kaputt".

[tom_po]

danke helmi für deinen tip, das hatte ich schon probiert.
genau so wollte ich es...merci

[mr47]

Zitat von tom_po:

danke helmi für deinen tip, das hatte ich schon probiert.
das ist aber nicht das, was ich wollte. mit key-press wird schon bei der ersten eingabe der button ausgeführt, will das aber erst nach der betätigung mit enter-taste, werde weiter suchen

Delphi-Quellcode:

If Key = #13 then
    Button1.Click;

DAmit aber nur mit der Taste mit dem ASCII-Code 13. Und das ist die Entertaste



mr47

[tom_po]

mr47, du hast recht, hatte zu schnell gepostet, danke, es geht
danke auch dir helmi