From 52673c6b806582ea9bdce4793557c434fc022374 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 29 Jan 2009 16:09:23 +0000
Subject: [PATCH] fix compile in for AMD64 - fix from Ivah Shihalev

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@689 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/rxlookup.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/rx/rxlookup.pas b/components/rx/rxlookup.pas
index 326a22c6c..f2de79bb5 100644
--- a/components/rx/rxlookup.pas
+++ b/components/rx/rxlookup.pas
@@ -923,7 +923,7 @@ begin
       begin
         F:=FLookupDataLink.DataSet.FieldByName(FFieldList[i]);
         k:=FValuesList.Add(F.DisplayText);
-        FValuesList.Objects[k]:=TObject(F.DisplayWidth);
+        FValuesList.Objects[k]:=TObject(PtrInt(F.DisplayWidth));
       end;
   end;
 end;