Вниз
Скачать: 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.025 c
15-1140878464
Ega23
2006-02-25 17:41
2006.03.19
С Днём рождения! 25 февраля


2-1141566700
ctudent
2006-03-05 16:51
2006.03.19
Помогите разобраться с ошибкой!


15-1140872613
SergP.
2006-02-25 16:03
2006.03.19
Как правильно пишется?


2-1141447935
Trych
2006-03-04 07:52
2006.03.19
Не создает поток


15-1140692403
старый маразматик(с)
2006-02-23 14:00
2006.03.19
... Но должны ли мы любить свою мать, невзирая ни на что?




   Наверх