Új hozzászólás Aktív témák

  • Prego

    senior tag

    Egy rémálom, kódot kell analizálnom:
    Van egy invalidate metódus az egyik Unitban:

    private
    ForiginChanged: TNotifyEvent;
    ...
    public
    constructor create;
    procedure invalidate;
    ...
    published
    property originChanged: TNotifyEvent read ForiginChanged write set_originChanged;

    procedure TOrigin.invalidate;
    begin
    if assigned(originChanged) then begin
    originChanged(self);
    end;
    end;

    procedure TOrigin.set_originChanged(const Value: TNotifyEvent);
    begin
    ForiginChanged := Value;
    end;

    Persze mondanom sem kell hogy néhány másik metódusban úgyanúgy szerepel az invalidate parancs, egyértelműen azért hogy a komponenst újrarajzolja. Akkor a fent definiált procedure mire való? Amúgy ezt az összevissza kavalkádot valahogy nem látom át, emiatt nem tudom mit csinál, hiába vetem össze az általam tanult és tanulmányozott forráskódokkal :F

    Aki másnak vermet ás az a Stack Pointer

Új hozzászólás Aktív témák