login писал(а):
гляньте мою ошибку с параллельным потоком. Что с ней можно сделать.1nd1g0 писал(а):
2.2 Указываем какую функцию будем исполнять в потоке:
thrd.OnExecute := ИмяФункции
Объявляйте в приватной секции функцию вида:
function ИмяФункции(Sender:PThread):Integer
login писал(а):
Не применяется. Рассматривал с экранной лупойНу как же, лупа глубже пикселя не заглянет, если нот 10 а линий пикселей 8, то отображено будет максимум 8 (в реальности - ещё меньше), хоть под чем рассматривайте
------------ Дoбавленo в 18.37:
login, да, чуть не забыл сказать, в функции можно крутить основной цикл пока Sender.Terminated не равен True (флаг завершения потока), потом Result := 0 (код отсутствия ошибок) и end
Если у Вас не получится таким, "высокоуровневым" способом организовать поток (хотя у Вас, вроде, уже всё необходимое на руках), то можно начать играться с CreateThread, но там несколько менее наглядно и повышается риск ошибок.
Поиск
Друзья
Администрация