Страница 2 из 2

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 13.07.2017 09:29:49
brick08
На Lazarus 1.8 RC1 не компилится, хотя на 1.9 норм.

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 13.07.2017 15:57:42
pupsik
brick08 конечно норм (т.е. верно ругает). Поменяли процедуру. На что и ругань. Посмотрите что да как и подправьте.

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 13.07.2017 16:37:25
wadman
pupsik писал(а):т.е. верно ругает

Не, раз я заявил о совместимости с 1.6, то не должно ругаться. :)
Залил исправленную версию.

Добавлено спустя 4 минуты 28 секунд:
А, стоп. 18 rc1? Их там колбасило в редакторах дизайнера, меняли то в одну сторону, то в другую...

Описание меняется между строками {$ifdef ver16 or $ifdef ver18}.

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 13.07.2017 16:56:59
pupsik
wadman значит не понятливая версия лазаря у него. И скрин кривой :wink:

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 13.07.2017 17:04:30
wadman
pupsik писал(а):значит не понятливая версия лазаря у него

Верно, он как раз на распутье по версиям:
1.8 RC1
Код: Выделить всё
// modifing
  TPropHookModified = procedure(Sender: TObject; PropName: ShortString) of object;
  TPropHookRevert = procedure(Instance:TPersistent; PropInfo:PPropInfo) of object;
  TPropHookRefreshPropertyValues = procedure of object;

1.8 RC3
Код: Выделить всё
// modifing
  TPropHookModified = procedure(Sender: TObject) of object;
  TPropHookModifiedWithName = procedure(Sender: TObject; PropName: ShortString) of object;
  TPropHookRevert = procedure(Instance:TPersistent; PropInfo:PPropInfo) of object;
  TPropHookRefreshPropertyValues = procedure of object;

Re: Topic: Simple multithreading TWThread, TWCThread

СообщениеДобавлено: 19.10.2017 12:16:32
wadman
Добавил TWEvent.WaitForMultiple, который, соответственно, работает только со своим классом.
Подходит для синхронизации нескольких потоков TWThread, TWCThread.