|
Registriert seit: 26. Jul 2009
158 Beiträge
|
Re: Button - OnClick Ereignis über Editfeld auslösen
7. Okt 2009, 17:32
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
if Edit1.Text = 'Test' then
Button1Click(Button1);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
close;
end;
Kann es aber sein das Edit1.Text = Test nicht immer überprüft wird?
|