Ver Mensaje Individual
  #1  
Antiguo 27-07-2005
kes kes is offline
Miembro
 
Registrado: may 2003
Posts: 60
Reputación: 22
kes Va por buen camino
Drag & Drop con StringGrid

Hola a todos.

Tengo un problema al arrastrar un registro de un TListView a un StringGrid. Si el StringGrid me cabe entero dentro del formulario no hay problema, pero cuando me desplazo hacia abajo con el scroll y luego intento arrastrar un objeto me lo coloca en una fila incorrecta. El código que utilizo es el siguiente:

Código:
procedure TForm1.GridDragDrop(Sender, Source: TObject; X,
  Y: Integer);
begin
stringgrid.Cells[0,y div stringgrid.defaultrowheight]:='Texto';
end;
El problema está en que "y div stringgrid.defaultrowheight" no devuelve la fila correcta, ya que Y es el valor de la coordenada de la parte visible del grid, ignorando las filas que no se ven.

¿Hay alguna forma de saber la fila del stringgrid en que nos encontramos en el momento de arrastrar un elemento?

Saludos y gracias.
Responder Con Cita