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