From 975c2eac17654cb1f53040200d639411666cc00c Mon Sep 17 00:00:00 2001 From: blikblum Date: Thu, 7 Jan 2010 15:38:32 +0000 Subject: [PATCH] * Fix compilation under non win32 and fpc 240 git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1120 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/virtualtreeview-new/trunk/VirtualTrees.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/virtualtreeview-new/trunk/VirtualTrees.pas b/components/virtualtreeview-new/trunk/VirtualTrees.pas index b400f1b91..e3cddba05 100644 --- a/components/virtualtreeview-new/trunk/VirtualTrees.pas +++ b/components/virtualtreeview-new/trunk/VirtualTrees.pas @@ -4697,7 +4697,7 @@ begin end; Len := Length(Result) - Length(LineEnding); - if CompareByte(Result[Len + 1], LineEnding, Length(LineEnding)) = 0 then + if CompareByte(Result[Len + 1], String(LineEnding)[1], Length(LineEnding)) = 0 then SetLength(Result, Len); end;