摘要:
unit uBaseForm;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TPoint = record x: Integer; y: Integer; end; TMinMaxInfo = record ptReserved: TPoint; ptMaxSize: TPoint; ptMaxPosition: TPoint; ptMinTrackSize: TPoint; ptMaxTrackSize: TPoint; end; TW 阅读全文