數(shù)據(jù)庫(kù)字段一般都是英文，不能直接展示給用戶，而應(yīng)該顯示中文含義給用戶。需要漢化兩部分，一是設(shè)計(jì)用的字段漢化，二是表格區(qū)顯示內(nèi)容的漢化。
1、 字段漢化
設(shè)計(jì)工具（PivotGridToolBoxEh1）中顯示字段中文含義，是通過(guò)數(shù)據(jù)集字段的DisplayLabel屬性實(shí)現(xiàn)，只需要正確設(shè)置DisplayLabel即可。
一種方法運(yùn)行期動(dòng)態(tài)指定，是把字段名和中文含義保存在數(shù)據(jù)庫(kù)中，需要的時(shí)候動(dòng)態(tài)從數(shù)據(jù)庫(kù)取。另一種方法是設(shè)計(jì)期靜態(tài)指定，是在設(shè)計(jì)期設(shè)置每個(gè)字段的中文含義。我的程序中采用的是第一種方法。先創(chuàng)建數(shù)據(jù)表格（DBGridEh），并設(shè)置每一列的標(biāo)題。在數(shù)據(jù)打開(kāi)之后按表格的標(biāo)題設(shè)置數(shù)據(jù)集字段的DisplayLable。for I := 0 to DBGridEh1.FieldCount - 1 dobegin DBGridEh1.Columns[i].Field.DisplayLabel := DBGridEh1.Columns[i].Title.Caption;end;2、 表格漢化
顯示統(tǒng)計(jì)結(jié)果的表格PivotGridEh中老是顯示字段名，這樣對(duì)普通用戶使用很不方便。通過(guò)下面事件實(shí)現(xiàn)英文字段的漢化，顯示中文含義，做如下修改即可實(shí)現(xiàn)。
PRocedure TCustomPivotGridEh.BuildGridArrayRowsMeasures;for v := 0 to ActualValueFields.Count-1 do begin PivotCel := PivotGridArray[ip + ActualRowFlds.Count + v, ActualColFlds.Count + 1]; PivotCel.CelType := sctValuesColCaptionEh; PivotCel.Value := //ActualValueFields[v].PivotFieldName; //下面這句話，可以實(shí)現(xiàn)表格中字段名的中文漢化 PivotCel.Value := PivotDataSource.PivotFields.FindFieldByName(ActualValueFields[v].PivotFieldName).DisplayName;end;
備注：
這樣修改后，用控件本身的打印功能，也可以正常顯示漢化后的字段（按現(xiàn)在這樣修修改之前也找到的別的方法，雖然可以解決表格上顯示的問(wèn)題，但是打印時(shí)還是英文，進(jìn)而才找到現(xiàn)在的方案）。
打印代碼如下：
procedure TQueryFrm.BtnPrintClick(Sender: TObject);begin inherited; PivotGridEh1.PrintService.PageHeader.CenterText := self.Caption + '分組統(tǒng)計(jì)'; PivotGridEh1.PrintService.Preview;end;
新聞熱點(diǎn)
疑難解答
圖片精選
網(wǎng)友關(guān)注
