Notice: Функция _load_textdomain_just_in_time вызвана неправильно. Загрузка перевода для домена kirki была запущена слишком рано. Обычно это индикатор того, что какой-то код в плагине или теме запускается слишком рано. Переводы должны загружаться при выполнении действия init или позже. Дополнительную информацию можно найти на странице «Отладка в WordPress». (Это сообщение было добавлено в версии 6.7.0.) in /home/hwor/blagovest.org.ru/wp-includes/functions.php on line 6114
Notice: Функция _load_textdomain_just_in_time вызвана неправильно. Загрузка перевода для домена shamrock была запущена слишком рано. Обычно это индикатор того, что какой-то код в плагине или теме запускается слишком рано. Переводы должны загружаться при выполнении действия init или позже. Дополнительную информацию можно найти на странице «Отладка в WordPress». (Это сообщение было добавлено в версии 6.7.0.) in /home/hwor/blagovest.org.ru/wp-includes/functions.php on line 6114
Warning: Cannot modify header information - headers already sent by (output started at /home/hwor/blagovest.org.ru/wp-includes/functions.php:6114) in /home/hwor/blagovest.org.ru/wp-includes/feed-rss2-comments.php on line 8
Комментарии: tthread не освобождает память
https://blagovest.org.ru/?p=93869
Задайте вопрос и получите ответSat, 12 Dec 2015 00:57:16 +0000
hourly
1 https://wordpress.org/?v=6.7.2
Автор: aush
https://blagovest.org.ru/?p=93869#comment-5784
Sat, 12 Dec 2015 00:57:16 +0000http://blagovest.org.ru/?p=93869#comment-5784Поток и не должен освобождаться после останова. Suspend использует системную функцию SuspendThread, которая просто не дает системе переключаться на обработку функции потока — своеобразная "заморозка" FreeOnTerminate работает только если обработка функции потока завершена (это можно увидеть в classes.pas function ThreadProc(Thread: TThread): Integer;) Метод Terminate не освобождает поток а меняет значение логического поля потока FTerminated, значение которого можно получить из свойства Terminated. Это свойство должно проверяться в методе Execute потока, например так if not terminated then … Если поток может быть "заморожен" по логике программы, обработка Button3Click должны быть изменена на procedure TForm1.Button3Click(Sender: TObject); begin Test.Terminate; //остановить if Test.Suspended then Test.Resume; end;
]]>