• 全部
  • 语言基础/算法/系统设计
  • 数据库相关
  • 图形处理/多媒体
  • 网络通信/分布式开发
  • VCL组件开发及应用
  • Windows SDK/API
  • 问答

关于屏保程序的讨论

JeaSon 2002-09-03 01:48:21
请问有人知道屏保程序开发的技术问题 ???????????
...全文
17 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
oracle_lover 2002-09-04
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
begin

5. 将编译好的*.exe改名为*.scr
回复
ilang 2002-09-03
你的问题不是很具体,贴一个帖子给你参考
屏幕保护程序无非是扩展名换成了.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.
回复
ryuxy 2002-09-03
其实屏保也没什么特别的,主要就是程序运行时能覆盖整个屏幕,并当有键盘或鼠标按下时能退出程序就行了,当然,后缀名是.scr
回复
zjs1982 2002-09-03
windows 屏幕保护程序的扩展名为scr,保存在windows目录下。其实这些文件是可执行文件,是将exe文件改成scr文件,然后在菜单的file的run命令,此时屏幕保护程序被执行,显示设置界面,如果带有参数来执行,则马上进入屏幕保护状态。
回复
角落的青苔 2002-09-03
不来回答你可能说这里人气不旺了^_*

其实很多讲Delphi入门的书上都有屏保制作的例程呀,和exe的区别,有点
就是编译的时候扩展名要是src。
回复
相关推荐
发帖
Delphi
创建于2007-08-02

4891

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2002-09-03 01:48
社区公告
暂无公告