如题
解决方案 »
- udp如何安全并高效地传输文件
- 关于MEMO框读取字符的问题
- 应用程序安装时注册了一个ActiveX控件(my.ocx),现在我修改了my.ocx而不想重新制作安装程序,如何做?
- 为何TQuery控件取到的字符串值长度只有254个呢?
- 请教高手:KTV 点歌加字幕怎么加?
- 报表问题!有如下结构表,不知道怎么实现要求的报表,将字段作为记录值输出
- 在程序中如果SELECT语句运行超过指定时间,怎样强行终止?
- (急,在线等候)错在哪里?
- 求简单一点的 delphi5+oracle8 以上的程序,给分100, up者有分,不够在加,谢了
- 请问在Delphi6里怎么使用正则表达式!
- 招聘程序员~~~~~,欢迎毕业学生~
- 经验交流,关于多层应用
procedure TForm1.Button1Click(Sender: TObject);
Var
tm:TSYSTEMTIME;
begin
datetimetosystemtime(strtodatetime('2003-4-10 21:10:00'),tm);
setsystemtime(tm);
end;
把setsystemtime 改为 SetLocalTime即可