Source position: ELSizeControl.pas line 56
type TDuringEvent = procedure(
Sender: TObject;
dx: Integer;
dy: Integer;
State: TSCState
) of object;