Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Почему не стартует нить ?? [D7, WinXP]

KyRo © (2006-02-17 17:07:00)
Объявляю клас
TParsM = class(TTHread)
private
Nom:integer;
FileN: array [1..30] of string;
protected
procedure Execute; override;
public
constructor Create(CreateSuspennded: Boolean; const NomHread:
string; const FileNm:string);

Создаю его

constructor TParsM.Create(CreateSuspennded: Boolean;const NomHread: string;
const FileNm:string);
begin
inherited Create(CreateSuspennded) ;
Nom:= StrToInt(NomHread);
FileN[StrToInt(NomHread)]:=FileNm;
end;

И когда вызываю его из своей формы

Hread[1] :=Hread[1].Create(True,fsListBox1.Items.Text,'1');
то поле

inherited Create(CreateSuspennded) ;

Выдает ошибку из за чего это может быть

KyRo (2006-02-17 18:12:00) [1]
Все я разобрался спасибо

Игорь Шевченко (2006-02-17 18:07:00) [2]
true на false замени.

KyRo (2006-02-17 17:53:00) [3]
То есть
Hread[1] :=Hread[1].Create(Resume,fsListBox1.Items.Text,'1');
и так же само записать при обїявлении ?

Игорь Шевченко (2006-02-17 17:38:00) [4]

> а как его записать в конструкторе

Resume

KyRo (2006-02-17 17:25:00) [5]
Где небуть поставил вроде работает , а как его записать в конструкторе

Игорь Шевченко (2006-02-17 17:21:00) [6]

> должна стартануть автоматически

Ты же создаешь с CreateSuspended=true, какой тут автоматический старт. Говори Resume в конструкторе или где-то еще

KyRo (2006-02-17 17:19:00) [7]
Все я понял спасибо.

У меня есть еще один вопрос
procedure TParsM.Execute;
Эта процедура должна стартануть автоматически как событие на создание нити или ее из криэйта надо вызвать ??
Потому что у меня в нее что то управление не переходит.

PAVIA (2006-02-17 17:10:00) [8]
Hread[1] :=TParsM.Create(True,fsListBox1.Items.Text,'1');

begin...end (2006-02-17 17:09:00) [9]
> KyRo (17.02.06 17:07)

> Hread[1].Create(...)

TParsM.Create(...)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »