type TForm1 = class(TForm) private procedure WMMove(var Msg: TWMMove); message WM_MOVE; { Private-Deklarationen} public ...
確定! 回上一頁