我定义了一个线程类:
LyThread = class(TThread)
private
{ Private declarations } protected
ThreadEdit:TEdit;//问题
procedure Execute; override;
public
constructor Create(Query: TQuery); end;
我想在这个线程类里面实例化ThreadEdit,但不知道如何做,请教各位大虾!谢谢!
我在Create里用:ThreadEdit:=TEdit.create(self);会出错。说Tcomponent和LyThread不匹配。
LyThread = class(TThread)
private
{ Private declarations } protected
ThreadEdit:TEdit;//问题
procedure Execute; override;
public
constructor Create(Query: TQuery); end;
我想在这个线程类里面实例化ThreadEdit,但不知道如何做,请教各位大虾!谢谢!
我在Create里用:ThreadEdit:=TEdit.create(self);会出错。说Tcomponent和LyThread不匹配。
解决方案 »
- 请问inno怎样设置公共变量?
- 如何进行跨年度的按周统计
- 如何获得FTP目录下的文件总数
- 急!!!关于SQL数据库中在字段中插入数字的问题
- 为什么我的realone 组件会提示 Floating point division by zero问题
- 在dxDBGRID 中新增一行,输入数据后,怎样不让它马上把数据库也更新,而是点某一按钮才更新?
- DELPH6中文版,哪里可以买到啊
- 求表格控件,能合并单元格最好有源码?DWG图形控件?
- 我是初学者,请大家多多关照,谢谢!
- 求Delphi翻译成CBuilder的程序!
- 高手参与---如何自动监测 CreateObject() 事件?
- 如何将下面这段VB写的转化成Delphi的阿,急死人了,高手快阿!
在这里你要么写
ThreadEdit:=TEdit.create(Application);
要么写
ThreadEdit:=TEdit.create(nil);你写上Self 等效于
ThreadEdit:=TEdit.create(LyThread的实例);这与TEdit.Create的原型自然不符合了
用你的方法搞定了,谢谢!!!
我创建了:Threa_Database:=TDatabase.Create(nil);
但Threa_Database.DatabaseName的这个属性却使用不了,奇怪。请教!谢谢!Threa_Database.Connected:=false;
Threa_Database.AliasName:=Ary[0];
Threa_Database.DatabaseName:='Ivr_Mode';//这一步出错。
Threa_Database.LoginPrompt:=false;
我引用Threa_TSession.name属性,它却是一个空值!想请教各位!谢谢!
我在线程类里面定义了一个TSession,实例化后,设它的active:=true;总会出错,为什么呀?
如何“显式”的为每个线程的连接声明唯一的Session.?我现在在线程里面按上面的方法创建TSession但用不了,很急!盼回复!十分感谢!!!