[Pcrepair]

Добрый день. Есть следующий демокод:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65

unit uNewThread; interface uses   System.Classes,SysUtils,Dialogs,SyncObjs,StrUtils,ExtCtrls,Windows,   WideStrUtils,Vcl.Forms;     procedure  ThreadDoJob(const aHost:string; var aErrorMsg:string; var aIsJobDone:Boolean);   type   DoJob = class(TThread)   private     fHost,fErrorMsg:string;     fIsJobDone:Boolean;   protected     procedure Execute; override;   public     property ErrorMsg:string read fErrorMsg;     property IsJobDone:Boolean read fIsJobDone;       constructor Create(const aHost:string; var aErrorMsg:string; var aIsJobDone:Boolean);     destructor Destroy; override;   end;   implementation   procedure  ThreadDoJob(const aHost:string; var aErrorMsg:string; var aIsJobDone:Boolean); var   ThreadJob:DoJob; begin   ThreadJob:=DoJob.Create(aHost,aErrorMsg,aIsJobDone);   aErrorMsg:=ThreadJob.ErrorMsg;   aIsJobDone:=ThreadJob.IsJobDone; end;   constructor DoJob.Create(const aHost:string; var aErrorMsg:string; var aIsJobDone:Boolean); begin   inherited Create(False);   FreeOnTerminate := True;   Self.Priority := tpLower;   fHost:=aHost; end;   destructor DoJob.Destroy; begin   inherited Destroy; end;   procedure DoJob.Execute; var   flg:Boolean; begin   flg:=true;  (*or FALSE just for fun*)     if flg then   begin     fIsJobDone:=TRUE;     fErrorMsg:='7777';   end   else   begin     fIsJobDone:=FALSE;     fErrorMsg:='6666';   end;   end.

прогнозируемо aErrorMsg:=ThreadJob.ErrorMsg; и aIsJobDone:=ThreadJob.IsJobDone; выводят "ничего" в выше стоящий код

Вопрос : как вывести результат работы потока в обработчики но без "Synchronize", трубы и прочего из той же оперы а через "property". если такое для потока вообще возможно. что то читал про OnTerminate но ничего канкретно применительно к "property" не нашлось.

[lmikle]

Есть подозрение, что просто код отрабатывает слишком быстро, просто не успевает. Никаких проблем с тем, что бы считать свойства из объекта потока нет (ну, за исключением безопасного доступа).
А с учетом, что у тебя еще и поток сам помирает... пока ты прочухиваешься, то и читать то уже нечего. У тебя же Execute заканчивается просто мгновенно.