поток

← →
batya-x (2008-03-05 19:00) [0]

Пишу программу, типа редактора картинок, на форме TrackBar в его событии
Change следующее
thread_img.Free; main_bitmap.LoadFromFile(exePach+"bitmap.tmp"); thread_img:=thread_pic.Create(true); thread_img.Priority:=tpLowest; thread_img.Resume;

В потоке редактирую картинку
brBitmap(main_bitmap,Main_form.br_trackbar.Position); Synchronize(move_pic_th);

и вывожу на экран функцией move_pic_th

Проблема: TracBar двигаеться с подвисание, т.е. не гладко
как сделать незаметную работы потока

← →
Leonid Troyanovsky © (2008-03-05 19:42) [1]

> batya-x (05.03.08 19:00)

> как сделать незаметную работы потока

Самым незаметным является отсутствующий поток.

--
Regards, LVT.

← →
Сергей М. © (2008-03-05 20:18) [2]

> редактирую картинку

> move_pic

Зашибись.

"move" в переводе с буржуйского - это "редактирую"

А далее еще интересней - отредактировали (отмувили то есть), а теперь еще и

> вывожу на экран функцией move_pic_th

Ну и на десерт главный ништяк - лезем в визуальный VCL-контрол:

> Main_form.br_trackbar.Position

p.s.
Привет Николаю Кариху).. Чтоб ему оно аукнулось по самое нехочу)

← →
oxffff © (2008-03-05 20:21) [3]

> Synchronize(move_pic_th);

Вот твои грабли.

← →
oxffff © (2008-03-05 20:24) [4]

> Ну и на десерт главный ништяк - лезем в визуальный VCL-контрол:
>
>
>
> > Main_form.br_trackbar.Position

См.

property Position: Integer read FPosition write SetPosition default 0;

← →
batya-x (2008-03-05 20:41) [5]

> oxffff © (05.03.08 20:21) [3]
> > Synchronize(move_pic_th);Вот твои грабли.

пожалуйсто обьясните...

> > Ну и на десерт главный ништяк - лезем в визуальный VCL-
> контрол:> > > > > Main_form.br_trackbar.PositionСм.property
> Position: Integer read FPosition write SetPosition default
> 0;

с этим понятно

← →
oxffff © (2008-03-05 20:56) [6]

> batya-x (05.03.08 20:41) [5]
>
> > oxffff © (05.03.08 20:21) [3]
> > > Synchronize(move_pic_th);Вот твои грабли.
>
>
> пожалуйсто обьясните...
>
>
> > > Ну и на десерт главный ништяк - лезем в визуальный VCL-
>
> > контрол:> > > > > Main_form.br_trackbar.PositionСм.property
>
> > Position: Integer read FPosition write SetPosition default
>
> > 0;
>
> с этим понятно

>Проблема: TracBar двигаеться с подвисание, т.е. не гладко
>как сделать незаметную работы потока

Поскольку Synchronize ставится в очередь.
Которая обрабатывается CheckSynchronize on Idle приложения.
Существует вероятность того, что до очередь сообщений не пуста и соответственно до CheckSynchronize и соответственно до вызова Sync функции дело доходит только когда их нет. Сообщения приходят постоянно, а до CheckSynchronize, просто не доходят.
Есть еще вопросы как ты уведомляешь поток и необходимой работе на картинкой.

P.S. Проблемы с доступом в VCL конрол нет.
Так используется переменная в памяти в составе объекта.

← →
oxffff © (2008-03-05 20:59) [7]

> oxffff © (05.03.08 20:56) [6]

Более того сами парни из Codegear рекомендуют воздерживаться от Synchronize. Сейчас link найду

← →
batya-x (2008-03-05 21:03) [8]

а как же тогда лучще работать с vcl из потока

← →
oxffff © (2008-03-05 21:03) [9]

http://hallvards.blogspot.com/2008/03/tdm6-knitting-your-own-threads.html

Still, one of the major weaknesses of the current Delphi VCL thread support is that there is no (easy) way for the main thread to wait for a signal in a non-polling, non-blocking fashion. Another related issue is that there is no clean way for threads to communicate between themselves or the main thread. For performance and blocking reasons, the dreaded TThread.Synchronize method should be avoided.

← →
oxffff © (2008-03-05 21:05) [10]

> batya-x (05.03.08 21:03) [8]
> а как же тогда лучще работать с vcl из потока

А в чем затруднения?

← →
batya-x (2008-03-05 21:06) [11]

можно в краце что там написанно, а то я с этим забугором всё неделю буду разбираться

← →
Palladin © (2008-03-05 21:09) [12]

там написано что все плохо

← →
batya-x (2008-03-05 21:12) [13]

и как же быть тогда

До сих пор, одним из главных недостатков поддержки потоков
VCL"ю является, то что не существует простого способа главному потоку получать уведомление о событии в не spinlock режиме(режим постоянного опроса), и блокированном режиме (прим. переводчика намекая по сути на Модель Windows APC (async) и alertable state. IMHO). Другой аналогичной проблемой является отсутствие ясного(четкого) способа для взаимодействия между потоками и главным потоком. Из соображений производительности и причин блокирования следует избегать жуткого TThread.Synchronize

← →
batya-x (2008-03-05 21:16) [15]

ну какие-то альтернативы существуют

> batya-x (05.03.08 21:12) [13]

Есть еще вопросы как ты уведомляешь поток о необходимой работе над картинкой?

поток Найти похожие ветки