Aproveitando...
Gostaria de deixar o grid zebrado(linha branca, linha cinza)...
alguem sabe como?
[]s
José Maria
--- Em delphi-br@yahoogrupos.com.br, Vitor Luiz Redes
[EMAIL PROTECTED] escreveu
Algo assim, acho que resolve...
if Pos( ctrlPesquisa.Text, DATASET.FieldByName( 'CLIENTE'
O código é mais ou menos assim...
if Odd( ctrlPesquisa.Text, DATASET.RecNo ) then
GRID.Canvas.Brush.Color := clSilver
else
GRID.Canvas.Brush.Color := clWhite;
GRID.DefaultDrawColumnCell( Rect, Field, State );
constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor
2 matches
Mail list logo