程序功能,获取主机ip然后上传到指定的ftp,检测时间间隔每30min。程序源代码编译即可直接运行。
Delphi中实现程序的延时的方法
在Delphi中,通常可以用以下三种方法来实现程序的延时,即TTtimer控件,Sleep函数,GetTickCount函数。但是其精度是各不相同的。
一、三种方法的简单介绍
1)TTtimer控件
TTtimer控件的实质是调用Windows API定时函数SetTimer和KillTimer来实现的,并简化了对WM_TIMER 消息的处理过程。通过设置OnTimer事
件和Interval属性,我们可以很方便的产生一些简单的定时事件。
2)Sleep函数
Sleep函数用来使程序的执行延时给定的时间值。Sleep的调用形式为Sleep(milliseconds),暂停当前的进程milliseconds毫秒。Sleep的实现
方法其实也是调用Windows API的Sleep函数。例如:
sleep(1000); //延迟1000毫秒
Sleep会引起程序停滞,如果你延迟的时间较长的话,你的程序将不能够响应延时期间的发生的其他消息,所以程序看起来好像暂时死机。
3)GetTickCount函数
在主程序中延时,为了达到延时和响应消息这两个目的,GetTickCount()构成的循环就是一种广为流传的方法。例如:
procedure Delay(MSecs: Longint);
//延时函数,MSecs单位为毫秒(千分之1秒)
var
FirstTickCount, Now: Longint;
begin
FirstTickCount := GetTickCount();
repeat
Application.ProcessMessages;
Now := GetTickCount();
until (Now - FirstTickCount >= MSecs) or (Now < FirstTickCount);
end;
Delphi 关键字详解
absolute
//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Edit1.Text := IntToStr(StrLen);
end;
abstract
//它允许你创建抽象的方法, 包括有抽象方法的类称为抽象类.
//Abstract关键字必须与Virtual或Dynamic关键字同时使用, 因为抽象方法必须被覆盖式实现.
//抽象类不能实例化, 抽象方法不能包含方法体.
type
TDemo = class
private
protected
procedure X; virtual; abstract;
public
constructor Create;
destructor Destroy; override;
published
end;
Delphi三层架构的精彩文章
Delphi三层架构的精彩文章:
=========================
三层架构下远程读写数据库Blob字段的示例:
http://bbs.codegear-cn.com/viewthread.php?tid=1657&extra=page%3D1
三层架构下的多块并发文件传输方法:
http://bbs.codegear-cn.com/viewthread.php?tid=1303&extra=page%3D1
三层架构下很有用的数据包裹类TQBParcel:
http://bbs.codegear-cn.com/viewthread.php?tid=1448&extra=page%3D1
以TQBParcel类为持久化容器的业务逻辑部件设计及RPC调用:
http://bbs.codegear-cn.com/viewthread.php?tid=1238&extra=page%3D1
三层架构下基于业务逻辑部件的远程数据库访问:
http://bbs.codegear-cn.com/viewthread.php?tid=1267&extra=page%3D1
以源码说明如何用插件扩充中间层功能:
http://bbs.codegear-cn.com/viewthread.php?tid=1305&extra=page%3D2
Delphi2010开发团队全家福
Delphi 2010產品技術發表會投影片和範例檔!
CodeGear IDE技術文章
Delphi
智能源码统计伴侣 V3.7
智能源码统计伴侣 V3.7
详细介绍:用于对目前流行的几乎所有编程工具所编写的程序进行代码统计,分析出程序中的代码行、注释行、空白行的行数和比例,软件支持VC++、C++ Builder、Delphi、VB、C/C++、ASM、Java等程序类型。软件拥有非常漂亮的界面和强大的智能化统计功能,编程必备工具。