在公司写了一个数据查询的小程式,因为需要连接多个外地的数据库查询,导致界面老是出现卡死的情况,听说做成线程式可以解决这个问题,哪个大神能否给个例子参考?
解决方案 »
- 想实现类似于QQ天气预报那种鼠标移动到天气图标显示出窗体form1移出则消失
- ShellExecute 打开 一个 盘符(光驱Z:) 如何模拟F5刷新 一下 z盘 ?
- 插入字符
- 如何在程序中用代码连接ms server 呢?
- 一个有意思的小问题
- 帮个忙,,,,这个很简单的,,就是提供给我一个算法。那当然最好是程序了。
- 谁有 gexperts 的中文使用说明?
- 明天8。30应试一个ERP项目,请大家指教。
- 高分求教(在线等待)
- 对大侠来说是小问题,不过还望莫抬手Skip过去(Thanks)!
- delphi7程序运行 edit文本鼠标不能点入
- deiphi7程序运行关闭时 显示Exception EAccessViolation in module spxs.exe at 00100674
TMyThread_KHFX= class(TThread)
protected
procedure Execute; override;
procedure checkdh;
end;
procedure TMyThread_KHFX.checkdh;
begin
frmTGZX_XSLTODB.CHECK_KHDHSTAT;
end;
procedure TMyThread_KHFX.Execute;
begin
synchronize(checkdh); //线程独占方式 如果不用synchronize则可在执行线程时做其它操作,但是退出程序就报错!~~
end;
//--------------------------------------------