线程调用

Question

能否用TIMER控件调用一个线程hthread，如果不行，该怎么实现每隔5秒调用一次该线程

Answer 1

应该可以吧~~我没试过，如果不行，可以用 GetTickCount 等来计时

Answer 2

就在Timer1的OnTime事件里创建进程就可以了

Answer 3

Timer1的OnTime事件里创建进程在第2次执行的时候会提示出错，然后程序就自动关闭了
提示：应用程序发生异常的软件异常OX0eedfade，位置为ox77e4d756

Answer 4

那不行！你那样直接创建的 线程不是有访问同一保护区或变量的嫌疑吗？你要做什么功能？
把你要实现的功能写成一个过程 注意线程保护 然后用CreateThread来做也可以的

Answer 5

我的调用是这样写的：
procedure Tzdztfrm.FormShow(Sender: TObject);
var s:string;
begin
 hthread:=CreateThread(nil,0,@MyThreadfunc,nil,0,ThreadID);
  if hThread=0 then
     begin
        messagebox(Handle,'Didn’tCreateaThread',nil,MB_OK);
     end;

Answer 6

能否用TIMER控件调用一个线程hthread，如果不行，该怎么实现每隔5秒调用一次该线程
////你要做什么呀线程不是你自己调用的当然 你可以对它进行管理
你每隔5s调用一次线程 ->5s执行一下该线程的执行函数体<代码体>即可...