Fórum Mudar font de um registro no DBGrid baseado na existencia de registro na tab filha.Como? #376795
03/05/2010
0
Ola!
Eu tenho um DBGrid com a relacao dos clientes(ClientDataSet ligado a tabela clientes) e cada cliente tem receitas ligadas a ele.Eu gostaria de mostrar no dbgrid para todo os clientes q tiverem um cadastro de 1 receita eu queria mostrar a font daquele cliente com Bold.
Como eu faço isso?
estou fazendo no onDrawDataCell com este codigo mas nao ta funcionando
como devo fazer?
Eu tenho um DBGrid com a relacao dos clientes(ClientDataSet ligado a tabela clientes) e cada cliente tem receitas ligadas a ele.Eu gostaria de mostrar no dbgrid para todo os clientes q tiverem um cadastro de 1 receita eu queria mostrar a font daquele cliente com Bold.
Como eu faço isso?
estou fazendo no onDrawDataCell com este codigo mas nao ta funcionando
if DM.cdsReceitas.FieldByName('COD_CLI').AsInteger <> DM.cdsClientes.FieldByName('CODIGO').AsInteger Then
Begin
RzDBGrid1.Canvas.Font.Style := [];
end
Else
Begin
RzDBGrid1.Canvas.Font.Style := [fsBold];
end;
como devo fazer?
Eduardo Jr
Curtir tópico
+ 0
Responder
Posts
03/05/2010
Wilson Junior
Coloque assim
if DM.cdsReceitas.FieldByName('COD_CLI').AsInteger <> DM.cdsClientes.FieldByName('CODIGO').AsInteger then
RzDBGrid1.Canvas.Font.Style := []
else
RzDBGrid1.Canvas.Font.Style := [fsBold]
;
RzDBGrid1.DefaultDrawDataCell( Rect, RzDBGrid1.Columns[DataCol].Field, State );
Responder
Gostei + 0
03/05/2010
Eduardo Jr
O que é este datacol ? ta dando undeclared identifier.
obrigado
obrigado
Responder
Gostei + 0
03/05/2010
Wilson Junior
Esqueci de dizer, coloque no evento OnDrawColumnCell.
Espero ter colaborado.
Espero ter colaborado.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)