Kaynağa Gözat

+ Fixed 64-bit compilation

git-svn-id: trunk@4840 -
michael 19 yıl önce
ebeveyn
işleme
2346cbeeaa
1 değiştirilmiş dosya ile 2 ekleme ve 1 silme
  1. 2 1
      fcl/db/memds/memds.pp

+ 2 - 1
fcl/db/memds/memds.pp

@@ -813,7 +813,8 @@ end;
 
 procedure TMemDataset.CreateTable;
 var
-  i, iSize : Longint;
+  i : Longint;
+  iSize : ptrint;
 begin
   FStream.Clear;
   FRecCount:=0;