![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нарушение доступа по адресу... [D7, Win95/98, Win2k]
Виктор © (2004-10-14 11:59:00)Доброго Всем дня Ув. Мастера!
Если кто сталкивался с такой задачей подскажите почему я не могу
создать в потоке TpFIBQuery? Код такой:
TThreadTrans = class(TThread)
protected
procedure Trans;
procedure Execute; override;
end;
procedure TThreadTrans.Trans;
var FIB :TpFIBQuery;
begin
...
FIB.Create(nil); <-Ошибка
...
end;
procedure TThreadTrans.Execute;
begin
FreeOnTerminate:=true;
Trans;
inherited;
end;
procedure TfmMain.BtnTransClick(Sender: TObject);
begin
ThreadTrans := TThreadTrans.Create(False);
end;
Зараннее всем спасибо.
Виктор (2004-10-14 12:19:00) [1]Я понял, это наверно нечистая меня спутала надо так
FIB:=TpFIBQuery.Create(nil);
Всем спасибо!
Дмитрий Ботвин (2004-10-14 12:10:00) [2]И к тому же FreeOnTerminate:=true лучше указывать после
ThreadTrans := TThreadTrans.Create(False), а не в процедуре
Execute!!!!
KSergey (2004-10-14 12:08:00) [3]http://www.delphikingdom.com/helloworld/runtime_comp.htm
Суслик (2004-10-14 12:06:00) [4]
> FIB.Create(nil); <-Ошибка
Ты не знаешь как экземпляры классов (объекты) в дельфи создаются?