Fórum DBGrid Zebrada #213543
12/02/2004
0
If (State <> [gdSelected]) and (State <> [gdSelected,gdFocused]) then
begin
with (Sender as TDBGrid).Canvas.Brush do
if ((Sender as TDBGrid).DataSource.DataSet.RecNo mod 2) = 0 then
Color := clWindow
else
Color := $00E2EFE2; // Verde claro;
(Sender as TDBGrid).Canvas.FillRect(Rect);
(Sender as TDBGrid).DefaultDrawColumnCell(Rect,Datacol,Column,State);
end
else
(Sender as TDBGrid).DefaultDrawColumnCell(Rect,Datacol,Column,State);
end;
..............este é o codigo o codigo esta certo... o que não estou entendendo é o seguinte... se ligo o bde ao interbase coloco um dbgrid e coloco o codigo ele não funciona.... se ligo a um banco de dados paradox... ele funciona... outra coisa se conecto o banco usando o componente da IBX ele funciona... mas se uso o bde ele não funciona..
o que sera que esta errado
fazem o teste com bde e interbase para ligar a base de dados
depois
fazem o teste com o IBX e interbase para ligar a base de dados
depois
fazem o teste com bde com Paradoxe para ligar a base de dados
me ajudem estou ficando louco e se alguem podem me explicar como colocar uma figura numa coluna do dbgrid... ficarei grado....
se alguem poder me mandar um exemplo eu agradeço..
Que loucura......
Atenciosamente.: Deibe Junior
babu.djv@terra.com.br
Babu
Curtir tópico
+ 0Posts
12/02/2004
Rcaps
Na procedure do OnDrawColumnCell do seu DBGrid voce deve colocar os seguintes comandos para zebrar o seu DBGrid :
If odd(IBDataSete1.Recno) Then
Begin
DBGrid1.Canvas.Brush.color := clCream; // ( por exemplo)
DBGrid1.Canvas.FillRect(rect);
end;
end;
Trata-se de um método para exibir as linhas ímpares de uma tabela em uma cor de fundo diferente.
Uso o Delphi 7 com Interbase e funciona perfeitamente. Espero poder ter ajudado. Abraço.
Gostei + 0
12/02/2004
Vinicius2k
Este problema é, digamos assim, insolúvel... a base da rotina está no RecNo e esta propriedade não é aplicavel em SGBDs...
Me admira vc ter conseguido com o IBX+InterBase... vc está certo disso?
T+
Gostei + 0
12/02/2004
Rcaps
Eu estou utilizando sem nenhum problema. Tente utilizá-lo tambem pois com o meu sistema não dá problemas não, até agora...
Gostei + 0
12/02/2004
Vinicius2k
:D parabéns ! se vc pesquisar aqui no fórum vai ver q foi o primeiro q conseguiu...
mas acredito q depende muito da conexão... como não uso IBX não posso afirmar com certeza... sei com DBExpress não consegui fazer isso funcionar... inclusive comprei um componente Grid por causa disso...
T+
Gostei + 0
13/02/2004
Rcaps
Gostei + 0
13/02/2004
Vinicius2k
rcaps, com DBExpress?? agradeço, mas é melhor deixar quieto... já gastei a grana comprando o Grid mesmo... mas não me arrependo o componente é bem superior ao DBGrid...
Valew!
T+
Gostei + 0
14/02/2004
Rcaps
Grato - Raul.
Gostei + 0
14/02/2004
Vinicius2k
vc pode testá-lo baixando aqui : http://www.torry.net/db/visible/db_grids/dagridd.zip
Ele tem muitos recursos excelentes como, por exemplo, a ´Zebra´ e a fixação de colunas... na verdade é uma suíte, mas eu só uso componente Grid...
Lhe respondo por MP...
T+
Gostei + 0
14/02/2004
Rcaps
Gostei + 0
14/02/2004
Vinicius2k
T+
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)