From 3c22d97f8c0bab9fc214a3a3b36ab57ddc1bbfb2 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Tue, 23 Aug 2016 12:19:43 +0000
Subject: warning fixes

git-svn-id: http://svn.miranda-ng.org/main/trunk@17200 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/HistoryPlusPlus/hpp_externalgrid.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'plugins/HistoryPlusPlus/hpp_externalgrid.pas')

diff --git a/plugins/HistoryPlusPlus/hpp_externalgrid.pas b/plugins/HistoryPlusPlus/hpp_externalgrid.pas
index 2bf5dd6c8c..23f89e1934 100644
--- a/plugins/HistoryPlusPlus/hpp_externalgrid.pas
+++ b/plugins/HistoryPlusPlus/hpp_externalgrid.pas
@@ -107,8 +107,8 @@ type
     function IsFileEvent(Index: Integer): Boolean;
   protected
     procedure GridItemData(Sender: TObject; Index: Integer; var Item: THistoryItem);
-    procedure GridTranslateTime(Sender: TObject; Time: DWord; var Text: String);
-    procedure GridNameData(Sender: TObject; Index: Integer; var Name: String);
+    procedure GridTranslateTime(Sender: TObject; Time: DWord; var Text: AnsiString);
+    procedure GridNameData(Sender: TObject; Index: Integer; var Name: AnsiString);
     procedure GridProcessRichText(Sender: TObject; Handle: THandle; Item: Integer);
     procedure GridUrlClick(Sender: TObject; Item: Integer; URLText: String; Button: TMouseButton);
     procedure GridBookmarkClick(Sender: TObject; Item: Integer);
@@ -547,12 +547,12 @@ begin
   end;
 end;
 
-procedure TExternalGrid.GridTranslateTime(Sender: TObject; Time: DWord; var Text: String);
+procedure TExternalGrid.GridTranslateTime(Sender: TObject; Time: DWord; var Text: AnsiString);
 begin
   Text := TimestampToString(Time);
 end;
 
-procedure TExternalGrid.GridNameData(Sender: TObject; Index: Integer; var Name: String);
+procedure TExternalGrid.GridNameData(Sender: TObject; Index: Integer; var Name: AnsiString);
 begin
   if Name = '' then
   begin
-- 
cgit v1.2.3