[Delphi] 폼 이동, 사이즈 변경

Form Border Style이 bsNone일 떄 사이즈 변경처리 type TForm3 = class(TForm) procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); private { Private declarations } public { Public declarations } protected procedure CreateParams(var Params: TCreateParams); override; end; var Form3: TForm3; implementation {$R *.dfm} { TForm3 } procedure TForm3.CreateParams(var Params: TCreateParams); begin inherited; // 폼 마우스로 사이즈 변경 // Border Style bsNone에서 사용 Params.ExStyle := Pa...