From bd3fb7771cdfdc61410fca905f4bd4d7ed9733f8 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Tue, 25 Mar 2014 10:19:15 +0000
Subject: [PATCH] Fix compiler warnings due to usage of deprecated AnsiStrings
 functions

---
 source/Plinkremote.pas | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/source/Plinkremote.pas b/source/Plinkremote.pas
index fdaf150c..c37fa6af 100644
--- a/source/Plinkremote.pas
+++ b/source/Plinkremote.pas
@@ -19,7 +19,7 @@ unit Plinkremote;
 interface
 
 uses
-  Windows, StrUtils, SysUtils, Classes, Controls, Forms, Dialogs, UPipeThread, gnugettext;
+  Windows, StrUtils, SysUtils, Classes, Controls, Forms, Dialogs, UPipeThread, gnugettext, AnsiStrings;
 
 const
   LINE_FEED = #10;
@@ -238,14 +238,14 @@ const cMaxLength = 255;
 var PText : PAnsiChar;
 begin
   Result:='';
-  PText:=AnsiStrAlloc(cMaxLength);
+  PText:=AnsiStrings.AnsiStrAlloc(cMaxLength);
   while AText <> '' do begin
-    StrPCopy(PText, copy(AText, 1, cMaxLength-1));
+    AnsiStrings.StrPCopy(PText, copy(AText, 1, cMaxLength-1));
     OemToAnsi(PText, PText);
-    Result:=Result + StrPas(PText);
+    Result:=Result + AnsiStrings.StrPas(PText);
     delete(AText, 1, cMaxLength-1);
   end;
-  StrDispose(PText);
+  AnsiStrings.StrDispose(PText);
 end;
 
 function TPlinkRemote.ReadPipe(const APipe: TPipe): String;