Ошибка времени компиляции

← →
Вован (2002-08-29 19:24) [0]

Уважаемые М А С Т А К И !
Помогите, пожалуйста, чайнику разобраться вот в какой заморочке:Пишу код:

Interface
-//-//-//-
public
constructor Create;
-//-//-//-
Implementation
-//-//-//-
Constructor TGenThr.Create;
Inherited Create(True);
FreeOnTerminate:=True;
Resume
End;
-//-//-//-

И получаю:
[Error]GenThr.pas[43]:DEclaration Expected but "INHERITED"found.

В чем может быть дело?

← →
Skier © (2002-08-29 19:36) [1]

>Вован

unit Unit2; interface uses Classes; type TGenThr = class(TThread) private protected procedure Execute; override; public constructor Create( CreateSuspended: Boolean); end; //TGenThr implementation { TGenThr } constructor TGenThr.Create(CreateSuspended: Boolean); begin inherited Create(True); FreeOnTerminate:=True; Resume; end; procedure TGenThr.Execute; begin // end; end.

Хотя, если честно, я твою логику не понимаю...
Создаёшь поток как Suspended и тут же вызываешь Resume; ???

← →
Shaman_Naydak © (2002-08-29 20:10) [2]

> Вован
Приведи побольше кода.. странно все это.. что-то ты простое забыл

> Skier
Логика есть, притом железная.. правда, что мешало написать так:
constructor TGenThr.Create(CreateSuspended: Boolean);
begin
FreeOnTerminate:=True;
// еще инициализация
inherited Create(False);
end;

← →
Набережных С. (2002-08-29 20:46) [3]

> Shaman_Naydak © (29.08.02 20:10)
> > Вован
> Приведи побольше кода.. странно все это.. что-то ты простое
> забыл

begin у него нету после Constructor TGenThr.Create; :)))

Ошибка времени компиляции Найти похожие ветки