TCanResizeEventArgs = class(TPersistent)

property NewHeight: integer;

property NewWidth: integer;

property Resize: boolean;

constructor Create(ANewWidth: integer; ANewHeight: integer; AResize: boolean);