随笔分类 - Delphi-消息应用
摘要:procedure TForm1.Button1Click(Sender: TObject);var hEdit: HWND; str: string;begin str := '准备要添加到记事本的字符串'; WinExec('Notepad.exe', SW_SHOWNORMAL); ...
阅读全文
摘要:WM_SYSCOMMAND是TWinControl的消息,因为只有Win控件才需要处理系统命令消息嘛! procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; //在Public部分声明 procedure TFo
阅读全文