Einzelnen Beitrag anzeigen

Rollo62

Registriert seit: 15. Mär 2007
4.116 Beiträge
 
Delphi 12 Athens
 
#10

AW: TMessageManager/SendMessage

  Alt 10. Jan 2020, 16:21
Delphi-Quellcode:
  // in TTask.Run
  //

  ...
  LTxt := xNode.Text;

  TThread.Queue(
    nil,
    procedure
    begin
         TMessageManager.DefaultManager.SendMessage(nil, TMessage<UnicodeString>.Create(LTxt) );
    end);

   ...
  Mit Zitat antworten Zitat