Скачать: CL | DM;

Почему не стартует нить ??   Найти похожие ветки 

← →
KyRo   (2006-02-17 17:07) [0]

Объявляю клас
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) ;

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

---

← →
begin...end ©   (2006-02-17 17:09) [1]

> KyRo   (17.02.06 17:07)

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

TParsM.Create(...)

---

← →
PAVIA ©   (2006-02-17 17:10) [2]

Hread[1] :=TParsM.Create(True,fsListBox1.Items.Text,"1");

---

← →
KyRo   (2006-02-17 17:19) [3]

Все я понял спасибо.

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

---

← →
Игорь Шевченко ©   (2006-02-17 17:21) [4]

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


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

---

← →
KyRo   (2006-02-17 17:25) [5]

Где небуть поставил вроде работает , а как его записать в конструкторе

---

← →
Игорь Шевченко ©   (2006-02-17 17:38) [6]

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


Resume

---

← →
KyRo   (2006-02-17 17:53) [7]

То есть
Hread[1] :=Hread[1].Create(Resume,fsListBox1.Items.Text,"1");
и так же само записать при обїявлении ?

---

← →
Игорь Шевченко ©   (2006-02-17 18:07) [8]

true на false замени.

---

← →
KyRo   (2006-02-17 18:12) [9]

Все я разобрался спасибо

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.026 c