diff options
| author | George Hazan <ghazan@miranda.im> | 2019-05-20 19:46:24 +0300 |
|---|---|---|
| committer | George Hazan <ghazan@miranda.im> | 2019-05-20 19:46:24 +0300 |
| commit | 6446d406dd937877c3a9aa32e86ab82c2781096d (patch) | |
| tree | 252ddc99e91c9a2a0b5534e889c66646c7fd74d7 | |
| parent | bdfd8fcf4cace7d404562523ac6ded338873bc5f (diff) | |
another crutch for Delphi
| -rw-r--r-- | plugins/HistoryPlusPlus/HistoryGrid.pas | 5 |
1 files changed, 4 insertions, 1 deletions
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;
|