Delphi 演示启动控制面板、屏幕保护等操作.rar

本程序演示了如何在Delphi程序中启动控制面板、屏幕保护、获取浏览器信息等操作,下面列举一些具体的实现代码: 1:启动屏幕保护程序 只需要一句话就可以了:SendMessage(HWND_BROADCAST,WM_SYSCOMMAND,SC_SCREENSAVE,0); 2:启动控制面板 procedure TForm1.Button2Click(Sender: TObject);代码中详细。 3:得到系统默认的浏览器 function TForm1.GetBrowerPath(AValue: String): string; var X:integer