Encontrando Posição Da Linha Do Dbgrid

[Guest thiago_melo]

Olá galera, estou com o seguinte problema. Estou fazendo uma tela de consulta, e nela estou usando um DbGrid que esta mostrando os dados de um ClientDataSet. E quando o usuário clica com o botão em alguma linha do grid, eu posiciono um panel, q tem a largura e altura de uma linha, sobre o grid cobrindo justamente a linha q ele tentou selecionar.

O problema é o seguinte: eu preciso saber a posição(no caso os dados de altura) da linha, em relação ao topo do grid, para poder posicionar meu panel. eu coloquei o seguinte código:

pnlLinha.Top := DBGrid1.Top + 1 + ( pnlLinha.Height*cdsGrade.RecNo) );

inicialmente funciona, mas quando você percorre mtos registro q começou a mudar a barra de rolagem, aí esse código não funciona mais ( pnlLinha.Height*cdsGrade.RecNo), ira ultrapassar a próprio top do grid.

Então eu precisaria de a de algo parecido do que tenho no StringGrid o StringGrid.CellRect, que me retorna as coordenadas da célula.

Se vocês souberem como posso fazer isso me digam por favor...

Grato,

Thiago melo.

[Kikonanet]

Olá Thiago,

Tem uma função chamada MouseCoord que pega as coordenadas das células e colunas do DBGrid.

você pode colocar no evento OnMouseMove do DBGrid e pegar as coordenadas.

var Coord:TGridCoord;

begin
 Coord:=DBGridBusca.MouseCoord(X,Y);
 Label1.Caption:='X:'+IntToStr(Coord.X)+' Y:'+IntToStr(Coord.Y);
end;

Dê uma olhadinha no help do Delphi...

Abs.

Kiko