Показать сообщение отдельно
  #4  
Старый 07.02.2012, 16:31
isp isp вне форума
Прохожий
 
Регистрация: 31.01.2012
Сообщения: 6
Репутация: 10
Лампочка

проблема решена, тему, впринципе, можно закрывать, лишь хотел задать один вопрос.

Код:
cs.Enter;
try
f:=tformclass(findClass('TForm4'));
b:=f.create(Application);
b.Caption:=name_pic;
b.ShowModal;
i_fresh:=b.Caption;
finally
b.Free;
end;
cs.Leave;

как видно из кода, обмен потока с дополнительной формой получился лишь с помощью caption дополнительной формы, так как при создании формы поток не видит ни компонента timage, ни edit.

заморачиваться особо не стал с поиском или динамическим созданием компонента на дополнительной форме, поэтому решил оставить так, НО, возможно, у вас будут какие-либо рациональные предложения по обмену данными с дополнительной формой из потока, не совсем "увеличивающие" код.

буду премного благодарен.
Ответить с цитированием