FORMATAR TEXTO NO FLEXGRID

RICOCARDOZO 17/06/2011 23:06:55
#377137
Olá a todos :
Para formatar uma determinada linha e uma coluna uso assim:

Grade1.Row = 1
Grade1.Col = 1
Grade1.Text = [Ô]Data do Pagamento[Ô]
Grade1.CellFontBold = True
Grade1.CellBackColor = &HF2F2F2
Grade1.CellFontSize = 9
Grade1.CellForeColor = &H404040
Grade1.RowHeight(1) = 350

só que quando tem por exemplo 5 linhas fica meio pesado
Tem como fazer isso no TextMatrix , enxugando mais o código

Grade1.TextMatrix(0, 1) = [Ô]Data do Pagamento[Ô]
MARCELO.TREZE 18/06/2011 09:15:00
#377145
no text matrix não mas vc poderia criar uma função

Function FormataGrid(Grd As MsFlexGrid, Coluna As Integer, Linha As Integer, Texto As String, fBold As Boolean, bColor As OleColor, fSize As Integer, fColor As OleColor, rHeight As Integer)
Grd.Row = Linha
Grd.Col = Coluna
Grd.Text = Texto
Grd.CellFontBold = fBold
Grd.CellBackColor = bColor
Grd.CellFontSize = fSize
Grd.CellForeColor = fColor
Grd.RowHeight(Linha) = rHeight
End Function


agora bastaria fazer assim

FormataGrid Grade1, 1, 1, [Ô]Data Pagamento[Ô], True, &HF2F2F2, 9, &H404040, 350


se ocorrer algum erro me desculpe, é que fiz o código de um PC sem VB instalado
RICOCARDOZO 18/06/2011 16:03:11
#377160
Ta dando erro
User-definide type not definide
MARCELO.TREZE 18/06/2011 20:56:10
#377164 Resposta escolhida
como eu disse eu fiz em um pc sem o vb e não testei, mas mude [txt-color=#0000f0]olecolor [/txt-color]para [txt-color=#0000f0]Ole_Color[/txt-color]
Tópico encerrado , respostas não são mais permitidas
Voltar