Forum: Cross-Platform-Entwicklung
by Rollo62,
13. Jan 2021
Das einmal in eine Klasse/Funktion zuverpacken würde reichen,
so machen es die _Sync Methoden auch.
Mal so hingekritzelt als Funktion ...
So müsste das eigentlich funktionieren (Tippfehler ausgenommen).
procedure MyDlg_Message(const AMessage: string;
const ADialogType: TMsgDlgType;
const AButtons: TMsgDlgButtons;
Forum: Cross-Platform-Entwicklung
by Rollo62,
13. Jan 2021
Warum nicht mit anonymer Methode, verstehe ich nicht ?
Mach ich mittlerweile nur noch so.
Wenn Du unbedingt blockieren willst, dann vielleicht mit TEvent, der dann in der anonymen Methode ein Signal gibt.
http://docwiki.embarcadero.com/Libraries/Sydney/de/System.SyncObjs.THandleObject.WaitFor
Das geht ja auch ohne Threads.