字段设计为true/false,dbgrid显示时如何变为男/女?
来自:多情剑客无情剑, 时间:2004-6-4 8:52:56, ID:2644963
procedure Form.OraQrySLSBgetText(Sender: TField; var Text: String; DisplayText: Boolean);
begin
if Sender.AsBoolean then
Text := '男' else Text := '女';
end;
来自:dgtg0710, 时间:2004-6-4 8:51:54, ID:2644968
用固定字段的OnSetText和OnGetText事件
OnSetText中写
if Text='男' then sender.FieldByName('字段名').AsBoolean :=true else sender.FieldByName('字段名').AsBoolean :=false
OnGtText中写
if sender.FieldByName('字段名').AsBoolean then Text:='男' else Text := '女'
来自:topcn, 时间:2004-6-4 9:10:13, ID:2645030
SELECT CASE sex WHEN 'true' THEN '男' WHEN 'false' THEN "女" ELSE "不男不女" END
from tb_student