如何让表中的true,false在dbedit中显示为先和后两个字?

Question

field1.displayvalue := '先;后';

Answer 1

dbedit.text:=adoquery.fieldbyname('1').asstring+adoquery.fieldbyname('2').asstring
/*************************************/
/*1、MY TOOL:*************************/
/*2、Delphi,Oracle,Sybase,C++/C*******/
/*3、PROJECT:*************************/
/*3、Boss*****************************/
/*4、为了五星的目标希望你早点结贴*****/
/*************************************/

Answer 2

field1.displayvalues := '先;后';

Answer 3

AdoQuery.Close;
AdoQuery.Sql.Clear;//DB2
AdoQuery.Sql.Add('select field1,field2,(case field3 when true
then ''先'' else ''后'') aa end from Table1');
//ORACLE
AdoQuery.Sql.Add('select field1,field2,decode(field3,true,
''先'',''后'') aa  from Table1');
AdoQuery.Open;

Answer 4

AdoQuery.Close;
AdoQuery.Sql.Clear;//DB2
AdoQuery.Sql.Add('select field1,field2,(case field3 when true
then ''先'' else ''后'') aa end from Table1');
//ORACLE
AdoQuery.Sql.Add('select field1,field2,decode(field3,true,
''先'',''后'') aa  from Table1');
AdoQuery.Open;

Answer 5

if true then 先
else if false then 后;

Answer 6

我说错了，用的是dbgrid来显示，数据库是access.

Answer 7

to aft_st_sd(浪子) :你的语句放在什末位置？

Answer 8

在數據庥OnGetText中寫代碼也可:
procedure TForm1.Table1asdfGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
  if Sender.asBoolean then Text:='是'
  else Text:='否'
end;

Answer 9

你可以存表时就设好
with table1 do
begin
edit;
if booleans=true then
   fieldbyname('域名').asstring:='先'
else
  fieldbyname('域名').asstring:='后';
post;
end;

Answer 10

你应该在DBGrid的OndrawCell中编程实现

Answer 11

同意 CeleronII(抽烟的鱼) 方法在DBGrid的OndrawCell中编程实现也可以,但对于数据量大的DBGrid速度太慢

Answer 12

select a, b, iif(c=true, '男','女') from table