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

解决一个DBF表时的"Index not found.."错误-Delphi资料

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

怎样解决打开一个DBF表时的"Index not found.."的错误

当 你 创 建 一 个 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.

即将到来的数据中心僵尸末日,谁能成为最后的幸存者?! Andorid APK反逆向解决方案:梆梆加固原理探寻 科技拥抱设计:体验设计如何创新? Rails 4.0正式发布 命途多舛的webOS,两度易主,生生死死多少回 Citrix全面开源XenServer 为了三十亿人的网络幸福:Google投资O3b发射网络卫星 Windows 8.1中IE 11开始支持WebGL和SPDY/3 微软Build 2013开发者大会:盘点Windows 8.1的15个重大更新 瞧!这是摩托罗拉移动新Logo,你有什么感觉? 专访UEditor创始人战毅:打造最佳的用户编辑体验 Eclipse 4.3 正式版发布 代号Kepler 为兴趣而生 七大编程挑战项目,你敢来吗? iOS 7辅助功能:左右摇头控制iOS设备 挑战传统关系型数据库:Facebook图形数据库TAO揭秘 揭秘“棱镜计划”幕后的技术 你更新了吗?Visual Studio 2013 Preview和.NET 4.5.1同时发布 你主要使用什么编程语言? 跨平台游戏开发工具App Game Kit或将新增更多强悍功能 移动应用推广的那些事儿:应用发现篇 DDoS攻击也能成为一种云计算服务 Netflix开源Hadoop集群调度工具:日处理近万作业、上千TB数据 传谷歌正开发自己的视频游戏主机和智能手表 AMD APU战略转型:全民四核,发力“云+端” 富士康自主研发智能手表 惹苹果发来订单 开发者眼中的iOS 7:重设计过程没想象中那么糟 游戏引擎Unity宣布免费支持Windows Phone 8及Xbox One 蝉游记王益善专访:7人小团队实现App 30万下载量 去除IE 10广告的两种方法 直接拿来用!最火前端开源项目(二) 工作变得简单又高效 试试这八个WebApp JBuilder7.0在Linux下的中文支持? 高分求救(急),在线等,请高手帮忙 一次最多只能给100分。 Apache2.0.46与tomcat-4.1.24整合问题 各位来看一下我写的这点东西,能不能找到个工作呀 比较一下:C++primer The C++ programming language 和 thinking in C++。不要只说那本好,只看过一本也近来说说看法!! 高手来帮助我阿 浏览器隐藏问题! 那位给我一个用 C# 操控注册表的详细例子或说明…… 已经辞掉了版主职务了,一个星期没有上网,这回散点分给大家. 有没有变量可以存储任何类型的图片对象? Exchange 2000 Lotus connector 大侠帮帮我! XP内存消耗问题 为什么SQL存储过程在SQL QUERY ANALYZY可以顺利执行完一个从1到1500的循环,而在PB7.0中调用时却... 如何设置按钮控制程序运行,具体看贴 网页图片显示问题(急,帮帮忙哦,在线等!) 请问一个关于visual studio.net的问题 在线求解,很急,谢谢 程序是SQL Server2000+Delphi6的三层结构,打包问题,大侠请帮忙!(200) ¥¥火星人都不会的问题!巨难!欢迎各位! 这里有没有兄弟写过“万邦“图形采集(winbond)的应用程序没有 关于输入法 为什么ASP页面关闭后,session中的值还存在呢? 到底有没有官方出的VS6.0中文版?? 请问怎样给一个buffer中所有数据清0 test 数据采集问题,高手指教!!!急 为何我修改了打印纸尺寸但不起作用? 请问大家现在MCSE的题目变了没有啊? 共同学习 高人指点一下 DataGrid如何实现如下功能? 如何在图片框中按鼠标时知道当前鼠标在图片框中的坐标?谢谢! 【骂人】destroy(只想灌的爽)进来 散分~~~~前5名!谢~ 请教两个问题,专家请进! 请问在什么地方可以找的计算机方面的中英文对照翻译? Dll向主窗口发送自定义消息? 如何用MoveWindow()和SetWindowPos()来改变窗口大小(最好有个例子)! script参数怎样传输到applet中 怎样把jpg转换位BMP,在线急等 我要开放mssql的访问,在防火墙中是不是只要开放1433端口就可以了? 外面买的2000安装盘有的里面只有一个程序,叫什么ghost,好象运行它后就可以非常快的安装2000,请问这个ghost是用哪个软件做的? 系统初始化把所有数据库里面的内容删除,保留表的结构,这是怎么实现的? 如何将AnsiString转换成LPCWSTR? 我想请问一下,当panel显示时如果下面有<select >控件是,这个控件不被盖住,结果好象panel破了下一样,请问题怎么办!谢谢 如何把这个程序转换成java程序,我够菜的:( 高分请教如何实现本地网址过滤?就好像反黄软件,或公安的监控软件一样。 又有问题了 谁能贴一个关于TQUERY,TTABLE等控件的数据库应用的详细使用 西游记 取到经书后他们各得到什么称号? 二次函数y=2x^2的图像的对称轴是? 已知向量a=(cos1.5x,sin1.5x),b=(cos0.5x,-sin0.5x)且x在0—90度之间 求a+b向量的模 光子是假想的吗?是否存在都说光子是没有质量的,一想确实合理,毕竟w=Fs,钥匙光子有质量,那随便开个灯动能都是很大的,但是既然这样又为什么要引入这个概念呢 函数y=cos(2x+π/3)图像的对称轴可能是?A.x=-π/6 B.x=-π/12 C.x=π/6 D.x=π/12 已知向量a=(cos1.5x,sin1.5x),b=(cos0.5x,-sin0.5x),x∈【-π/2,π/2】,若|a+b|=1已知向量a=(cos1.5x,sin1.5x),b=(cos0.5x,-sin0.5x),x∈【-π/2,π/2】,若|a+b|=1 /3,求cosx的值。 光子是怎样存在的?是一种介子吗? 不同组织中的氢原子在1.5T的磁共振机中进动频率是否相同?人体不同组织中的氢原子在1.5T磁共振机器中静止场强下进动频率是否相同?我的意思是说:我们磁共振检查时是研究氢原子,那么 已译,请判断对错:A problem with the language of signs is that it is not clear and exact问题是手语并不是那么清洗和准确清晰和准确.请判断句子的对错和翻译的对错 lucy and lily have opposite views and i___ .lucy likes staying in and reading ,but lily likes going out and meeting people. 请问司马迁跟司马光是什么关系 求推荐含有描述Nuclear quadrupole resonance spectroscopy(NQR)章节的英文著作.除介绍1D以外,还有简要介绍2D的更佳 等比数列数列中s3=16 s6=14 求s4为什么s3 比s6 等比数列,我算下来q大于0啊谁再给推下 USB数据线上的小圆柱体的工作原理? 凸透镜:“呈虚像时,物体离凸透镜越近像越大”这句话是错的.为什么错? 电机的功率2200w-S3 USB连接线上的圆柱体是用来干吗的?貌似很有用的样子 成虚像时物体离凸透镜越近像越大是否正确 光子到底是不是实体?高中物理书上提到了康普顿效应.“光子有动量,和实物粒子一样”这是书上的原话.它暗示了光子有质量吗?(p = m*v)但是《时间简史》上说"as an object approaches the speed of li 怎么有些键盘连接线上有一圆柱体的东西? 请大家给我讲讲这个物理概念.第1个是 l1 并联(上到下)l2 l3 最右的l4 几题高一数学竞赛的平面几何题1 在RT△ABC的斜边BC上取一点D,使△ABD和△ACD的内切圆相等,证明:S △ABC=AD^2.2 设l使经过△ABC的顶点C且与AB平行的一条直线.∠A的平分线与BC边交于D,与l交于E,∠B 数据线上的那个圆柱体的是什么 co32-化学中文是什么意思 一个正n边形,求共有几条对称轴?急答的好,我加20悬赏分!务必认真! 一道平面几何题高一四棱锥P-ABCD,四边形ABCD是角DAB为60°的菱形,侧面PAD为正三角形,其所在平面垂直底面ABCD,G是AD边中点1.求证BG垂直面PAD2.求证AD垂直PB3.若E为BC边中点,F为PC边中点.求证平面DEF垂 有没有人叫我一下怎么乳交啊?我胸部比较小 正N边形有多少条对称轴 光子真是存在吗 已知圆X²+y²=8内有一点M(-1,2),AB为经过点M且倾斜角为α的弦(1)当α=3/4π 时,求弦AB的长(2)当弦AB被点M平分时,求直线AB的方程 一个正n边形有几条对称轴? 高一平面几何问题两个命题其中有一个是错的错的请举出反例1 若平面内不存在与直线a垂直的直线,那么a平行于平面2 若一条直线与两个平面的交线平行,则这条直线至少和这两个平面中的一 mathematica如何在一个随机的球体上随机生成三个点? 安然长逝的意思 一道高一平面几何题如图,AB是圆O的直径,C是圆周上不同于A,B的任意一点,PA⊥平面ABC,则四面体P-ABC的四个面中,直角三角形的个数有( )A、4个 B、3个 C、2个 D、1个 鸡胚蛋能吃吗? 核弹暴-炸时的蘑菇云是怎样形成的拜托各位大神是所有物体暴-炸(只要能量足够)都能形成的吗?原-子弹和氢-弹暴炸的蘑菇云有什么不同?为什么会产生不同? 辨析:中国革命道路理论对马克思中国化具有方法论意义. 求y=cos2x的对称轴与对称中心、、 什么是"爱"给我举例子说明? 辨析:只要有革命批判精神和创新意识,就一定能推动社会的进步和发展. -cos2x=y 如何求对称轴 ★“小鹿乱撞”是何意?是用来形容什么的?举几个例子说明!★♥ ♥ ♥ ♥ ♥ 电源适配器尾部 有一个大粗圆柱体是干什么用的 cos2x如何求对称轴?y=cos2x 致女儿的信故事为什么把男女爱情放在五十多年表现说明什么 圆柱体的粗是什么 求“浅谈沃尔玛对中国零售业的启示”的论文提纲 月字旁加个宾是什么字? 如果两个小圆柱体可以拼成一个大圆柱体,那么这两个小圆柱体的底面积一定相等,高也一定相等这句话对吗? 索尼Z1这手机咋样?以前用过索尼的1300万的像素感觉好差连我的诺基亚500万像素都不如,还有就是屏幕也怪怪的.那Z1会不会有这些情况?会不会屎黄屏幕.港版和国行的Z1有啥区别?听说哪个版本的 日字旁一个宾有这个字么 某物质的化学式为HnMO2n,其式量是A,则M的相对原子质量是(),M的化合价(),当M的化合价不变时,其氧化其氧化物的化学式为什么 在1一36个小球中,每个小球表上1到36的数字,随机抽取,1--12为第一组,13--24为第二组,25--36为第三组,那么随机抽取一个数字为9,他为第一组,试问下一次随机抽取为第一组数字的概率是多少呢? 宾字加个王字旁怎么打那个宾字五笔怎么打? 一道物理竞赛题答对追加分匀质杆AB直立于光滑水平面上,稍受扰动杆将倾倒,A断在水平面滑动,求B点的轨迹,设杆长为2l.如图 什么是狗头镜? 西游记中经书落水后在哪里将经书晒干 第五题3,最好陪图和对称轴 刚化蛋有什么好处,都有什么营养? 叙利亚中部城市发生自杀式炸弹袭击 致数万伊朗抗议者举行“占领美国使馆”集法国两名记者马里遇害 已有多名嫌疑人2013年11月4日外交部发言人洪磊外交部:巴基斯坦的主权和领土完整应当厦门远华“红楼”被辟为职工服务中心英一男子身着纳粹党卫军军装购物 自称安倍明年1月将访非洲三国 日媒称意在辩论失利令其信心受挫 新书披露奥巴马新华国际时评:克里七访中东难抚盟友传承文化 筑梦非洲——访非洲国际艺术采二幼钱新园区大班段举行水墨画展采二幼钱新园区大班段参观消防中队活动市妇保院来钱新园区做卫生工作的考核及报告称超4成海归在京就业 近半数进入安倍2014年1月将访问非洲三国 意叙利亚中部城市发生自杀式炸弹袭击 致数万伊朗抗议者举行“占领美国使馆”集美国大学招生出怪题:是否愿选择外星人美大西洋南岸野生海虾因感染寄生虫数量埃及前总统穆尔西受审 律师相信其将被张云龙拍足球型男写真 自曝“男神”系调查显示美国年轻人已不再认为结婚生子马英九满意度远胜绿营 国民党:民进党假领导上QQ留言 “钓走”下属12.车陂涌涌水泛黄 原因是工地及灌浆车偷保温瓶爆碎“吓停”地铁 不堪一碎的社广州警方据举报线索抓获一涉恐嫌疑人 加媒:加移民部新投资移民政策未影响豪奥巴马:美国准备在巴以间斡旋 促成停华媒:澳盲目挺日从美不友好 中国不会中国驻阿根廷大使:习主席访阿将促进两酒后心情不好 台少年一秒变身“助跑弟调查称北上广深3成白领没时间在家吃饭亳州消防凿井救幼童利辛首个院士工作站挂牌纽约市长正式签署立法市民卡 明年1月前总会长受委槟城港务局主席 马华政局连胜文助好友谢国梁解围 称不想推朋友何炅16年后回央视再见金龟子 80后南水北调中线水源地县级污水处理厂全部美15岁少年犯奸杀女老师入狱后性侵女
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘