如何用Delphi4.0直接连接foxpro25(100分)

  • 主题发起人 主题发起人 hql
  • 开始时间 开始时间
H

hql

Unregistered / Unconfirmed
GUEST, unregistred user!
如何用Delphi直接连接foxpro25?
不通过ODBC.
 
Delphi3 下没问题,D4还没试过.
 
OK,Delphi3直接用Standard驱动(paradox)可以搞定。
想必Delphi4中也可以。
 
Delphi4中基本没有问题。请教有时会提示索引不匹配?
 
多谢dwang,zouqing.

再问一个:Foxpro是否不能建索引?
若建了,如何在程序中去掉?
 
procedure ClearDBFIndexFlag(fn: string); // *.dbf
var ff:file;
bb:char;
begin
{$I-}
assignFile(ff, fn);
reset(ff,1);
seek(ff, 28);
bb:=#0;
blockwrite(ff, bb, 1);
blockwrite(ff, bb, 1);
close(ff);
fn := ChangeFileExt(fn, '.cdx');
if FileExists(fn) then Deletefile(fn);
fn := ChangeFileExt(fn, '.mdx');
if FileExists(fn) then Deletefile(fn);
{$I+}
end;
 
这要看您的BDE的版本,BDE4.51以上都可以很好的支持,关键是在
BDE Administrator 中将Foxpro驱动level设为25,然后为您的Alias中的DEFAULT
DRIVER 设为foxpro即可,如果您的BDE不是4。51或以上版本,请从inprise下载,
 
用halsyon 6.02组件,他能跳过bde直接支持foxprox2,我试用了一下,感觉不错。
 
多人接受答案了。
 
后退
顶部