【搞定】数据字段显示问题**

zygt07

我想在程序中实现这样一个功能,表A中字段ABC是整型但是我想把它的显示为汉字如:ABC字段值为65(个月),显示为5年5月
怎样实现,我用FieldByName('ABC').asstring 和 FieldByName('ABC').TEXT试过了,不行

alang

数据集的OnGetFieldText事件中，可以根据字段的值，决定如何来显示

zygt07

if DisplayText then  
if DataSet.Name='DataSetRYDD' then
with DataSet do //循环
    begin
     First;
      while not EOF do
       begin
        if  Field=DataSet.FieldByName('N_GL') then  //得到字段名
          begin
           Text:=SetGL(Field.AsInteger); //设置显示
          end;
        next;
       end;

    end;

问题是运行程序死机
不知是什么原因

aPanther

楼主，你设置断点调试看看先。

zygt07

好象是每次触发事件都要重新获得DataSet 这样就陷入死循环了,
if DisplayText then  
if DataSet.Name='DataSetRYDD' then
with DataSet do //循环
    begin
     First;
    end;
这样也死

alang

这里只能对当前记录操作，不要滚动数据集

zygt07

不滚动数据集
这样我得到的结果就都是一个值了

alang

当然了，数据集都是通过当前字段来显示的
包括DataGrid可以显示多条记录，也是不断的滚动当前记录来显示出来的，所以主要让当前记录正确了，就可以了

zygt07

问题已解决请结贴吧,多谢