Потоки и процедуры вызываемые из потока

[remus-xe2]

добрый день подскажите, есть поток

procedure TMyThread.Execute;
begin
xxxxxxxxxxxxx
xxxxxxxxxxxxx
end;

если из него вызывается функция\выполняется процедура, она будет выполнена в этом же потоке или в основном ?
Если в основном, то как ее выполнить в созданом потоке ?( В TMyThread)

[Pavia]

Сообщение от remus-xe2

в этом же потоке

В нём же.
А если нужно из основного, то для этого используем Synchronize.

[remus-xe2]

Сообщение от Pavia

В нём же.
А если нужно из основного, то для этого используем Synchronize.

Спасибо, но если вся эта цепочка процедур\функций выполняется в том же потоке в котором и была вызвана как правильно обращаться к VCL компонентам ?

Пример

procedure LogError;
begin
   form1.edit1.text:='Error';
end;

procedure Scan;
begin
...
   LogError;
...
end;

procedure TMyThread.Execute;
begin
     Scan;
end;

Процедуру через Synchronize(LogError) вызвать не получается из Scan...
Или обращаться к визуальным компонентам (изменять их значения) лучше только из procedure TMyThread.Execute; ?

[Pavia]

Сообщение от remus-xe2

Спасибо, но если вся эта цепочка процедур\функций выполняется в том же потоке в котором и была вызвана как правильно обращаться к VCL компонентам ?

VCL не является поток-безопасными. Поэтому для доступа к ним нужно использовать синхронизацию.

Если надо вернуть данные. То самый простой способ таймер на форму и глобальный массив результатов. Потоки складывают результаты в массив каждый в свою ячейку. А таймер периодически читает результаты и выводит.

Так же можно использовать мьютексы и критические секции. К примеру при обновлении прогресс-бара защёлкиваем мьютекс изменяем значение прогресса и открываем мьютекс. Мьютекс должен быть общий для всех потоков.

Сообщение от remus-xe2

Процедуру через Synchronize(LogError) вызвать не получается из Scan...

Это ещё почему? TThread.Synchronize(LogError)
Метод Synchronize объявлен как "class procedure" это означает что она может вызываться без создания объекта.