不来回答你可能说这里人气不旺了^_*其实很多讲Delphi入门的书上都有屏保制作的例程呀,和exe的区别,有点
就是编译的时候扩展名要是src。

解决方案 »

  1.   

    windows 屏幕保护程序的扩展名为scr,保存在windows目录下。其实这些文件是可执行文件,是将exe文件改成scr文件,然后在菜单的file的run命令,此时屏幕保护程序被执行,显示设置界面,如果带有参数来执行,则马上进入屏幕保护状态。
      

  2.   

    其实屏保也没什么特别的,主要就是程序运行时能覆盖整个屏幕,并当有键盘或鼠标按下时能退出程序就行了,当然,后缀名是.scr
      

  3.   

    你的问题不是很具体,贴一个帖子给你参考
    屏幕保护程序无非是扩展名换成了.SCR的可执行程序,它接受两种命令行参数:    
            -s      运行命令参数    
            -c      配置命令参数    
    Windows通过向程序发-s命令行参数来启动程序。   
    要注意的是:程序的窗口是无边框和标题;窗口大小应与屏幕大小一样;还要注意    
    窗口的事件的处理。  
     
    可以用Delphi中的{$D text} 定义出现在“显示”“属性”中显示的你的屏幕保护程序的名称,$D参数直接将text插入可执行文件入口的描述模块(Description Module) 为了让控制面板认识你的描述,必须加入"SCRNSAVE"。选择项目文件在{$R *.RES}后加入以下代码: 
    {$D SCRNSAVE My Screen Saver}"My Screen Saver"将显示在控制面板中的“显示”“属性”中。
    四、激活状态和设置状态,以及屏蔽多拷贝的运行
        Windows在两种条件下运行屏幕保护程序,1、当屏幕保护的时间设置到时则激活;2、当屏幕保护被设置时激活。为了区分这两种状态Windows在命令后加了参数, "/s"表示是激活状态,"/c"表示是设置状态。因此,我们的屏幕保护程序也必须区分参数以便做不同的处理。 
    if (ParamCount > 0) and
    (UpperCase(ParamStr(1)) = '/S') then
    begin
    //如果是激活状态
    Application.Initialize;
    Application.CreateForm(TScrnFrm, ScrnFrm);
    end else 
    begin
    //可以在这里加入你的配置代码
    end;
    Application.Run;
    end;
    end.
      

  4.   

    1. 窗体BorderStyle:=bsNone; WindowState:=wsMaximized; FormStyle:=fsStayOnTop;这样可以实现全屏显示(可盖住Windows状态栏)
    2. 屏保的效果自己去设计了
    3. 在OnMouseMove, OnClick, OnKeyPress, OnKeyDown等事件中self.close可以实现用户有操作时退出屏保
    4. 项目文件中的参数配置如楼上所说,不过应该是if (ParamCount > 0) and
    (UpperCase(ParamStr(1)) = '-S') then
    begin5. 将编译好的*.exe改名为*.scr