用Delphi创建一个dbf表格,为什么字段里中文显示是乱码,我的xm里的内容总是乱码?
代码如下:
table3.TableType:=ttFOXPRO;
table3.TableLevel:=25;
table3.FieldDefs.Clear;
table3.FieldDefs.Add('zkzh',ftstring,10);
table3.FieldDefs.Add('xm',ftstring,8);
table3.FieldDefs.Add('km1',ftstring,1);
table3.FieldDefs.Add('th1',ftinteger,0);
table3.FieldDefs.Add('cj1',ftinteger,0);
table3.FieldDefs.Add('km2',ftstring,1);
table3.FieldDefs.Add('th2',ftinteger,0);
table3.FieldDefs.Add('cj2',ftinteger,0);
table3.FieldDefs.Add('km3',ftstring,1);
table3.FieldDefs.Add('th3',ftinteger,0);
table3.FieldDefs.Add('cj3',ftinteger,0);
table3.FieldDefs.Add('km4',ftstring,1);
table3.FieldDefs.Add('th4',ftinteger,0);
table3.FieldDefs.Add('cj4',ftinteger,0);
table3.FieldDefs.Add('km5',ftstring,1);
table3.FieldDefs.Add('th5',ftinteger,0);
table3.FieldDefs.Add('cj5',ftinteger,0);
table3.FieldDefs.Add('zcj',ftinteger,0);
table3.CreateTable;
table3.Open;
代码如下:
table3.TableType:=ttFOXPRO;
table3.TableLevel:=25;
table3.FieldDefs.Clear;
table3.FieldDefs.Add('zkzh',ftstring,10);
table3.FieldDefs.Add('xm',ftstring,8);
table3.FieldDefs.Add('km1',ftstring,1);
table3.FieldDefs.Add('th1',ftinteger,0);
table3.FieldDefs.Add('cj1',ftinteger,0);
table3.FieldDefs.Add('km2',ftstring,1);
table3.FieldDefs.Add('th2',ftinteger,0);
table3.FieldDefs.Add('cj2',ftinteger,0);
table3.FieldDefs.Add('km3',ftstring,1);
table3.FieldDefs.Add('th3',ftinteger,0);
table3.FieldDefs.Add('cj3',ftinteger,0);
table3.FieldDefs.Add('km4',ftstring,1);
table3.FieldDefs.Add('th4',ftinteger,0);
table3.FieldDefs.Add('cj4',ftinteger,0);
table3.FieldDefs.Add('km5',ftstring,1);
table3.FieldDefs.Add('th5',ftinteger,0);
table3.FieldDefs.Add('cj5',ftinteger,0);
table3.FieldDefs.Add('zcj',ftinteger,0);
table3.CreateTable;
table3.Open;
解决方案 »
- 用EnumThreadWindows时提示Variable required,请问怎么解决? (请不吝赐教)
- dcp文件是什麼文件,有用麼?
- 关于属性编辑器可能用到的DesignEditors.pas文件的问题
- 我的一点疑问!我的一些构想!-------对校园信息管理系统感兴趣的朋友都来谈一下!
- 如何动态改变button1.Anchors
- win32和win16中的32和16是指CPU的字长吗?
- 如何去掉MDI主窗体的水平或垂直滚动条?
- SOS,SOS.............
- 求购一个mp3相关的程序,价格面议。up有分
- 50分的简单问题
- 不得不看!=====改变vsreport类型listview某一个单元格显示样式的有关问题!
- 高手!
你用代碼也好, 手工也好, 修改 控制面板中的 "BDE Administrtor" 中 對應dbf的驅動的語言代碼頁為 中文就可解決!
改成ttdbase无法执行1