Performance-Optimierung

[Bummi]

Heiko meinte wohl, daß Du statt Deiner Variable eine Property nehmen könntest, im Setter der Property könntest Du gegf. ein Event auslösen,also etwas in der Art ....

Delphi-Quellcode:

property MyVar:Integer read FMyVar Write SetMyVar;
property OnChange: TNotifyEvent read FOnChange write FOnChange;


....

Procedure TK.SetMyVar(Value:Integer);
var
 lValue:Integer;
begin
   lValue := Value;
   FMyVar := Value;
   if irgendwas(lValue,FMyValue) and Assigned(FOnChange) then FOnChange(Self);
end;