hmmm.... also doch aber die Methode wird ja nicht vom
VCL Thread gestartet..
so in etwa.
Delphi-Quellcode:
TmeinProc = Procedure(paramater : string) of object;
TMeinThread=class(TThread)
private
fmeinProc : TmeinProc;
public
procedure irgendwas;
property OnMeinProc : TmeinProc read fmeinProc write fmeinProc;
end;
//...
procedure TmeinThread.irgendwas;
begin
fmeinProc('text'); <- Synchronize ???
end;
//.. in der main
TfrmMain = class(TForm)
//...
public
procedure MeinProc(paramater : string);
end;
Procedure TfrmMain.Formcreate;
begin
fMeinThread.OnMeinProc = MeinProc;
end;