如何能通过输入字段及中文字段名，直观地将表中的字段用中文字段名表示出来 ( 积分: 200 )

输入表字段信息 <br>id 字段 中文字段名 类型 长度 备注<br>1 serial_no 流水号 整型 4 <br>2 name 品名 字符型 12 <br>3 size 尺寸 字符型 9 <br>… <br>… <br><br>生成表数据如下： <br>serial_no name size … <br>2006001 花格衫 160×75 <br>2006002 牛仔 145×26 <br>… … … <br><br>查询时能自动显示下表格 <br>流水号 品名 尺寸 <br>2006001 花格衫 160×75 <br>2006002 牛仔 145×26 <br>… … …

请问在Delphi中如何设计比较好？<br>这样的设计方法，对于咱们这些程序员会比较方便，再也不必每次去把英文字段翻译成中文字段了，所以请大侠们帮忙设计一下。<br>我很讨厌老是在程序里重复出现：<br>...&nbsp;field.value&nbsp;...<br>...&nbsp;field.DisplayNme&nbsp;:=&nbsp;'中文字段名';

select&nbsp;serial_no&nbsp;as&nbsp;'流水号',...&nbsp;from&nbsp;table_name<br>或者新建一個表，建立對應關係進行處理

select&nbsp;serial_no&nbsp;as&nbsp;'流水号',...&nbsp;from&nbsp;table_name<br>或者新建一個表，建立對應關係進行處理<br>--------------------------<br>这样的话，每次查询都需要用AS&nbsp;'流水号'&nbsp;这样的方式来写，对于一张表还好，如果连续做多张表很容易混掉的，而且感觉效率不高

这个很简单，我就是这么做的，<br>给你个提示：<br>作个函数：&nbsp;&nbsp;&nbsp;function&nbsp;&nbsp;&nbsp;&nbsp;FieldChangChinese(ado_query1:Tadoquery;dbgrid55;Tdbgrid):integer;//&nbsp;ado_query1是网格标题字段数据源<br>begin<br>.......内容自己写很简单，把英文字段转化为中文的<br><br>end;