VPF::LAZARUS и BeginThread = ? - Форум программистов

lollollollol

Дата 3.11.2014, 15:43 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 287
Регистрация: 12.3.2013

Репутация: нет
Всего: нет

Всех приветствую!

Не могу создать поток. переношу проект из делфи.

Есть код

ThID:=BeginThread(nil,0,@CreateWindowLogin,nil,0,tid)

и вот тут то ошибка

test.pas(697,51) Error: Incompatible type for arg no. 3: Got "<address of procedure;CDecl>", expected "<procedure variable type of function(Pointer):LongInt;Register>"

Уже всяко прбывал, не могу понять что я делаю не так.

ФедосеевПавел

Дата 4.11.2014, 12:33 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 291
Регистрация: 7.2.2009

Репутация: 2
Всего: 10

Минимальный вариант компилируется

Код

{$mode DELPHI}

program rrr;

function CreateWindowLogin (parameter: pointer) : PtrInt;
begin
end;

var
  ThID: TThreadID;
  tid: TThreadID;
begin
 ThID:=BeginThread(nil,0,@CreateWindowLogin,nil,0,tid)
end.

Видимо, функция CreateWindowLogin объявлена не совсем так.

Описания можно посмотреть в ref.pdf.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »