kleines Problem

[olli blang]

Wie setze ich denn gleich nochmal den Focus auf ein Feld?
Mit ActiveControl? aber wie schreib ich das denn noch in meinen
Anweisungs Block.
Neben meinem Eingabe Feld habe ich einen Button. Wie erreiche ich jetzt,
das wenn ich etwas eingegeben habe ich per Return-Taste die Prozedur
aktivieren kann?

[Stephan Kallnik]

Hi,

mit der Methoe OnKeyPress kannst du denn Enter Button abfangen und anstelle der <i> ShowMessage</i> kommt dann der Funktionsaufruf, z.b. Button1Click(self).

<pre><code>
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
ShowMessage('Ypiiiie');
end;
</code></pre>

für den Focus: Edit1.SetFocus() sollte ausreichen!!

mfg Stepha