delphi DBGrid數據顯示替換

最方便最簡單的辦法就是雙擊DBGRID的dataset(如，adoquey,adotable等)，然後Add all fields,選中妳要轉換顯示的那個字段，在其OnGetText事件裏寫入轉換顯示代碼就可以了。舉個例子，我的DBGRID的DATASET是ADOQUERY控件。要轉換顯示的字段是statues

procedure Tfrm_deal.ADOQuery1statuesGetText(Sender: TField;

var Text: String; DisplayText: Boolean);

begin

if sender.AsString='1' then

text:='管理員'

else

text:=sender.AsString;//當然妳可以多幾個IF來顯示想要顯示的，但要註意要有ELSE來控制不是妳要轉換的情況

end;