drawgrid 如何选择单元格后 颜色不变啊?或者去掉选择的功能drawgrid选择行 然后失去焦点 选择的行就成了深蓝色 如何不让他不变色?

解决方案 »

  1.   

    可以给每个单元改变颜色的.procedure TForm1.DrawGrid1DrawCell(Sender: TObject; Col, Row: Longint; Rect: TRect; State: TGridDrawState);
    begin
      with Sender as TDrawGrid do
      begin
        // Colors: array[0..DrawGrid1.ColCount -1 , 
        //               0..DrawGrid1.RowCount - 1] of TColor;    Canvas.Brush.Color := Colors[Col, Row];     
        Canvas.FillRect(Rect);
      end;
    end;