Есть следующий код:
Цитата:
constructor TThread.Create(CreateSuspended: Boolean);
var
Flags: DWORD;
begin
inherited Create;
FSuspended := CreateSuspended;
Flags := 0;
if CreateSuspended then Flags := CREATE_SUSPENDED;
FHandle := BeginThread(nil, 0, @ThreadProc, Pointer(Self), Flags, FThreadID); //ругается здесь
end;
|
Ошибка следующая:
[DCC Error] module.pas(2060): E2033 Types of actual and formal var parameters must be identical
Знаю что Flags должен быть SIZE_T, но что еще ему не хватает?