lpRect :TRect; mess1:string; procedure hitit(var msg:TWMNCHITTEST); message WM_NCHITTEST; public { Public declarations } end; var. Form1: TForm1;
確定! 回上一頁