como faço para colocar cor no DB grid que esta ligado ao Data Control

cor?? Vc quer cor como? Tipo zebrado? cor de fundo?

eu quero poder colocar cores diferentes nas linhas, como vermelho verde azul

Bom tanto o DBGrid(DataControl) qto o DataGrid (mais novo e feito para ADOControl, conexão tipo ADO) só mudar a cor de fundo... ou seja, se vc colocar azul, tds as linhas vão ser azul, sem possibilidade de "zebrar" , colocar cores alternadas para cada linha.

 

Para isso vc tem q usar o MSFlexgrid...e para zebrar é só utilizar o código abaixo:

 

***********************************************

 

MSFlexGrid1.Cols = 4
MSFlexGrid1.Rows = 10

MSFlexGrid1.FillStyle = flexFillRepeat

For i = 1 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = i
MSFlexGrid1.Col = 1
MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1
If i Mod 2 = 0 Then
   MSFlexGrid1.CellBackColor = &HFFC0C0
Else
    MSFlexGrid1.CellBackColor = vbWhite
End If
MSFlexGrid1.Text = "TESTES"
Next

 

************************************************

Isso é só um exemplo... adapte às suas necessidades...

 

qq dúvida é só postar

 

t+

fiz com o true dbgrid:

 

Data1.Refresh
Set RS = Data2.Recordset.Clone
TDBGrid2.FetchRowStyle = True

 

Private Sub TDBGrid2_FetchRowStyle(ByVal Split As Integer, Bookmark As Variant, ByVal RowStyle As TrueDBGrid80.StyleDisp)
RS.Bookmark = Bookmark
If RS.Fields("PARC_STATUS") = "RE" Then
    RowStyle.BackColor = vbCyan
End If
End Sub