Das ist alles ziemliches Neuland für mich.
Ich habe es zum Testen jetzt mal so versucht:
Delphi-Quellcode:
procedure tp;
procedure test;
var i:integer;
begin
for i:= 1
to 100
do form1.memo1.lines.add(inttostr(i));
end;
begin
tthread.Synchronize(
nil,test);
end;
Das ist die Thread-Prozedur.
ABer da gibt es die Meldung:
Zitat:
[Error] Unit1.pas(37): There is no overloaded version of 'Synchronize' that can be called with these arguments
Ein ganz kleines funktionierendes Beispiel wäre sehr nett!