如果用的是dbgird,可以自己画啊!想要怎么想时就怎么显示!

解决方案 »

  1.   

    看我的:
    //...
      private
        Lx: String;
    在DBGrid1的DrawColumnCell事件中加入:
    procedure TTemplyForm.DBGrid1DrawColumnCell(Sender: TObject;
      const Rect: TRect; DataCol: Integer; Column: TColumn;
      State: TGridDrawState);
    begin
    if Table1.FieldByName('LOGINID').AsString=Lx then
     begin
      DBGrid1.Canvas.Brush.Color:=clRed;
      DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
     end;
    end;在DataSource1的DataChange事件中加入:
    procedure TTemplyForm.DataSource1DataChange(Sender: TObject;
      Field: TField);
    begin
    Lx:=Table1.FieldByName('LOGINID').AsString;
    end;希望你不要把上面太多的代码拷贝进去!LOGINID是主索引!
      

  2.   

    搜索一下"Dbgrid"或者"stringgrid",答案多的吓死你!!!