dbfTable.DatabaseName := ls_localpath;
dbfTable.TableType :=ttFoxpro;
dbfTable.TableName := 'infodef';
dbfTable.FieldDefs.Clear;
dbfTable.FieldDefs.Add('field1',ftInteger,0,false);
dbfTable.FieldDefs.Add('field2',ftString,8,false);
dbfTable.FieldDefs.Add('FLAG',ftInteger,0,false);
dbfTable.IndexDefs.add('servindx','field2',[ixCaseInsensitive]);
dbfTable.CreateTable;
dbfTable.TableType :=ttFoxpro;
dbfTable.TableName := 'infodef';
dbfTable.FieldDefs.Clear;
dbfTable.FieldDefs.Add('field1',ftInteger,0,false);
dbfTable.FieldDefs.Add('field2',ftString,8,false);
dbfTable.FieldDefs.Add('FLAG',ftInteger,0,false);
dbfTable.IndexDefs.add('servindx','field2',[ixCaseInsensitive]);
dbfTable.CreateTable;
解决方案 »
- fr导出EXCEL,图片不能压缩
- Delphi无何做堆积柱形图
- delhpi 怎么打开 我的电脑--属性---远程---允许用户远程连接到此计算机
- 奇怪,fastreport2.5 不能显示‘加工’两个字?
- 如何在Richedit中贴图片阿?就像QQ的聊天窗口可以发送图片,显示图片阿?
- 在listview中如何让选中checkbox时候同时该行也处于选中状态?
- 求助关于ADOQuery.clone的用法
- 那位有关于流的资料
- 当dbgrid的行焦点变化,我如何捕捉这一事件?
- ODBC vs BDE 高手请进来
- 这段代码还能优化吗?
- 请问在DELPHI中怎样调用存储过程的返回参数?如果是多个返回参数呢?
dbfTable.CreateTable;
这两句话调换一下前后位置就可以了。表还没create,谈何在表上加索引。