请问用PB打开PARADOX数据库时，怎样解决显示中文为乱码的问题？
发布网友
发布时间：2022-11-28 19:15
共1个回答
热心网友
时间：2023-10-23 23:06
BdeMana114.msi这个搜索下载安装。将自己DB文件所在文件位置追加新规标签就可以看到内部。追问对不起，可能是我没有表述清楚。我是写个程序时遇见的问题。程序需要用PB来直接打开PARADOX的DB数据库。但就是中文显示为乱码？
追答一般设计这种DB文件读取都得通过比较接近机器语言的Dephi语言来写的。其他C++也可以
规定格式读取。例如Dephi
var
TT1: TTable;
hDb: hDbiDb;
TblDesc: CRTblDesc;
TT1 := TTable.Create(Application);
TT1.TableName := '相对执行程序路径\XXX.DB';
try
begin
TT1.Open;
try
FillChar(TblDesc, sizeof(CRTblDesc), #0);
TT1.Close;
Check(DbiOpenDatabase( nil, nil, dbiReadWrite, dbiOpenExcl, nil, 0, nil, nil, hDb ));
TblDesc.bPack:=True;
StrPCopy(TblDesc.szTblName, TT1.TableName);
StrCopy(TblDesc.szTblType, szParadox);
Check(DbiDoRestructure( hDb, 1, @TblDesc, nil, nil, nil, False ))
finally
Check(DbiCloseDatabase(hDb));
end;
end
except
on E: Exception do
begin
MessageDlg(E.Message,mtError, [mbok] ,0);
TT1.free;
end
end
