关于TThread同步的2个问题。。。 问题1:线程太多了?或许线程之间死锁了?或许Add的东西太长了,系统反应不过来,你能不能等上个12小时?问题2:只能先把参数放在某个地方(如类变量),然后让那个作为参数的函数调用另一个函数。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 to ChinaOk(蓝蝶):请问"变量在create中初始化。"是不是还要重载Tmythread的create?怎样重载才能让其同时具备TThread的create的功能呢?inherited 关键字?详细点好么? 你看看delphi自带的demo。很详细。我就是从那里学的。.... public constructor Create(Box: TPaintBox; var SortArray: array of Integer); end;....constructor TSortThread.Create(Box: TPaintBox; var SortArray: array of Integer);begin FBox := Box; FSortArray := @SortArray; FSize := High(SortArray) - Low(SortArray) + 1; FreeOnTerminate := True; inherited Create(False);end; Synchronize(P)P是过程指针,这点你一定要明白,否则用线程同步那是白扯Synchronize的作用是与主线同步而不是保护。 如何安装这个钩子?WH_JOURNALPLAYBACK & WH_JOURNALRECORD 我想用DELPHI模拟CTRL+Z功能,该做呢,谢谢 求大家帮个忙 Delphi初学者 怎样在硬盘上创建一个空目录? 这个错到底是怎么回事呀????????????? 如何编程实现“判断一个程序是用的什么编译器” 连接时没有当前记录,怎么办? 如果有这样一本书??up有分!!! 为什么用QuickReport的QRShape画的线条打印出来的效果不是很直,是抖动的线条呢? 我这个sql语句应该怎样写 help! 如何控制DBGRID的显示,谢谢了!
请问"变量在create中初始化。"是不是还要重载Tmythread的create?
怎样重载才能让其同时具备TThread的create的功能呢?
inherited 关键字?
详细点好么?
constructor Create(Box: TPaintBox; var SortArray: array of Integer);
end;
....constructor TSortThread.Create(Box: TPaintBox; var SortArray: array of Integer);
begin
FBox := Box;
FSortArray := @SortArray;
FSize := High(SortArray) - Low(SortArray) + 1;
FreeOnTerminate := True;
inherited Create(False);
end;
P是过程指针,这点你一定要明白,否则用线程同步那是白扯
Synchronize的作用是与主线同步而不是保护。