Delphi 和Foxpro整合实现txt和dbf互相转换
2010-03-24 15:52
218 查看
[b][b][b][b][b][b][b]本文为原创,如需转载,请注明作者和出处,谢谢!
[/b]
[/b]
[/b]
[/b]
[/b]
[/b]
[/b]
最近做个程序,需要将dbf和文本文件互相转换,也就是将dbf按表结构将字段和数据导成txt文件,再将txt文件导入其他的dbf表中。在foxpro中完成这些工作简直太容易了,但很多功能必须用delphi实现。虽然可以用foxpro做个小程序,然后再用delphi调用,但比较麻
烦。因此,可以用Delphi通过调用Com组件的方式直接执行foxpro命令来实现,代码如下:
var
foxpro:olevariant;
begin
foxPro:
=
CreateOleObject(
'
VisualFoxPro.Application
'
);
foxPro.DoCmd(
'
USE d:/student.dbf
'
);
foxPro.DoCmd(
'
copy to d:/student.txt delimited with tab
'
);
foxPro.Quit;
foxPro:
=
Unassigned;
上面的代码是将student.dbf文件导出到student.txt文件。如果想导入,可以使用append命令,如下所示:
append
from d:/student.txt type sdf
还想做什么,就看需求了。但不管做什么,只要在foxpro命令窗口可执行的命令,通过这种方式都可以执
行。使用createoleobject函数需要使用comobj单元。
相关文章推荐
- Delphi实现操作Foxpro的dbf文件,并导出整合实现txt和dbf互相转换
- Delphi和Foxpro整合实现txt和dbf互相转换
- dbf转换到excel,改数据后---转txt 然后又foxpro导入为dbf格式,但是有点问题!
- 用ADO.NET实现txt与Excel的互相转换
- Delphi实现MP3 互相转换 WAV (无需任何第三方dll)
- DOM文档操作和XML文件互相转换的java实现
- 使用XStream注解实现Java对象与XML互相转换的代码示例
- 通过java实现txt,ppt,pdf上传之后转换为swf文件的功能实现
- JS实现unicode和UTF-8之间的互相转换互转
- linux下 date命令实现 日期与时间戳互相转换
- JAXB 实现java对象与xml之间互相转换(一)
- java 中jaxb实现对象到xml互相转换
- shell 实现txt转换成html
- Delphi Transform TreeNode&XMLNode,树型框与XML互相加载转换
- Flex中利用ByteArray与BitmapData互相转换实现图片的二进制保存与复原[转]
- 使用XStream注解实现Java对象与XML互相转换的代码示例---转自:http://www.blogjava.net/bolo
- C语言简单实现进制互相转换
- Android中文简体繁体互相转换的实现(繁简互转)
- 利用opencv2和c++实现视频与图像的互相转换
- 两行Python代码实现IP地址与十进制整数互相转换