说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎样解决打开一个DBF表时的Index not found..错误-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
怎样解决打开一个DBF表时的Index not found..错误-Delphi资料

当 你 创 建 一 个 DBF 表 时 , 如 果 使 用 了 MDX 格 式 的 索 引 文 件 , 那 么 DBF 表 的 表 头 中 的 某 个 字 节 就 自 动 被 设 置 了 一 个 标 志 , 当 你 下 次 试 图 重 新 打 开 这 个 DBF 表 的 时 候 , 数 据 引 擎 会 自 动 识 别 这 个 标 志 , 如 果 此 标 志 为 真 , 则 数 据 引 擎 将 试 图 打 开 相 应 的 MDX 文 件 , 当 相 应 的 MDX 文 件 不 存 在 时 , 错 误 就 产 生 了 。 知 道 了 问 题 产 生 的 原 因 , 解 决 方 案 也 就 有 了 : 我 们 只 需 将 那 个 标 志 字 节 ( 其 实 就 是 第 28 个 字 节 ) 设 为 零 就 行 了 。 下 面 为 示 范 代 码 :

unit Fixit;

interface

uses

SysUtils

WinTypes

WinProcs

Messages

Classes

Graphics

Controls

Forms

Dialogs

StdCtrls

DB

DBTables

Grids

DBGrids;

type

TForm1 = class(TForm)

Table1: TTable;

Button1: TButton;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.DFM}

const

TheTableDir = 'c:\temp\';

TheTableName = 'animals.dbf';

procedure RemoveMDXByte(dbFile: String);

{ 这 个 procedure 的 参 数 是 一 个 文 件 名 , 它 将 对 这 个 文 件 的 文 件 头 }

{ 进 行 处 理 , 以 确 保 它 不 在 需 要 MDX }

const

Value: Byte = 0;

var

F: File of byte;

begin

AssignFile(F

dbFile);

Reset(F);

Seek(F

28);

Write(F

Value);

CloseFile(F);

end;

procedure TForm1.Button1Click(Sender: TObject);

{ 此 procedure 将 试 图 打 开 一 个 表 , 如 果 相 应 的 .MDX 文 件 不 存 在 }

{ 将 对 表 文 件 进 行 处 理 并 尝 试 再 次 打 开 }

begin

try

{ 为 表 设 置 路 径 }

Table1.DatabaseName := TheTableDir;

{ 设 置 表 的 名 字 }

Table1.TableName := TheTableName;

{ 尝 试 打 开 表 }

Table1.Open;

except

on E:EDBEngineError do

{ 如 果 MDX 文 件 未 发 现 , 将 返 回 以 下 错 误 信 息 }

if Pos('Index does not exist. File'

E.Message)>0 then begin

{ 询 问 用 户 是 否 继 续 }

MessageDlg('MDX file not found. Attempting to open

without index.'

mtWarning

[mbOk]

0);

{ 从 表 头 中 移 去 相 应 标 志 }

RemoveMDXByte(TheTableDir + TheTableName);

{ 再 次 向 Button1 发 送 被 按 下 的 消 息 , 本 procedure 再 次 被 执 行 }

PostMessage(Button1.Handle

cn_Command

bn_Clicked

0);

end;

end;

end;

end.

VB的API编程精粹(一) VB调用API函数技巧快速选择全部项目 VB调用API函数使窗口保持在最上层 VB中调用Windows API的注意事项 VB中访问API函数之防错技巧 VB中利用API函数实现特殊窗体的两种方法 VB中用API函数实现文件夹列表 WIN32 API-VB资料 WIN32 API的分类介绍 -VB资料 Win95系统API函数大揭秘 作者:何发武 -VB资料 把图标放在WIN95的系统托盘中-VB资料 打开/关闭光驱门-VB资料 调用API函数设计ABOUT窗口 -VB资料 功能强大的SendMessage函数 -VB资料 简单计算函数的编写过程-VB资料 将文件大小变成相应的字符串-VB资料 可以直接用API改变textbox的扩展样式-VB资料 快速读取TextBox第N行的数据 -VB资料 VB利用 API 可以直接拨号 VB利用API 使Text框只读 VB利用API创建文件目录 VB利用API函数实现VB特殊窗体的两种方法 VB利用API函数实现无TittleBar窗体的移动 VB利用API在VB5.0中实现清除文档名 VB利用App.PrevInstance防止同一程序执行多次 VB判断应用程序是否仍在运行并设置焦点 巧用VISUAL BASIC的RND()函数 让你的程序不在任务栏中显示 -VB资料 VB如何不用API使文本框属性只读? VB如何从文件中提取图标 VB如何关闭/重新启动计算机? 哪位能给提供一套ISO文档的实例? 如果procedure中执行的是一条SQL语句,如何得到返回的数据集? 可不可以在单线乘里开2个SOCKET? 帮我看看这个c语言的程序! 怎样处理窗口标题? 高分求助 !!!怎样利用INTERNET实现异地多台机器互连? 很简单,如何得到当前的时间和日期?(在线等待) 请问哪里有用applet做的,能绘制数学曲线的动态演示系统?各位,请不吝赐教 今天大清早被人诅咒! Delete 多个表时一条语句怎样写?? 请教:如何获取文本框中SQL语句。50分 日期型的格式应该怎样写?? windows xp internet 浏览器的问题 大家帮我看看这段代码:它是如何得到name和phone的值,并写到文件中取得 100分求李维的delphi5.x分布式系统开发的源代码,电子书我已经有 奇怪。为何win2000的搜索选项中的日期控件是Delphi中的样式?欢迎来讨论,给分!!! 请教一个数据库查询的问题! 哥、姐帮帮小第,一生成并打印表格问题(有图片及字体适应),急急,十万火急。 怎样在ASP.NET的页面中,把DataGrid的表头改名??急急急!!! 在线求教:怎样在自己定义的函数里封装自己的MouseMove类??? (高手求救………100分)怎么样用socket(http)实现上载!请提供思路或source code! 怎样调用Dll中导出的变量??? 那位大哥有关于颜色渐变的算法的代码,给小弟一份 小弟万分感谢 颜色渐变的算法 颜色渐变的算法 问一个有关缓存的问题 更换基类的问题? 感谢上学期大家的帮助——散分 一个奇怪的问题,100在线送给你!!! 用rave生成的pdf格式报表,中文字符怎么是乱码? 请进来: windows 2000 能不能用API的方式将Imagelist中的图画在命令按钮(Commandbutton)上? 请各位指点怎么从SQL65升级到7,还有数据备份?请大侠指点迷津? 请问如何解决.exe文件在其他机器上的运行问题 允许DBGrid对记录进行编辑,在线等待,急急急~ 如何在vb.net定义失去焦点事件? 如何读出文章中的部分内容(在线等待) 怎么样在VB中实现象PING -A命令 有没有一个更好的论坛????????????????????有没有人来踢馆?????????????????????????????? 如何访问隐藏共享的硬盘 请大家评评,先谢了 一个有趣的问题: 慢的问题 我在windows下的FormInput里有多个sqlDataAdapter 数据几百条 DataSET.fill慢及了 如何返回当前程序目录的上一级目录? EA,你给我进来,你又欺负我MM啦? 请问PB的DATA window如何实现分页? 关于pb中我在sqlserver中定义的字段类型是varchar(1000),结果在做数据窗口时它总是自动截取为char(255),为什么?如何解决这个问题(除了 IIS出错了,凡是需要数据库的asp程序在执行时出错: 关于下三角矩阵压缩存储问题 求免费下载电影电视剧的FTP站点 模块实现 数据表转换问题. 请帮帮忙. 十月革命前的俄罗斯法的特点 社会主义国家土地制度都是公有制吗?世界上采取土地公有制的国家都是有哪些? 验证Cu2+离子 酸雨作为全球性环境问题之一,请问主要由哪一种气体的排放引起 新中国成立到人民公社化之间的这段时期,土地是私有制还是公有制1949—1962这段时期实行的农村合作社,是土地公有还是私有? O2、SO2、HCl的氧化性顺序及排序的依据是什么? 有关滑轮组的问题我们老师说,这个滑轮组的动滑轮受力方向是下面这样的,为什么?上面的不对吗? 谁有初中语文教学用书? SO2 使品红褪色是利用氧化性还是漂白性?Hcl 滑轮组的题怎么做? 我国现在的土地制度是公有制还是私有制分界线是什么? 人民公社是什么年代 为知道金属丝电阻的大小,小明用铭牌为20欧1A滑动变阻器和金属丝,电流表串联接入电路,请写出测电阻的主要并金属丝电阻的表达式. "井底之蛙"这个成语大家都很熟悉吧?你能解释为什么"坐井观天,所见甚小"吗?你能根据光的直线传播原理画图来说明吗?第2问可不答 人民公社时期农村生产怎样的状况?说错了、是“遍哨子不买账,二遍哨子伸头望,三遍哨子慢慢晃”反映了当时农村生产怎样的状况?其主要原因是什么?、 如图所示(两根绳子系着动滑轮的),工人用滑轮组在5秒内把重80N的物体匀速提高2m,克服绳重及绳与滑轮间摩擦过程中做了10J的额外功,每个滑轮重15N,则A.拉力F的大小为47.5N B.滑轮组的机械效 关于光线的物理题在水平版上竖直插上一把直尺,选一个有太阳光的地方,每过半个小时(中午12点左右时,每过15分钟),在直尺影子的顶端做一个记号并量出影长,找出一天中影长最短的时刻怎 人民公社是什么东东?谁想出来的? 滑轮组的问题定滑轮动滑轮都懂 但是看不懂滑轮组比如这个怎么看拉力是物体重的几分之几求教判断方法以此为例 物理题,光线光线垂直射到镜面上时,入射角为( ),反射角为( ),入射角和反射角的夹角是( ),反射光线的方向改变了多少? 人民公社存在多长时间? 滑轮组第四题 关于光线的一束红光与一束蓝光共同照射在同一个点,那点反射出来的光是什么颜色的?红,绿,蓝三种光束共同照射在同一个点,那反射出来的是白光吗? 二氧化硫对植物的伤害极大.将四棵生长状况都良好、大小相似、品种相同的植物分别放入以下的四种环境中,如果四种环境中的二氧化硫的浓度相同,你认为下列哪种情况下植物受到的伤害最 酸雨作为全球性环境问题之一,主要由哪一种气体的排放引起? so2将直接危害高等植物的什么组织 以下四种东西,哪种与碱反应会生成氨气A NO3B NHO3C NH2OD N2H4O3 1.能引起温室效应的气体是 2.会引起酸雨的气体是氧气 氮气 二氧化碳 二氧化硫四个选项都要填入 空气净化器对pm2.5有用么 请教旅游从业者,什么是生态旅游? 世界反法西斯战争是胜利的原因概括性,精辟 问一道关于滑轮组的题目用滑轮组竖直提起重物,若用80N的拉力使320N的物体上升0.3m,拉力移动的距离是1.5m,求:1.该滑轮组中动滑轮的总重力(不计摩擦和绳重)2.若被提升的物体重力增加了100 生态旅游的意义是什么? 世界反法西斯战争取得胜利的根本原因是? 一道关于滑轮组的科学题目.如图,重为800牛的物体A在F=50牛的拉力作用下,以20厘米每秒的速度在水平面上做匀速直线运动,若滑轮组的机械效率为80%,求5秒内拉力做功多少?物体收到水平地 忐忑不安, 世界反法西斯战争胜利是哪一年? 关于滑轮组的一道科学题目一个滑轮组,动滑轮由2股绳子承担,工人师傅用500N的力,在100秒内把800N的重物匀速提升10米,A、他做的有用功是8000WB、他做的总功是1000JC、他做功的功率是80WD、滑轮 为什么明朝起义的是农民阶级的李自成,不是资产阶级呢为什么张居正会这么早死呢. 世界反法西斯战争胜利的决定性因素 一道关于滑轮组的题设计一个滑轮组,使拉力是物重G的1/3,人的拉力方向向下,要求所用的滑轮个数最少(不计算滑轮重的摩擦) 什么是生态旅游? Fe和硝酸铁 人民公社产生的影响? 如何在贵州发展生态旅游,1什么是生态旅游.2为什么要发展生态旅游 滑轮组的试题 一台起重机将重1.5×10的4次方N的钢材竖直匀速提升4m,用时10s.求:(1)起重机拉力做的功 (2)起重机拉力做功的功率. 为什么只能用水对反应堆进行降温?不能用干冰、液氮之类低温的东西么?是会起反应还是其他原因? 人静止在地球表面上受不受摩擦力 大气中的二氧化硫直接危害陆高等植物( )组织. 氨气和什么生成HCL 滑轮组的题题不计滑轮自重,要想站在地面上用250N的力提升起600N的重物,至少需要用几个滑轮?怎样绕绳?二楼的,最后的力是向上的,题上说是站在地面力应该向下拉??是吧?那该怎么办? 人民公社哪里好? 什么反应生成氨气求助:一般怎样的反应类型生成氨气的啊?有什么规律吗?把总结性的化学方程式写出来啊!最好配上几个例子! ------------初中化学! 爬树时,人受到的摩擦力,与地球重力相反方向的摩擦力是说成地球的摩擦力还是与树产生的摩擦力? 深思与沉思的区别 什么与水缓慢作用生成氨气化合物A与水缓慢作用生成氨气和化合物M,其中化合物A只含两种元素.请问A和M分别是什么? 关于十月革命前的俄国1.十月革命前夕的俄国是各种矛盾的集合体,对此理解准确的一组是( ) ①垄断资产阶级和无产阶级 ②沙皇专制与人民大众 ③大俄罗斯民族与少数民族 ④俄帝国主义 第一次世界大战卷入国? 沉思与深思的区别 李肇星曾母暗沙泡澡宣示主权日欲解禁武器出口 妄图“一箭三雕”美国57万人联名上书抗议情报监控(图查尔斯的阿Q精神?中国游客成韩免税店最大主顾法一残障人士欲跳伞飞越珠峰调查发现60%的杭州家长认为孩子学习杭州连晴日子灰霾难散 几乎天天轻度污杭州错时停车推行5年难度越来越大西湖5处码头装避雷针 外包仿真藤青灰杭州本周上半周晴天下半周进入阴雨模式杭州近期昼夜温差超10℃ 早晚记得添意大利女画家作品武汉展出 观众:口味安倍要当亚洲反华“舵手” 借阅兵喊展安倍:为世界贡献途径之一是在亚洲抗衡外媒解读三中全会中国即将进行广泛改革中日学者激烈交锋 钓鱼岛问题差异难以日媒曝美国曾向日本求助“监听中国光缆德媒爆出内幕:默克尔电话2002年就美媒:美是全球不多的超级大国 不得不美媒:安倍把日本带向一个不屈服于美国老师,她们在偷吃禁果你管不管美妆达人抵制网上恶评 化“半脸妆”走早知道塑料瓶养花种菜这么爽,还买什么身为 QQ 最顶级的会员是怎样一种体必须给冰版武则天差评的21个理由,不上市公司26日午间重大公告一览--更最值得去的N个艳遇之城券商:电力国企改革预期增强 7股共享吃药有4个规定动作,一个也不能省略快讯:传化股份200亿购大股东资产 到底是买房还是租房,帮你算算15年后下周一机构强推买入 4股极度低估暖男,你热到我了一带一路概念活跃 中国交建盘中冲击涨西藏,一场灵魂的邂逅武汉:3家银行首套房9.5折 优惠利女大学生晚上看恐怖视频 当场吓出急性HomeSquare第六届“香港家居快失传的69种折纸,太宝贵了,果断留穆迪埃:CBA是正确的选择,我爱中国如何找到并搞定天使投资人?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘