Fórum Tamanho da Fonte #254785
17/10/2004
0
Caros Colegas
Sei como mudar a Cor de um Dbgrid, o tipo de Fonte, mas como mudo o Tamanho dafonte.
(*destaca campo DATA VENCIMENTO*)
if Column.Field = Dm.CDT_RECDTAVENCI then
if (Dm.CDT_RECDTAVENCI.AsDateTime < date) AND ((Dm.CDT_RECsituatual.AsInteger = 1)) then
begin
DBGrid1.Canvas.Font.Style :=
DBGrid1.Canvas.Font.Style + [fsBold];
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.DefaultDrawDataCell(rect,Column.Field,State); // pinta o texto padrão
end
else
Begin
DBGrid1.Canvas.Font.Style :=
DBGrid1.Canvas.Font.Style + [fsBold];
DBGrid1.Canvas.Font.Color := clBlue;
DBGrid1.DefaultDrawDataCell(rect,Column.Field,State); // pinta o texto padrão
end;
COMO MUDO AGORA O [b:39a41c2af5]TAMANHO DA FONTE[/b:39a41c2af5]
Sei como mudar a Cor de um Dbgrid, o tipo de Fonte, mas como mudo o Tamanho dafonte.
(*destaca campo DATA VENCIMENTO*)
if Column.Field = Dm.CDT_RECDTAVENCI then
if (Dm.CDT_RECDTAVENCI.AsDateTime < date) AND ((Dm.CDT_RECsituatual.AsInteger = 1)) then
begin
DBGrid1.Canvas.Font.Style :=
DBGrid1.Canvas.Font.Style + [fsBold];
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.DefaultDrawDataCell(rect,Column.Field,State); // pinta o texto padrão
end
else
Begin
DBGrid1.Canvas.Font.Style :=
DBGrid1.Canvas.Font.Style + [fsBold];
DBGrid1.Canvas.Font.Color := clBlue;
DBGrid1.DefaultDrawDataCell(rect,Column.Field,State); // pinta o texto padrão
end;
COMO MUDO AGORA O [b:39a41c2af5]TAMANHO DA FONTE[/b:39a41c2af5]
Emery
Curtir tópico
+ 0
Responder
Posts
17/10/2004
Oscar Candido
Amigo tente o seguinte :
Espero ter ajudado
Um Abraço
DBGrid1.Canvas.Font.Size := 20
Espero ter ajudado
Um Abraço
Responder
Gostei + 0
17/10/2004
Edilcimar
veja a minha pergunta sem resposta sobre cor de dbgrid errada, lá eu coloco a cor em um único retângulo, substitua a cor por font.size e você trocará o tamanho da fonte em apenas um campo de um registro
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)