Метка: Convenient

Простой способ использовать потоки в Delphi. С synchronize всё просто, если использовать его правильно 🙂 Содержимое функции [code lang=»delphi»] uses System.Classes, System.SysUtils, Vcl.Forms; procedure Wait(Proc: TProc); var Thread: TThread; begin Thread := TThread.CreateAnonymousThread(procedure() begin Proc; end); Thread.FreeOnTerminate := True; Thread.Start;…