开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 屏幕保护 > 查看源码
C++开发屏保.txt
资源名称：pinmubiaohu.rar　[点击查看]
上传用户：zhh515
上传日期：2022-06-18
资源大小：5k
文件大小：18k
源码类别：

屏幕保护

开发平台：

Visual C++

C++开发屏保.txt：源码内容
  1. 一． 引言
  2. 视窗系统下的屏幕保护程序是一个基于命令行（Command Line）的应用程序。当屏保
  3. 程序被调用时操作系统就用具体的命令行执行该程序。本文组织和处理了所有的命令行，包
  4. 括“/p”，“/s”，“/c”，“/a”，其中“/p”表示让屏保在预览窗口中显示；“/s”表示真正运行
  5. 屏保；“/c”表示调用设置对话框；而“/a”表示调用密码设置对话框（WinNT中无效）。本
  6. 程序尽可能简单地实现一个全功能的屏保，运行Windows的屏保设置程序时你既可以修改
  7. 密码（WinNT中无效）又可以设置图片显示的频率并把频率数值保存到注册表里。当屏保
  8. 运行时图片以你设置的频率改变显示位置。笔者还留了个作业给读者，请看图1中的选择图
  9. 片文件夹这个项目，按下浏览按钮可以设置图片的路径，笔者已经实现了浏览按钮的功能并
  10. 把得到的路径也保存到注册表中，并让屏保启动时读picdir的值，picdir等于"no"时的代码
  11. 笔者已实现了，picdir不等于"no"时的代码由读者实现。也就是让读者实现一个能把picdir
  12. 目录里的图片轮流显示的屏保程序。
  14. 二． 实现方法
  15. 首先介绍几个API函数。
  16. WinMain函数：
  17. int WINAPI WinMain(
  18.         HINSTANCE hInstance, // 当前实例句柄
  19.     HINSTANCE hPrevInstance, // 前一个实例句柄
  20.     LPSTR lpCmdLine, // 指向命令行参数的指针（本程序要利用的参数）
  21.     int nCmdShow  // 窗口的状态
  22.    );
  23. GetWindowLong函数：得到指定窗口信息的函数
  24.     LONG GetWindowLong(
  25.          HWND hWnd, //窗口句柄
  26.          int nIndex  //指定返回的信息
  27.        );
  28. SetWindowLong函数：改变窗口属性
  29.     LONG SetWindowLong(
  30.     HWND hWnd, //窗口句柄
  31.     int nIndex, // 指定要设定的值的信息
  32.     LONG dwNewLong  // 新值
  33.    );
  34. SetParent函数：改变指定窗口的父窗口
  35.    HWND SetParent(
  36.     HWND hWndChild, //要改变父窗体的窗口句柄
  37.     HWND hWndNewParent  //新的父窗体的句柄
  38.    );
  39. GetClientRect函数：得到窗口的客户区
  40.     BOOL GetClientRect(
  41.     HWND hWnd, // 窗口句柄
  42.     LPRECT lpRect  //RECT结构的地址
  43.    );
  44. SetWindowPos函数：改变窗口的大小，位置，顶级窗口等
  45. BOOL SetWindowPos(
  46. HWND hWnd, // 窗口句柄
  47.     HWND hWndInsertAfter, // 布置窗口顺序的句柄（Z order）
  48.     int X, // horizontal position
  49.     int Y, // vertical position
  50.     int cx, // width
  51.     int cy, // height
  52.     UINT uFlags  // 窗口位置等标记
  53.    );
  54. SystemParametersInfo函数：访问或设置系统级的参数
  55.     BOOL SystemParametersInfo(
  56.     UINT uiAction, // 指定要获取或设置的系统参数
  57.     UINT uiParam, // depends on action to be taken
  58.     PVOID pvParam, // depends on action to be taken
  59.     UINT fWinIni  // 用户配置文件是否改变标记
  60.    );
  61. ShowCursor函数：显示或隐藏光标
  62. int ShowCursor(
  63. BOOL bShow  // 鼠标可见度标记  
  64.    );
  65. GetVersion函数：获取系统的版本信息
  66. DWORD GetVersion(VOID)
  68. 以上API函数的具体信息可以查找有关MSSDK文档。了解了基本函数后笔者简述一
  69. 下实现方法。
  70. 1． 新建一工程，增加两个窗体，将三个窗体分别取名为MainForm,FrmConfig,
  71. FrmControl。在MainForm和FrmControl窗体上各添加一个Timer控件和TImage控件，
  72. 把两窗体的BorderStyle设为bsNone，背景色设为黑色。在两个窗体的TImage上各加一
  73. 张图片，FrmControl大小设为：高130像素，宽160像素，Timage的Stretch属性设为真
  74. 值。FrmConfig的样式如图1。
  75. 2． 保存工程文件为screensaver.cpp，其它单元分别存为Unitmain.cpp，
  76. Unitcontrol.cpp，Unitconfig.cpp。
  77. 3． 编写代码，具体代码见第三部分的源程序。
  78. 4． 编译成可执行文件，并把文件扩展名改为scr。
  79. 5． 最后把屏保程序拷贝到windows目录下就可以测试了。如果一切正常的话你将会看
  80. 到图片在屏幕上以随机的位置显示。
  81.                                     图1
  82. 三． 源代码
  83. 以下是本程序的所有的源代码，其中screensaver.cpp, Unitmain.cpp是核心代码。
  84. /*{*******************************}*/
  85. /*{***** screensaver.cpp  ****}*/
  86. /*{*******************************}*/
  87. //---------------------------------------------------------------------------
  88. #include 
  89. #pragma hdrstop
  90. USERES("screensaver.res");
  91. USEFORM("Unitmain.cpp", Frmmain);
  92. USEFORM("Unitconfig.cpp", FrmConfig);
  93. USEFORM("Unitcontrol.cpp", FrmControl);
  94. //---------------------------------------------------------------------------
  95. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR p, int)//“p"是指向命令行参数的指针
  96. { String StartType;
  97.   AnsiString Command=p,temp;
  98.   HWND CPWindow =NULL;
  99.   if(Command=="")
  100.    StartType = "/c";
  101.   else
  102.    StartType=Command.SubString(1,2);//获取命令行的前两个参数
  103.         try
  104.         {
  105.                  Application->Initialize();
  106.                  if(StartType=="/c")//启动设置窗口
  107.                    Application->CreateForm(__classid(TFrmConfig), &FrmConfig);
  108.                  else if(StartType=="/s")启动屏保
  109.                    Application->CreateForm(__classid(TFrmmain), &Frmmain);
  110.                  else if(StartType=="/p")//预览
  111.                   {
  112.                    Application->CreateForm(__classid(TFrmControl), &FrmControl);
  113.                    temp=Command.SubString(3,Command.Length()-2);//获取命令行中的屏保预览窗
  114. 口句柄的字符串形式
  115.                    CPWindow =(long *)temp.ToInt();//将预览窗口句柄的字符串形式强制转换为长整形
  116. 指针
  118.                    RECT *lookrect;//建立一个RECT结构指针
  119.                    Long style=GetWindowLong(Application->MainForm->Handle,GWL_STYLE);//获
  120. 取FrmControl窗口的风格
  121.                    style=style|WS_CHILD;
  122.                    SetWindowLong(Application->MainForm->Handle,GWL_STYLE,style);//设置窗口
  123. 为子窗口
  124.                    SetParent(Application->MainForm->Handle,CPWindow);//设置屏保预览窗口为
  125. FrmControl的父窗口
  126.                    GetClientRect(CPWindow,lookrect);//获取屏保预览窗口的客户区
  127.                    
  128. SetWindowPos(Application->MainForm->Handle,HWND_TOP,0,0,lookrect->right,lookrect->bottom ,SW
  129. P_NOZORDER|SWP_NOACTIVATE|SWP_SHOWWINDOW);//将FrmControl的窗口覆盖屏保预览窗口
  130. 的客户区，并显示它
  131.                    }
  132.                  else if(StartType=="/a")//启动密码设置窗口
  133.                   {
  134.                    temp=Command.SubString(3,Command.Length()-2);
  135.                    CPWindow =(long *)temp.ToInt();
  136.                   //以下是动态调用mpr.dll里的PwdChangePasswordA函数的过程
  137.                    typedef UINT(CALLBACK *FUN)(LPSTR,HWND,UINT,UINT);
  138.                    HINSTANCE hDll=LoadLibrary("mpr.DLL");
  139.                    FUN myfun;
  140.                    if(hDll!=NULL)
  141.                     {
  142.                      myfun=(FUN)GetProcAddress(hDll,"PwdChangePasswordA");
  143.                      if(!myfun)FreeLibrary(hDll);
  144.                      else
  145.                      myfun("SCRSAVE", CPWindow, 0, 0);//函数的调用
  146.                     }
  147.                   }
  148.                  Application->Run();
  149.         }
  150.         catch (Exception &exception)
  151.         {
  152.                  Application->ShowException(&exception);
  153.         }
  154.         return 0;
  155. }
  156. //---------------------------------------------------------------------------
  157. /*{*******************************}*/
  158. /*{*****   Unitmain.h     ****}*/
  159. /*{*******************************}*/
  160. //---------------------------------------------------------------------------
  162. #ifndef UnitmainH
  163. #define UnitmainH
  164. //---------------------------------------------------------------------------
  165. #include 
  166. #include 
  167. #include 
  168. #include 
  169. #include 
  170. #include 
  171. #include 
  172. //---------------------------------------------------------------------------
  173. class TFrmmain : public TForm
  174. {
  175. __published: // IDE-managed Components
  176.         TTimer *Timer1;
  177.         TImage *Image1;
  178.         void __fastcall FormCreate(TObject *Sender);
  179.         void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
  180.           TShiftState Shift);
  181.         void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
  182.           TShiftState Shift, int X, int Y);
  183.         void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
  184.         void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  185.         void __fastcall Image1MouseDown(TObject *Sender,
  186.           TMouseButton Button, TShiftState Shift, int X, int Y);
  187.         void __fastcall Image1MouseMove(TObject *Sender, TShiftState Shift,
  188.           int X, int Y);
  189.         void __fastcall Timer1Timer(TObject *Sender);
  190. private: // User declarations
  191.        DWORD PWProtect;
  192.        DWORD Version;
  193.        String picdir;
  194.        int frequence;
  195. public: // User declarations
  196.         __fastcall TFrmmain(TComponent* Owner);
  197. };
  198. //---------------------------------------------------------------------------
  199. extern PACKAGE TFrmmain *Frmmain;
  200. //---------------------------------------------------------------------------
  201. #endif
  202. //---------------------------------------------------------------------------
  203. /*{*******************************}*/
  204. /*{*****  Unitmain.cpp   ****}*/
  205. /*{*******************************}*/
  206. //---------------------------------------------------------------------------
  207. #include 
  208. #pragma hdrstop
  209. #include 
  210. #include "Unitmain.h"
  211. #include 
  212. //---------------------------------------------------------------------------
  213. #pragma package(smart_init)
  214. #pragma resource "*.dfm"
  215. TFrmmain *Frmmain;
  216. //---------------------------------------------------------------------------
  217. __fastcall TFrmmain::TFrmmain(TComponent* Owner)
  218.         : TForm(Owner)
  219. {
  220. }
  221. //---------------------------------------------------------------------------
  222. void __fastcall TFrmmain::FormCreate(TObject *Sender)
  223. {
  224.     //使窗口成为最顶层的窗口
  225.     SetWindowPos(this->Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
  226.     //时窗口覆盖屏幕
  227.     this->Width=Screen->Width;
  228.     this->Height=Screen->Height;
  229.     this->Top=0;
  230.     this->Left=0;
  231.     Version=GetVersion();
  232.     TRegistry *Registry = new TRegistry;
  233.   try
  234.   {
  235.     if(Version>0x80000000){
  236.     Registry->RootKey =HKEY_CURRENT_USER;
  237.     Registry->OpenKey("\Control Panel\Desktop",false);
  238.     PWProtect=Registry->ReadInteger("ScreenSaveUsePassword");//检测是否密码保护
  239.     Registry->CloseKey();}
  240.     Registry->RootKey =HKEY_CURRENT_USER;
  241.     Registry->OpenKey("\Software\CODEHUNTER", true);
  242.     picdir=Registry->ReadString("PicDir");//得到图片目录
  243.     frequence=Registry->ReadInteger("frequence");//得到图像显示的频率
  244.     if(picdir=="")picdir="no";
  245.     if(frequence<0||frequence>6)
  246.      frequence=2;
  247.     Timer1->Interval=1000*frequence;设置定时器
  248.   }
  249.   __finally
  250.   {
  251.     delete Registry;
  252.     picdir="no";
  253.   }
  254.     //检测是否运行于 NT下
  255.     if(Version!=0)
  256.     if(PWProtect&&Version>0x80000000)//如果系统要求密码保护并此系统为非NT那么把系统设为屏保
  257. 状态
  258.      SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, 0, 0);
  259.     //使光标消失
  260.     while (!ShowCursor(false)< -5);
  261. }
  262. //---------------------------------------------------------------------------
  263. void __fastcall TFrmmain::FormKeyDown(TObject *Sender, WORD &Key,
  264.       TShiftState Shift)
  265. {
  266. this->Close();
  267. }
  268. //---------------------------------------------------------------------------
  269. void __fastcall TFrmmain::FormMouseDown(TObject *Sender,
  270.       TMouseButton Button, TShiftState Shift, int X, int Y)
  271. {
  272. this->Close();
  273. }
  274. //---------------------------------------------------------------------------
  275. void __fastcall TFrmmain::FormCloseQuery(TObject *Sender, bool &CanClose)
  276. {
  277. if (PWProtect && Version>0x80000000)
  278.       {
  279.         bool PassChck;
  280.        //显示光标，并调用密码对话框
  281.         while(!ShowCursor(True) > 5);
  282.        //以下是VerifyScreenSavePwd函数的动态调用
  283.         typedef UINT(CALLBACK *FUN)(HWND);
  284.                    HINSTANCE hDll=LoadLibrary("password.cpl");
  285.                    FUN myfun;
  286.                    if(hDll!=NULL)
  287.                     {
  288.                      myfun=(FUN)GetProcAddress(hDll,"VerifyScreenSavePwd");
  289.                      if(!myfun)FreeLibrary(hDll);
  290.                      else
  291.                      PassChck=myfun(this->Handle);
  292.                     }
  293.         if(PassChck == false)
  294.           {
  295.             while(!ShowCursor(False) < -5);
  296.             CanClose = false;
  297.            }
  298.       }
  299. }
  300. //---------------------------------------------------------------------------
  302. void __fastcall TFrmmain::FormClose(TObject *Sender, TCloseAction &Action)
  303. {
  304. while(!ShowCursor(True) > 5);
  305.     if(PWProtect&&Version>0x80000000)
  306.         SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, 0, 0);//退出屏保状态
  307. }
  308. //---------------------------------------------------------------------------
  309. void __fastcall TFrmmain::Image1MouseDown(TObject *Sender,
  310.       TMouseButton Button, TShiftState Shift, int X, int Y)
  311. {
  312. this->Close();
  313. }
  314. //---------------------------------------------------------------------------
  315. void __fastcall TFrmmain::Image1MouseMove(TObject *Sender,
  316.       TShiftState Shift, int X, int Y)
  317. {   static int MouseMoves=0;
  318.     MouseMoves = MouseMoves + 1;
  319.     if(MouseMoves >4)
  320.      {
  321.      this->Close();
  322.      MouseMoves = 0 ;
  323.      }
  324. }
  325. //---------------------------------------------------------------------------
  326. void __fastcall TFrmmain::Timer1Timer(TObject *Sender)
  327. {
  328. if(picdir=="no")
  329. {
  330. int i ;
  331. randomize();
  332. i=rand()%2;
  333. if(i==0)
  334. i=-1;
  335. else
  336. i=1;
  337. Image1->Top=i*(rand()%this->Height);
  338. Image1->Left=i*(rand()%this->Width);
  339. }
  340. }
  341. //---------------------------------------------------------------------------
  342. /*{*******************************}*/
  343. /*{*****   Unitcontrol.h   ****}*/
  344. /*{*******************************}*/
  345. //---------------------------------------------------------------------------
  346. #ifndef UnitcontrolH
  347. #define UnitcontrolH
  348. //---------------------------------------------------------------------------
  349. #include 
  350. #include 
  351. #include 
  352. #include 
  353. #include 
  354. #include 
  355. #include 
  356. //---------------------------------------------------------------------------
  357. class TFrmControl : public TForm
  358. {
  359. __published: // IDE-managed Components
  360.         TImage *Image1;
  361.         TTimer *Timer1;
  362.         void __fastcall Timer1Timer(TObject *Sender);
  363.         void __fastcall FormCreate(TObject *Sender);
  364. private: // User declarations
  365. public: // User declarations
  366.         __fastcall TFrmControl(TComponent* Owner);
  367. };
  368. //---------------------------------------------------------------------------
  369. extern PACKAGE TFrmControl *FrmControl;
  370. //---------------------------------------------------------------------------
  371. #endif
  372. //---------------------------------------------------------------------------
  373. /*{*******************************}*/
  374. /*{*****   Unitcontrol.cpp ****}*/
  375. /*{*******************************}*/
  376. //---------------------------------------------------------------------------
  377. #include 
  378. #pragma hdrstop
  379. #include "Unitcontrol.h"
  380. //---------------------------------------------------------------------------
  381. #pragma package(smart_init)
  382. #pragma resource "*.dfm"
  383. TFrmControl *FrmControl;
  384. //---------------------------------------------------------------------------
  385. __fastcall TFrmControl::TFrmControl(TComponent* Owner)
  386.         : TForm(Owner)
  387. {
  388. }
  389. //---------------------------------------------------------------------------
  390. void __fastcall TFrmControl::Timer1Timer(TObject *Sender)
  391. {
  392. int i ;
  393. randomize();
  394. i=rand()%2;
  395. if(i==0)
  396. i=-1;
  397. else
  398. i=1;
  399. Image1->Top=i*(rand()%this->Height);
  400. Image1->Left=i*(rand()%this->Width);
  401. }
  402. //---------------------------------------------------------------------------
  403. void __fastcall TFrmControl::FormCreate(TObject *Sender)
  404. {
  405. Image1->Top=0;
  406. Image1->Left=0;
  407. Image1->Height=this->Height ;
  408. Image1->Width=this->Width ;
  409. }
  410. //---------------------------------------------------------------------------
  411. /*{*******************************}*/
  412. /*{*****    Unitconfig.h   ****}*/
  413. /*{*******************************}*/
  414. //---------------------------------------------------------------------------
  415. #ifndef UnitconfigH
  416. #define UnitconfigH
  417. //---------------------------------------------------------------------------
  418. #include 
  419. #include 
  420. #include 
  421. #include 
  422. #include 
  423. #include 
  424. #include 
  425. #include 
  426. //---------------------------------------------------------------------------
  427. class TFrmConfig : public TForm
  428. {
  429. __published: // IDE-managed Components
  430.         TPanel *Panel1;
  431.         TButton *Button1;
  432.         TPanel *Panel2;
  433.         TLabel *Label1;
  434.         TTrackBar *TrackBar1;
  435.         TLabel *Label2;
  436.         TLabel *Label3;
  437.         TLabel *Label4;
  438.         TButton *Button2;
  439.         void __fastcall Button1Click(TObject *Sender);
  440.         void __fastcall Button2Click(TObject *Sender);
  441. private: // User declarations
  442.   AnsiString picdir;
  443.   int frequence;
  444. public: // User declarations
  445.         __fastcall TFrmConfig(TComponent* Owner);
  446. };
  447. //---------------------------------------------------------------------------
  448. extern PACKAGE TFrmConfig *FrmConfig;
  449. //---------------------------------------------------------------------------
  450. #endif
  451. //---------------------------------------------------------------------------
  452. /*{*******************************}*/
  453. /*{*****   Unitconfig.cpp  ****}*/
  454. /*{*******************************}*/
  455. //---------------------------------------------------------------------------
  456. #include 
  457. #pragma hdrstop
  458. #include "Unitconfig.h"
  459. //---------------------------------------------------------------------------
  460. #pragma package(smart_init)
  461. #pragma resource "*.dfm"
  462. TFrmConfig *FrmConfig;
  463. //---------------------------------------------------------------------------
  464. __fastcall TFrmConfig::TFrmConfig(TComponent* Owner)
  465.         : TForm(Owner)
  466. {
  467. }
  468. //---------------------------------------------------------------------------
  469. void __fastcall TFrmConfig::Button1Click(TObject *Sender)
  470. {
  471. if(SelectDirectory("Select Picture Dir","",picdir))
  472.    Panel2->Caption=picdir;
  473. }
  474. //---------------------------------------------------------------------------
  475. void __fastcall TFrmConfig::Button2Click(TObject *Sender)
  476. {
  477. //把信息写入注册表
  478. if(picdir=="") picdir="no";
  479. this->frequence=TrackBar1->Position;
  480. TRegistry *Reg = new TRegistry;
  481.   try
  482.    {
  483.     Reg->RootKey = HKEY_CURRENT_USER;
  484.     if (Reg->OpenKey("\Software\CODEHUNTER", true))
  485.     {
  486.       Reg->WriteString("PicDir",picdir);
  487.       Reg->WriteInteger("frequence",frequence);
  488.       Reg->CloseKey();
  489.     }
  490.   }
  491.   __finally
  492.   {
  493.     delete Reg;
  494.   }
  495. this->Close();
  496. }
  497. //---------------------------------------------------------------------------
  498.                                                                   
  499. 源代码下载(http://codehunter.1yes.net/download/lucysaver.zip)