Registriert seit: 15. Apr 2014
Ort: Wolfenbüttel
33 Beiträge
Delphi 10.1 Berlin Enterprise
|
AW: OnClick Ereignis nur einmal auslösen
1. Sep 2017, 10:38
Einfach die Zuweisung auf das Event löschen.
Code:
procedure TForm1.Edit1Click(Sender: TObject);
begin
Edit1.OnClick:= nil;
Edit1.Text := '';
end;
Richard
|