From aadceee80f67f1173d86043b76a2a2967d7818b1 Mon Sep 17 00:00:00 2001 From: Daniele Teti Date: Tue, 4 Apr 2017 13:04:12 +0200 Subject: [PATCH] Adapted to the single file for StompClient --- sources/MVCFramework.MessagingController.pas | 3 +-- sources/MVCFramework.pas | 5 ++--- 2 files changed, 3 insertions(+), 5 deletions(-) diff --git a/sources/MVCFramework.MessagingController.pas b/sources/MVCFramework.MessagingController.pas index f668a87f..5d8358aa 100644 --- a/sources/MVCFramework.MessagingController.pas +++ b/sources/MVCFramework.MessagingController.pas @@ -36,8 +36,7 @@ uses MVCFramework.Commons, MVCFramework.Logger, MVCFramework.TypesAliases, - StompClient, - StompTypes; + StompClient; type diff --git a/sources/MVCFramework.pas b/sources/MVCFramework.pas index 50d412fe..7017a765 100644 --- a/sources/MVCFramework.pas +++ b/sources/MVCFramework.pas @@ -69,10 +69,9 @@ uses Web.Win.IsapiHTTP, Web.WebReq, LoggerPro, - StompTypes, IdGlobal, IdGlobalProtocols, - IdURI; + IdURI, StompClient; type @@ -2186,7 +2185,7 @@ begin begin try Stomp := GetNewStompClient(GetClientId); - Headers := StompUtils.NewHeaders.Add(TStompHeaders.NewPersistentHeader(True)); + Headers := StompUtils.NewHeaders.Add(StompUtils.NewPersistentHeader(True)); Stomp.Send(AMessage.SmTopic, Serializer(AContentType).SerializeObject(AMessage)); TThread.Sleep(100); finally