1.规定时间为,每天的(00:00:01)执行一次.2.执行窗体中的Button1Click事件.
解决方案 »
- 请sanguomi,wellnj来接点分。
- 我的软件(DELPHI的)要改成外网的,用中间件服务器还是用JAVA改写?
- rave报表中显示的查询结果都是invalid,咋办?
- 2000下如何遍历所有用户已经建立的窗口句柄...........
- 如何将dbgrid中选择的内容赋予姓名栏
- 如何调用执行包文件
- 谁能把这个程序改成递归函数?高分求救!
- 寻求一加密、解密算法:***在线***
- SOCKET传输除文本能打开,其他文件都打不开,各位老大,请帮忙解决一下!!
- 有什么工具可以查看软件在开发时都用了什么控件吗?
- 没有FORM的文件如何加上图标?类似命令行下的
- 多核CPU分别控制多线程。。。。。。。
伪代码如下:
if now=00:00:01 then
Button1Click(nil);这种简单的问题最好自己了解一下控件的作用,然后去试验,直接要代码不好。
另外,最好把Button1Click要执行的功能写到一个过程里面,供Button1Click调用,这样代码无论从结构上和可读性上都改善不少。
procedure TForm1.Button1Click(Sender: TObject);
begin
//
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
if FormatDateTime('hh:nn:ss', Now) = '00:00:01' then Button1Click(Button1);
end;