1、用户先在网上下一个电脑屏保制作软件 ,打开软件“常规”选项。如下图,主要设置“输出”项,就是输出路径和输出的格式。输出格式有标准屏幕保护程序(scr)和自安装屏幕保护程序(exe)。这里我选了scr的输出格式。其它还有屏保信息,描述,屏保的图标等的设置。
2、“”选项。如下图,在“”选项栏右边,点击“+”按钮,将准备好的全选并添加进来。注:“+ ”为添加,“—”为移除,“↑”为向上移动,“↓”为向下移动。
3、“音乐”选项。可以添加你喜欢的音乐做为背景音乐哦。如下图所示
4、“设置”选项。如下图,可以设置暂留时间、效果持续时间,音乐,背景颜色,退出屏保条件等的设置。按需要来选择吧。也可以按默认设置就好。
5、“效果”选项。也就是之间的切换动画特效了。有很多种的效果,点击某个特效,就能在可边的预览中看到播放效果了。这里“全部选定”。
6、最后一步,就是制作屏保,点击工具栏上的“制作SCR”按钮,软件开始自动生成屏保。
可以在个性化选项里面设置。
工具:联想电脑,win10系统版本。 *** 作如下:
1、在桌面的空白处,点击鼠标右键,选择“个性化”。
2、在“个性化”界面的右下角,有屏幕保护程序的图标,点击该处。
3、在d出的屏保设置对话框中,点击屏幕保护程序处的下拉菜单,选择想用的屏保,选中后可以点击旁边的预览按钮,提前看一下。
4、之后,设置等待时间,设置好之后,点击“确定”按钮就可以。
电脑屏幕保护设置自定义 *** 作方法如下:
1、首先打开电脑,等待电脑启动完成之后,在桌面上单击鼠标右键,在d出的快捷菜单中选择“个性化”选项按钮,进行点击 *** 作。
2、在d出的个性化窗口中,选择右下角的“屏幕保护程序”选项,这个时候d出“屏幕保护程序设置”窗口,在屏幕保护程序选项卡下,点击下拉菜单,选择“照片”选项。
3、点击照片选项之后,点击右侧的“设置”选项,进行进一步的设置,这个时候会d出“照片屏幕保护程序设置”的窗口,在“使用来自以下位置的”的组中,点击右侧的“浏览”按钮。
4、这个时候会d出“浏览文件夹”窗口,选择自己事先将准备好的,放到文件夹中,然后选中文件夹之后,点击确定即可完成设置。
5、在点击确定之后,返回到照片屏幕保护设置窗口下,可以设置幻灯片的放映速度,一般设置为中速即可,下方还可以设置是否有序或无序播放,这个时候默认即可,如果自己想要更改的话,取消勾选按钮即可完成 *** 作,设置完成之后,点击保存就可以了。
6、返回到最开始的屏幕保护设置界面中来,可以在此窗口中设置幻灯片替换的时间是多少,在此选择默认即可,设置的效果可以进行预览 *** 作,点击确定即可生效,这样就算是完成 *** 作了。
利用Visual Basic 制作屏幕保护程序非常容易。本文将详细给大家介绍制作屏幕保护程序的方法。
---- 一 基本编程思路
---- 大家都知道屏幕保护程序就是利用变换的颜色或图形以防止不变化的屏幕像素被损伤。所以,屏幕保护程序就是显示不断变化或移动的图形,并且当有鼠标移动或按键时能够终止的程序。
---- 1 编制屏幕保护图形
---- 2 隐藏鼠标
---- 用ShowCursor Windows API 函数我们可以实现隐藏鼠标。
---- 3 检测鼠标和按键行为
---- 检测上述行为以便退出屏幕保护程序
---- 4 Windows 调用屏幕保护程序的参数命令
---- /a 在显示器属性对话框中单击了改变口令按钮。
---- /p 每当选中显示器属性对话框中屏幕保护程序标签时,在对话框显示预览效果。
---- /c 在显示器属性对话框中单击了设置按钮。
---- /s 在显示器属性对话框中单击了预览按钮或屏幕保护程序被系统正常调用。
---- 5 编译屏幕保护程序
---- 其实任何VB应用程序都可作为屏幕保护程序来运行,但为了被Windows 95 所调用,需要将它作为屏幕保护程序来编译。首先进入VB5编程环境,编好程序后选择/File/Make project菜单项,然后在File Name文本框中将后缀名EXE改为SCR。最后单击OK按钮,将生成的SCR文件拷到Windows目录下,就完成了屏幕保护程序的创建。
---- 二 实例
---- 下面就用一个实例给大家详细说明屏幕保护程序的制作。
Option Explicit
Dim quitflag As Boolean ‘声明终止程序标志变量
Dim lleft
‘声明隐藏或显示鼠标的API函数
Private Declare Function ShowCursor Lib "user32"
(ByVal bShow As Long) As Long
‘检测鼠标单击或移动
Private Sub Form_Click()
quitflag = True
End Sub
Private Sub Form_MouseMove(Button As Integer,
Shift As Integer, X As Single, Y As Single)
Static xlast, ylast
Dim xnow As Single
Dim ynow As Single
xnow = X
ynow = Y
If xlast = 0 And ylast = 0 Then
xlast = xnow
ylast = ynow
Exit Sub
End If
If xnow < > xlast Or ynow < > ylast Then
quitflag = True
End If
End Sub
‘检测按键
Private Sub Form_KeyDown(KeyCode As Integer,
Shift As Integer)
quitflag = True
End Sub
Private Sub Form_Load()
Dim X As Long
lleft = 0
‘横向滚动文字的起始X坐标
If AppPrevInstance = True Then
‘用APP对象的PrevInstance属性
Unload Me
‘防止同时运行屏幕保护程序的两个实例
Exit Sub
End If
Select Case Ucase$(Left$(Command$, 2))
‘装载命令行参数
Case "/S" ‘在显示器属性对话框中单击了
预览按钮或屏幕保护程序被系统正常调用。
Show
‘全屏显示Form1窗体
Randomize
‘初始化随机数生成器
X = ShowCursor(False)
‘隐藏鼠标
BackColor = vbBlack
Do
Timer2Enabled = True
‘启动Timer2 ,显示屏幕保护滚动文字
DoEvents
‘转让控制权,以便检测鼠标和按键行为
Loop Until quitflag = True
‘运行屏幕保护滚动文字直至有鼠标和按键行为
Timer2Enabled = False
‘终止滚动文字
Timer1Enabled = True
‘启动Timer1,退出屏幕保护程序
Case Else
Unload Me
Exit Sub
End Select
End Sub
Private Sub Form_Unload(Cancel As Integer)
Dim X
X = ShowCursor(True)
‘显示鼠标
End Sub
Private Sub Timer1_Timer()
Unload Me
‘退出屏幕保护程序
End Sub
Private Sub Timer2_Timer()
显示横向滚动文字
lleft = lleft + 100
If lleft >= 11810 Then
lleft = 0
Lab1Top = Int(Rnd 7000)
End If
Lab1Left = lleft
Timer2Enabled = False
End Sub
1、在你的电脑桌名空白的地方单击鼠标右键,选择最下方的属性选项。
2、当系统d出属性框架之后,我们在上面一排菜单中选择第三个,也就是屏幕保护程序选项。
3、默认情况下,在屏保程序的位置应该是无,在它的旁边有一个下拉菜单,我们点击一下那个向下的箭头。
4、这时候,系统就会显示出我们电脑里拥有的所有屏保程序的样式。
5、我们可以选择任意一款,我们可以事先预览一下,如果效果不好,自己不喜欢,你还可以更换别的。
6、有的选择完毕了之后,还可以进行设置,对于屏保所选择的内容的细节可以进行修改。
7、接下来,设置一下我们想要等待的屏保时间,也就是当电脑静置多久之后,我们会自动进入屏保的时间。
8、当我们设置好了之后,一定要先点击一下应用,然后再点击一下确定,这样,我们的屏保程序就设定好了。
以上就是XP系统设置屏保程序的方法介绍了。如果你也想要在自己的电脑中设置屏保程序的话,那么不妨按照方法尝试 *** 作看看。
以上就是关于电脑动态屏保怎么做全部的内容,包括:电脑动态屏保怎么做、怎样设置电脑屏保、电脑屏幕保护怎么设置自定义图片等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)