pb6.5支持odbc有问题对吗？？pb的健壮性怎么这么差？？还有pb不支持中文字段吗？？//牛虻

[chris2023]

[chris2023]

pppppppppp

[pbsql]

用中文作字段名本身就是一个非常不好的作法

[chris2023]

why?你用的用户看不懂怎么版？

[fan_jian]

用户怎么会看到字段名？

[killerdanny]

PB不是可以设LABLE吗？为什么要用中文字段名？

[chris2023]

关键让用户得明白
用户如果不认识你设的字段
那可不是维护能解决的

既然pb6.5不支持中文字段
那么pb8呢

[pbsql]

如果用户维护要看字段（正常情况你应该有自己的维护程序，中文界面的），那要求他懂英文一点也不过分，如果英文都不懂还关心表结构干什么？

[pbsql]

怎么0分贴全是你发的？这样不太好！

[linda_gao]

pb80全面支持双字节

[nnljl]

最好不用中文字段，如果用了可采取动态建数据窗的办法解决，如下：

string error_syntaxfromSQL, error_create
integer l_start,l_pos,font_height
string new_sql, new_syntax,l_object_list,l_object
new_sql = "execute XS_BMXSHXB_proc" //可为其它SQL语句
string cname
//------------------------------------
new_syntax = SQLCA.SyntaxFromSQL(new_sql, &
'Style(Type=grid)', error_syntaxfromSQL)
integer l_pos1
l_pos1=pos(new_syntax,'t_')
do // 修改text名称使之符合标准命名以便pfc功能使用
new_syntax=replace(new_syntax,l_pos1,2,'')
l_pos1=pos(new_syntax,'t_')
loop until l_pos1 <= 0

dw_1.Create(new_syntax, error_create)
dw_1.Modify("DataWindow.Header.Color= '"+string(RGB(192,192,192))+"'")
l_object_list=dw_1.describe("datawindow.objects")
string ls_colname,ls_colcname,ls_textname
ls_colname=''
do // 假定列表不为空，获取每一text对象进行处理
ls_colname=''
l_start = l_pos
l_pos = pos(l_object_list, "~t", l_start + 1)
if l_pos = 0 then l_pos = 9999
l_object = mid(l_object_list, l_start + 1, l_pos - l_start - 1)
//字体加一号
// font_height=integer(dw_1.Describe(l_object+".Font.Height"))
// dw_1.Modify(l_object+".Font.Height='"+string(font_height - 1 )+"'")
if right(l_object,2)='_t' then
ls_colname=left(l_object,len(l_object) - 2)
ls_colcname=dw_1.describe(ls_colname+".dbname")
dw_1.modify(l_object+".text='"+ls_colcname+"'")
end if
loop until l_pos = 9999

dw_1.SetTransObject(SQLCA)

dw_1.Retrieve()