Delphi-PRAXiS - Delphi synchronize

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi synchronize (https://www.delphipraxis.net/3039-synchronize.html)

Hallo!

In einem Thread kann ich über synchronize eine procedure aufrufen:

Code:

			procedure MyThread.Test();

begin

Form1.Anzeigen.Lines.Add('Thread schreibt');

end;

...

synchronize(Test);

Soweit so gut! Wenn ich nun aber einen Wert mitliefern möchte:

Code:

			procedure MyThread.Test(input: String);

begin

Form1.Anzeigen.Lines.Add(input);

end;

...

synchronize(Test('Thread schreibt'));

dann bekomme ich die Fehlermeldung:

Zitat:

[Fehler] ServerHandle.pas(88): Inkompatible Typen: 'TThreadMethod' und 'procedure, untyped pointer or untyped parameter'

Kann mir da jemand weiterhelfen?

Geht nicht mit Synchronize. Am besten ist es wohl, wenn Du Dir einfach eine Klassenvariable (z.B. FText: string) anlegst, den Wert dort speicherst, dann Synchronize aufruft und in TMyThread.Test wieder auf FText zugreifst.

...:cat:...