想請問各位先進!
我直接舉例我的疑問!
例:我DBGrid上typ欄位顯示的值是AC
是否可以讓他顯示CM
就是我從資料庫抓出來的資料是AC
但是我想在DBGrid上呈現的是CM
請問一下我該在哪裡修改><

dbbgrid 原本就與 DataSet 資料庫直接連結在一起, 所以dbgrid 欄位內容是什麼當然就顯示什麼, 你要想做到欄位內容是a, 顯示卻為b, 最快的方法就是在  Query 新增一組虛擬欄位, 然後在 On CalcField 中寫code判斷 
if Query1S1.value='CM' THEN Query1S2.Value := 'PM'...之類的, 把 S2 顯示到 dbgrid 上

試一試

private procedure OnGetText(Sender: TField; var Text: String; DisplayText: Boolean);
.
[code delphi]
procedure TFrmBSO.OnGetText(Sender: TField; var Text: String; DisplayText: Boolean);
begin
if UpperCase(Sender.FieldName) = 'typ' then
begin
Text := 'CM';
end;
end;


procedure TFrmBSO.FieldSetting;
begin
(Columns[4].Field as TStringField).OnGetText := OnGetText;
end;
[/code]

編輯記錄

感謝P.D. 版主 跟 t27 大大 為我解答!!我是用PD版主的方式成功的，謝謝你們!

您好:
用DBGrid的OnDrawColumnCell事件給您參考，很好用，也可指定Font顏色，或用image取代
if(DataCol=2)and(Dataset1.FieldByName('typ').AsString ='AC') then
begin
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.Canvas.TextRect(Rect, Rect.Left 2, Rect.Top 2, 'CM');
end;
或image取代
if(DataCol=2)and(Dataset1.FieldByName('typ').AsString ='AC') then
begin
DBGrid1.Canvas.Draw(Rect.Left,Rect.Top,Image1.Picture.Graphic);
end;