From 6446d406dd937877c3a9aa32e86ab82c2781096d Mon Sep 17 00:00:00 2001
From: George Hazan <ghazan@miranda.im>
Date: Mon, 20 May 2019 19:46:24 +0300
Subject: another crutch for Delphi

---
 plugins/HistoryPlusPlus/HistoryGrid.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/plugins/HistoryPlusPlus/HistoryGrid.pas b/plugins/HistoryPlusPlus/HistoryGrid.pas
index e4a197d95e..5e89117773 100644
--- a/plugins/HistoryPlusPlus/HistoryGrid.pas
+++ b/plugins/HistoryPlusPlus/HistoryGrid.pas
@@ -4780,8 +4780,11 @@ var
   end;
 
   procedure SaveUnicode;
+  var
+    Start: AnsiString;
   begin
-    WriteString(Stream, #255#254);
+    Start := #255#254;
+    Stream.Write(Start[1], 2);
     WriteWideString(Stream, '###'#13#10);
     if Caption = '' then
       Caption := TxtHistExport;
-- 
cgit v1.2.3