の値を変更するモソドを呼び出すことによって、OnChange
のイベントを介してスレッドから応答を取得するのは正しい方法ですか?Editbox
synchronize
Editbox
このようなもの :
//Extra Thread
procedure HThread.Execute;
begin
Synchronize(CallGUI);
end;
procedure HThread.CallGUI;
begin
Edit.Text = 'Hello';
end;
//Main Thread
procedure Main;
begin
Tr := HThread.Create(true);
Tr.Edit := Form1.Edit1;
Tr.Resume;
end;
procedure TForm1.Edit1Change(Sender: TObject);
begin
ShowMessage('Response from extra thread :' + Edit1.text);
end;