浏览代码

* fix difference between intf and imp

peter 21 年之前
父节点
当前提交
f831095743
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      fcl/db/dbase/Dbf_Common.pas

+ 1 - 1
fcl/db/dbase/Dbf_Common.pas

@@ -417,7 +417,7 @@ end;
 
 
 {$else}
 {$else}
 
 
-function SwapInt(const Value: Integer): Integer;
+function SwapInt(const Value: Cardinal): Cardinal;
 begin
 begin
   PByteArray(@Result)[0] := PByteArray(@Value)[3];
   PByteArray(@Result)[0] := PByteArray(@Value)[3];
   PByteArray(@Result)[1] := PByteArray(@Value)[2];
   PByteArray(@Result)[1] := PByteArray(@Value)[2];