有很多程序，表格中的下拉列表用鼠标点时显示的是代码，鼠标移开后，却显示为名称。
有很多程序，表格中的下拉列表用鼠标点时显示的是代码，鼠标移开后，却显示为名称。
请问这种效果如果作？
我估计是在 OnSetText或OnGetText里作。但我做了后，系统保存数据时却保存的是货品名称，而我要保存的是货品代码。
请大家帮忙。
[解决办法]
Mark + UP
[解决办法]
procedure TDM.cdsFileTableDEFAULT_USEGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
begin
if (sender.AsString= '1 ') then
Text:= '√ '
else if (sender.AsString= '0 ') then
Text:= '× '
else
Text:= ' ';
end;
procedure TDM.cdsFileTableDEFAULT_USESetText(Sender: TField; //zxf 2007-5-10 add
const Text: String);
var
mStr: string;
begin
if (Text= '√ ') or (Text= '1 ') then
mStr:= '1 '
else if (Text= '× ') or (Text= '0 ') then
mStr:= '0 '
else
mStr:=Text;
sender.Value:=mStr;
end;
default_use 为CHAR 类型.......
[解决办法]
楼主让你妹妹脱光给我看了
就有人告诉你答案了
你这个社会败类
