各位版大好:
我目前程式如下,執行結果如附檔,想請問各位版大..有什麼方式可以讓更改顏色的部分只判別最後一行(圖中CC,31那行),
其他不做顏色變動,想了很久沒有著落..請各位版大指導..謝謝!!

[code delphi]
procedure TForm1.DBGrid35DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
Icon:TBitmap;
begin
if (Column.DisplayName = 'E6') then
begin
dbgrid35.canvas.textrect(rect,rect.left,rect.top,'');
Icon:=TBitmap.Create;
with TDBGrid(Sender).Canvas do
begin
if adoquery30.FieldByName('E6').AsString ='AA' then
begin
ImageList1.GetBitmap(1,Icon);
Draw(round((Rect.Left Rect.Right-Icon.Width)/2),Rect.Top,Icon);
end;
if (adoquery30.FieldByName('E6').AsString ='BB')or((adoquery30.FieldByName('E6').AsString <>'') and (adoquery30.FieldByName('E6').AsString <>'AA') and (adoquery30.FieldByName('E6').AsString <>'CC') and (adoquery30.FieldByName('E6').AsString <>'DD')) then
begin
ImageList1.GetBitmap(2,Icon);
Draw(round((Rect.Left Rect.Right-Icon.Width)/2),Rect.Top,Icon);
end;
Icon.Free;
end;
end;
end;
[/code]

附加檔案：53c0d2b0573a7_Q.JPG

最後一行??是否等同最後一筆??
假如是的話，判斷是否是最後一筆不就就好了嗎?