-
Постов
215 -
Зарегистрирован
-
Посещение
-
Победитель дней
13
Весь контент GASCHE
-
А что мешает так изменить ваш пример procedure TForm1.Button1Click(Sender: TObject); begin i := 0; Finish := False; Memo1.Lines.Add('Start'); Button2.Enabled := True; Button1.Enabled := False; end; procedure TForm1.Button2Click(Sender: TObject); begin Inc(i); Memo1.Lines.Add(IntToStr(i)); if (i = 5) then begin Finish := True; Button2.Enabled := False; Ogogo(); end; end; procedure TForm1.Ogogo(); BEGIN //while not Finish do //Application.ProcessMessages; Memo1.Lines.Add('Finish'); Button1.Enabled := True; END;
-
Спасибо! Еще спрошу если нужно загрузить не одну, а несколько картинок то как узнать, что первая загрузилась, или можно подряд вызывать LoadResizeBitmapFromURL меняя соответственно url и image?
- 16 ответов
-
- android
- firemonkey
-
(и ещё 2 )
C тегом:
-
Тогда прошу уточнить нельзя работать с локальным TBitmap потока или с TBitmap из основного потока?
- 16 ответов
-
- android
- firemonkey
-
(и ещё 2 )
C тегом:
-
Я понимаю с aBitmap, но aSourceBmp, aResizeBmp можно сделать локальными переменными потока. Зачем их синхронизировать?
- 16 ответов
-
- android
- firemonkey
-
(и ещё 2 )
C тегом:
-
До сих пор думал, что метод Synchronize выполняется в главном потоке приложения, если это так, то почему ресайз не сделать в потоке?
- 16 ответов
-
- android
- firemonkey
-
(и ещё 2 )
C тегом:
-
И работать будет коряво TImage не поток безопасный компонент поэтому присваивать ему значение в потоке без синхронизации нельзя.
- 16 ответов
-
- android
- firemonkey
-
(и ещё 2 )
C тегом:
-
Мне жаль пользователя, которому придется работать с 50 кнопками если конечно это не клавиатура, но и не могу понять зачем его злить, дополнительно тормозя и без того долгий процесс вместо того чтоб пытаться сократить это время.
-
А может проще сразу создать эти кнопки а при нажатии на кнопку сделать их видимыми?
-
А Android поддерживает WaitForSingleObject( Parms.fvEventUSB, INFINITE ) или чем её можно заменить?
-
Steepe_Hare Вы бы написали диапазон задержек и минимальную разницу между ближайшими.
-
Если автор знает про него, наверно у него есть, а так есть тут.
-
А если попробовать подключить jsMath?
-
Ну не знаю, все зависит от времени сколько вы тратите на обработку одного запроса "дядя БИЛ" не рассчитывал на такое количество переключений между потоками в своей "многопоточной" системе даже получение интервала в 1мс с приемлемой погрешностью довольно проблематично.
- 45 ответов
-
- TCriticalSection
- TThread
-
(и ещё 1 )
C тегом:
-
На мой взгляд тут два варианта, или как у вас сейчас реализовано с одним пулом или вместе с потоком создавать свой буфер и переносить туда данные из пула, с которыми и будет работать поток. Не понятно что тут не изящного, единственно если это возможно я бы и запись в бд сделал в отдельном спящем потоке и после занесения данных в очередь запускал бы этот поток.
- 45 ответов
-
- TCriticalSection
- TThread
-
(и ещё 1 )
C тегом:
-
Не совсем понятно с размером пула, но что мешает потоку читать данные из пула и самому их обрабатывать и не понятно, что такое "очередь к БД" и как она связана с вашим пулом.
- 45 ответов
-
- TCriticalSection
- TThread
-
(и ещё 1 )
C тегом:
-
Как-то не понятно что вы ловите, если в запросе нет SELECT ID... то что должно подставиться в where id=:id
- 10 ответов
-
- ListView
- база данных
-
(и ещё 1 )
C тегом:
-
Браузер Chrome. Столкнулся на планшете, проверил на большом экране.На планшете в полно экранном режиме и при изменении размера экрана на большом дисплее пропадают верхние строки там где "Непрочитанный контент". Очень не удобно.
-
В процедуре обработке читаете ( Sender as TButton ).Tag
-
Используйте свойство Tag, при создании кнопки задайте его, при обработке прочитайте.