Gibt es eine Möglichkeit die Events einer Form kurz zu unterbinden?

Thema durchsuchen

Ansicht

Themen-Optionen

Gibt es eine Möglichkeit die Events einer Form kurz zu unterbinden?

Ein Thema von Popov · begonnen am 18. Mär 2012 · letzter Beitrag vom 19. Mär 2012

Vorheriger Beitrag

Nächster Beitrag

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.487 Beiträge

Delphi 12 Athens

AW: Gibt es eine Möglichkeit die Events einer Form kurz zu unterbinden?

19. Mär 2012, 08:24

Auch eine Variante:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure SetEditText(AEdit: TEdit; const AValue: string);

var

  Event: TNotifyEvent;

begin

  with Edit do

  begin

    Event := OnChange;

    try

      OnChange := nil;

      Text := AValue;

    finally

      OnChange := Event;

    end;

  end;

end;