社区
Delphi
帖子详情
快扒分!!!如何在DELPHI中改变DBF文件的第一个字节?
laowai
2000-08-28 08:01:00
...全文
105
5
打赏
收藏
快扒分!!!如何在DELPHI中改变DBF文件的第一个字节?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
laowai
2000-08-29
打赏
举报
回复
再问:那么如何将文件头第一个字符删去?
laowai
2000-08-29
打赏
举报
回复
上铺的兄弟:谢了。
Michaelyfj
2000-08-28
打赏
举报
回复
在窗体上放Edit1和Button1,Edit1只能输入一个字符,用以替换DBF的第一个字节。
程序如下:
procedure TForm1.Button1Click(Sender: TObject);
var
F : HFile;
ch : PChar;
begin
ch := pchar(Edit1.Text); //仅能输入一个字符(其实也可以是多个字节)
F := _lCreat('c:\money.dbf', 0); //创建读写文件,指定DBF文件的路径
_llseek(F, 0, FILE_BEGIN); //把指针移到文件头
_lwrite(F, ch, length(trim(Edit1.text))); //写入字符ch
_lClose(F); //关闭文件, 用debug可以查看是否修改成功
end;
哈哈哈哈哈哈...给分吧
laowai
2000-08-28
打赏
举报
回复
太好了。程序一到就给分。(刚才出去了一下,回复迟了,抱歉)。
Michaelyfj
2000-08-28
打赏
举报
回复
先删除DBF文件的第一个字节,把指针移到文件头,再写入要修改的字节。
要不要给你写个小程序?
delphi
通用函数单元一
{在一个字符串
中
查找某个字符串的位置} function StrNum(ShortStr:string;LongString:string):Integer; {测试通过} {* 返回某个字符串
中
某个字符串
中
出现的次数} function FindStr(ShortStr:String;LongStrIng:...
网管教程 从入门到精通软件篇.txt
Axx:ARJ压缩
文件
的
分
包序号
文件
,用于将一个大
文件
压至几个小的压缩包
中
(xx取01-99的数字) A3L:Authorware 3.x库
文件
A4L:Authorware 4.x库
文件
A5L:Authorware 5.x库
文件
A3M,A4M:Authorware Macintosh...
delphi
连接
DBF
delphi
连接
DBF
使用
DBF
文件
时,
文件
夹表示数据库,单个
DBF
文件
表示表 1、BDE,已淘汰 table1.Databasename:=dbdir;//设置库路径table1.TableName:=dbname; 2、ADO 1)用Microsoft jet4.0驱动字符串,...
Delphi
重建与删除Foxpro(
DBF
)数据库索引
文件
CDX
我发现
DBF
文件
数据的一个大秘密,因为要用到TBatchMove操作
DBF
文件
,需要使用索引,如果这个
DBF
文件
没有包含索引,可以使用下面的 SQL建立索引: create index 索引名 on "表名.
dbf
"(字段名); 但是如果这个
DBF
文件
已经...
股票
DBF
文件
格式
1、行情
文件
说明沪市行情
文件
show2003.
dbf
深市行情
文件
sjshq.
dbf
2、行情
文件
格式说明:(1)、表
文件
由头记录及数据记录组成。头记录定义该表的结构及与表相关的其他信息。数据记录紧接在头记录之后,包含字段
中
...
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章