Einzelnen Beitrag anzeigen

Benutzerbild von Ritsch
Ritsch

Registriert seit: 15. Apr 2014
Ort: Wolfenbüttel
33 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#3

AW: OnClick Ereignis nur einmal auslösen

  Alt 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
  Mit Zitat antworten Zitat