引言: 上海中鲁通信技术有限公司 张世富
一、 前言
由于目前在WINDOWS环境下(指WINDOWS9.X,WINDOWS 2000,WINDOWS NT等环境,以下同)的一些程序的数据文件需要经常备份,但是操作系统或应用系统却没有提供比较方便的备份程序。
摘要: 摘要:本文阐述了windows环境下动态链接库的概念和特点,对静态调用和动态调用两种调用方式作出了比较,并给出了delphi中应用动态链接库的实例。
一、动态链接库的概念
动态链接库(dynamic link library,缩写为dll)是一个可以被其它应用程序共享的程序模块,其中封装了一些可以被共享的例程和资源。动态链接库文件的扩展名一般是dll,也有可能是drv、sys和fo......
摘要:delphi以其独特的面向控件的开发方式、强大的数据库功能、快速的编译技术以及简单易学的编程特性,使得它自发布之日起即格外引人注目,许多程序员也因此将它作为首选的开发工具。然而,delphi在科学计算、低端编程等方面的功能不如vc++。vc++功能强大、齐全,但是整个系统比较复杂、庞大,尤其对于初学者来说比较难学,其用户界面的开发远不如delphi那样方便、快捷。那么,我们能否将两者的优点结合起来......
WINDOWS环境下的自动备份系统上一页 ...
[timer] //定时设定 【程序编程相关:
取当前所有的拨号连接的程式】 【推荐阅读:
取应用程式的版本号】
interval=1 //timer 程序运行时间间隔 【扩展信息:
自制THyperLink组件】
sleep1=1 //sleep1应用开始停止到拷贝的时间间隔
sleep2=2 //sleep2开始拷贝到应用程序开始启动的时间间隔
week=6 //week 表示备份的星期的第几天,1—7,1为星期日
time=220000 //time 程序启动的时间220000表示为22:00:00
//以上时间单位均为分钟,并且timer大于sleep1与sleep2之与.
实现系统参数的配置.
(5) 备份日志记录文件
通过record.txt文件记录备份的日期与备份启动的时间.
2. 应用程序实现
(1) 在delphi的form中选取timer控件,控件参数可缺省.
(2) 参数初始化,在form的create事件里,从配置文件中读入timer的各项参数,对系统运行参数进行初始化,主要参数为备份启动时间,备 份的时间间隔,静态备份时间日期等.程序如下:
procedure tsrvform.formcreate(sender: tobject);
begin
label2.visible:=false;
lpsleep1:=strtoint(findname(timer,sleep1))*60*1000;
lpsleep2:=strtoint(findname(timer,sleep2))*60*1000;
lpinterval:=strtoint(findname(timer,interval))*60*1000;
sptime:=findname(timer,time);
ipweek:=strtoint(findname(timer,week));
timer1.interval:=lpinterval ;
timer1.enabled:=true;
end;
(3) 建立调用函数,stopserver为停止应用程序运行的函数,startserver为启动应用程序的函数,backupdata为数据文件的备份程序.
〈1〉procedure tsrvform.startserver(); //启动运行应用程序
var
i,ret :integer;
stemp :string;
begin
stemp:=findname(server,servername);
i:=winexec(pchar(stemp),sw_show);
if i<31 then
begin
ret:=application.messagebox(start notesserver error!,error!,mb_ok);
exit;
end;
end;
〈2〉procedure tsrvform.stopserver(); //停止运行应用程序 ...
下一页 摘要: 所谓动态选单是指选单项随着程序的操作变化而变化。现在,我们用delphi来实现这一功能,具体步骤如下:
1.首先,确定动态选单的数据来源,即要确定动态选单标题是来自windows的系统注册表,还是来自一个数据库,或者是来自一个子目录,主要由程序的功能而定。这里假设主窗口名为mainform,上面已有主选单,其动态选单的数据源是一个string类型的变量,名称为submenuitemso......