button + editfeld

[aerotech]

hallo, ich hab ne' suche erstellt, nun will ich nach der eingabe nicht imemr auf den button klicken,..gibts eine möglichkeit das enter nach eingabe in das feld den befehl des buttons übernimmt!?

[Muetze1]

Moin!

Klar, nur wann? Nach 2 Zeichen, nach Eingabe von 5 Zeichen oder nach Eingabe von mindestens 2 neuen Zeichen?

Oder einfach bei Enter? Wenn letzteres, dann schau dir mal OnKeyPressed an und darin tue z.B. folgendes:

Delphi-Quellcode:

  If ( Key = #13 ) Then // ENTER
  Begin
    Key := #0; 
    DerBesagteButton.Click;
  End;

MfG
Muetze1

[aerotech]

DerBesagteButton.Click;

Das Click kennt er nicht!

[Hansa]

Mann mann, das war ein Beispiel.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin

end;

Das erzeugt Delphi automatisch, wenn du in der IDE auf den Button klickst. Spätestens hier : "DerBesagteButton." bei dem Punkt kam die Code-Vervollständigung ins Spiel. Die sollte man vielleicht mal durchlesen.

[bttb930]

setz doch einfach die eigenschaft DEFAULT des buttons auf TRUE

[Muetze1]

Moin!

Zitat von aerotech:

DerBesagteButton.Click;

Das Click kennt er nicht!

Dann kann ich dich nur bitten zum einen deine Delphi Version anzugeben, weil ab Delphi 4 ist diese Methode bei TButton vorhanden. Zum anderen ist "DerBesagteButton" natürlich in deinem Code mit dem Namen des besagten Buttons zu ersetzen, also sollte bei dir z.B. "Button1.Click" rauskommen, wenn der besagte Button der gedrückt werden sollte Button1 heisst.

Oder den Vorschlag bttb930 benutzen...

MfG
Muetze1

[aerotech]

dank dir,...

bei delphi 7 funzt das so:

Form1.Label13Click(sender);

[Stefan Dieler]

Hallo,

so sollte es am Ende bei dir sein:

Code:

  if Key = #13 then
  begin 
    key := #0; 
    DerBesagteButtonClick(self); 
  end;