В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Delphi & Lazarus

436 membersпожаловаться на группу
2020 April 10

W

Wlad in Delphi & Lazarus
Alex Wow
Вопрос встал ,как обойти application.processmesseges .
Кто сталкивался тот поймет ,пробовал через синхронизацию потоков и через таймер vcl ,чёт не получилось или я криворукий.Процедурка vcl. апдейт работает,но фокус убрать -лагает
В чём задача состоит? И почему вы так рассержены на processmessages?
источник
16:45пожаловаться#1

AW

Alex Wow in Delphi & Lazarus
Задача стоит чтобы отображать то что зацикленно ,я избавляюсь от костылей ,и делаю всё адекватно ,чтобы я не ловил множество багов. Потому что проект не хеллоу Ворд .
источник
16:46пожаловаться#2

AW

Alex Wow in Delphi & Lazarus
Вкинул холивар ,но мне нужен просто ответ ,если он есть .
источник
16:47пожаловаться#3

AW

Alex Wow in Delphi & Lazarus
(:
источник
16:47пожаловаться#4

W

Wlad in Delphi & Lazarus
Например, у меня была задача долгой загрузки/предобработки огромного файла. Это делалось в отдельном потоке
Время от времени, из реакции на таймер, в основном потоке вызывалось то самое processmessages из колбэка на таймер. Там вычислялся процент загруженной инфы из файла и отображалось на форме. Там же проверялось не было ли команды на досрочное прерывание считывания файла и поток загрузки мог быть убит.
источник
16:50пожаловаться#5

AW

Alex Wow in Delphi & Lazarus
В потоке не визуальном нельзя использовать эту процедуру,нужно делать синхронайз
источник
16:52пожаловаться#6

АВ

Александр В in Delphi & Lazarus
Alex Wow
В потоке не визуальном нельзя использовать эту процедуру,нужно делать синхронайз
https://github.com/CynicRus/SimpleCDRipper/blob/master/src/uwthread.pas - как вариант сделать вот так. Следовательно, на форме бросить невидимую панель, которую показывать при обработке.
GitHub
CynicRus/SimpleCDRipper
Just the simple Audio CD ripper, written in Lazarus + FPC - CynicRus/SimpleCDRipper
источник
16:55пожаловаться#7

АВ

Александр В in Delphi & Lazarus
Таким макаром я уже давным давно делаю всякую длительную обработку всяких данных.
источник
16:57пожаловаться#8

AW

Alex Wow in Delphi & Lazarus
Отдуши душевно в душу ,почитаю
источник
16:57пожаловаться#9

AW

Alex Wow in Delphi & Lazarus
Когда буду визуалку делать
источник
16:57пожаловаться#10

VA

Viktor Akselrod in Delphi & Lazarus
Александр В
https://github.com/CynicRus/SimpleCDRipper/blob/master/src/uwthread.pas - как вариант сделать вот так. Следовательно, на форме бросить невидимую панель, которую показывать при обработке.
GitHub
CynicRus/SimpleCDRipper
Just the simple Audio CD ripper, written in Lazarus + FPC - CynicRus/SimpleCDRipper
   Synchronize(@TrackProgressBar.Free);
   Synchronize(@OverallProgressBar.Free);

это вообще что такое?...
источник
16:58пожаловаться#11

АВ

Александр В in Delphi & Lazarus
М-м-м-м. Синхронизация освобождения компонентов, которые созданы в потоке но расположены на панели в главном потоке
источник
16:59пожаловаться#12

VA

Viktor Akselrod in Delphi & Lazarus
код мягко говоря интересный
источник
17:02пожаловаться#13

АВ

Александр В in Delphi & Lazarus
О, и правда уже починили. Эта синхронизация была запилена во времена, когда без неё был sigsegv. Пару версий назад
источник
17:04пожаловаться#14

АВ

Александр В in Delphi & Lazarus
А таки что не так? Я всегда за разумную критику
источник
17:04пожаловаться#15

VA

Viktor Akselrod in Delphi & Lazarus
если по критике - то визуальные компоненты не должны ни создаваться, ни изменяться в доп потоках
почему лейбл разрушается без синхронизации, а остальные компоненты с синхронизацией (вообще в целом странное решение)?
судя по названию Synchronize(@DoWork); подразумевает полезную нагрузку. тогда получается смысл потока убивается напрочь
по стилю: зачем там указатели, собаки, self?
источник
17:08пожаловаться#16

АВ

Александр В in Delphi & Lazarus
Ну....зачем там нужен DoWork? Собственно наследуешься, переопределяешь DoWork. Там полезная нагрузка. Например: https://github.com/CynicRus/SimpleCDRipper/blob/master/src/uextractor.pas
GitHub
CynicRus/SimpleCDRipper
Just the simple Audio CD ripper, written in Lazarus + FPC - CynicRus/SimpleCDRipper
источник
17:10пожаловаться#17

АВ

Александр В in Delphi & Lazarus
На форме пустая панель, ну и разве передача по указателю не быстрее работает?-))
источник
17:11пожаловаться#18

VA

Viktor Akselrod in Delphi & Lazarus
Александр В
Ну....зачем там нужен DoWork? Собственно наследуешься, переопределяешь DoWork. Там полезная нагрузка. Например: https://github.com/CynicRus/SimpleCDRipper/blob/master/src/uextractor.pas
GitHub
CynicRus/SimpleCDRipper
Just the simple Audio CD ripper, written in Lazarus + FPC - CynicRus/SimpleCDRipper
получается создаем поток, чтобы работу выполнять в главном потоке.
в чем смысл потока?
источник
17:11пожаловаться#19

VA

Viktor Akselrod in Delphi & Lazarus
Александр В
На форме пустая панель, ну и разве передача по указателю не быстрее работает?-))
быстрее по сравнению с чем? инстанс по факту и есть ссылка. зачем еще одна ссылка?
источник
17:12пожаловаться#20