procedure wmmove(var msg: tmessage); message wm_move; //trap wm_move message { Public declarations } end;. var. Form1: TForm1;. implementation.
確定！ 回上一頁
