Pascal技术知识点随笔2.docVIP

administration 验证文件是否存在 FileExists(const FileName : string)Boolean; [如果指定的文件（FileName 是全路经名）存在则return true else return false] 该API函数您隐藏标题栏上的标题 SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); [在Windows环境下窗体创建事件中，该API函数您隐藏标题栏上的标题] 扑捉该消息可以拖动窗体本身来移动窗体 WM_NCHITTEST 扑捉该消息可以拖动窗体本身来移动窗体。 方法是： begin inherited; if msg.Result =1 then msg.Result := 2; end; WM_ACTIVATE 窗口被激活或被取消激活。 WM_CHAR 按下某个健，并且已经发送了WM_KEYDOWN和WM_KEYUP消息。 WM_CLOSE 窗口将要关闭。 WM_LBUTTONDOWN 按下鼠标左健。 WM_MOUSEMOVE 鼠标移动。 WM_PAINT 客户区需要重画。 WM_TIMER 发生了定时器事件。 WM_QUIT 程序将要退出。 连接文件编辑 {$I D:\File1.txt} [上句的意识是把D盘上的名叫File1的文本文件中的pascal代码连入程序运行 ，delphi将该文件的内容编译后存入.res资源文件中] 运行或打开文件、可执行程序或网页 ShellExecute函数可运行或打开文件、可执行程序或网页 ⒈在程序代码的USE子句中加入字符串Shellapi； ⒉在事件代码中加入下列代码： ShellExecute(handle, open, C:\ mydocument\abc.exe, , , SW_SHOWNORMAL); 或 shellExecute(handle, open, /, , , SW_SHOWNORMAL); 修改桌面背景： procedure TForm1.Button1Click(Sender: TObject); VAR reg : tregistry; bmp : tbitmap; jpeg : tjpegimage; begin try image.Picture.SaveToFile(C:\WINNT\Web\Wallpaper\temp.bmp); reg := tregistry.Create; reg.RootKey := hkey_current_user; reg.OpenKey(control panel\desktop,false); reg.WriteString(tilewallpaper,0); reg.WriteString(wallpaper,C:\WINNT\Web\Wallpaper\temp.bmp); systemparametersinfo(spi_setdeskwallpaper,0,nil,spif_sendchange); reg.CloseKey; finally reg.Free; end; end; 广播消息： var s : string; begin S := sdfsdfsdf; SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, LongInt(s)); end; 在该例子中HWND_BROADCAST表示向所有窗口发送消息。及广播消息。 指定的窗口里允许或禁止所有鼠标及键盘输入EnableWindow(hWnd: HWND; bEnable: BOOL): BOOL;单元：windows.pas 　　作用：指定的窗口里允许或禁止所有鼠标及键盘输入　　闪烁显示指定窗口FlashWindow(hWnd: HWND; bInvert: BOOL): BOOL; 　　单元：windows.pas 　　作用：闪烁显示指定窗口。这意味着窗口的标题和说明文字会发生变化，似乎从活动切换到非活动状态、或反向切换。通常对不活动的窗口应用这个函数，引起用户的注意’[变量名称]’ 接下来就是为变量名称赋值。在程序单元中写下：RmVariables[变量名称] := 变量值；即可实现为变量赋值。 SQ L语句中使用升序和降序的语句是ASC和DESC [DELPHI]判断机器是否网络状态