Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-05-2006
jepes jepes is offline
Miembro
 
Registrado: jun 2004
Posts: 10
Poder: 0
jepes Va por buen camino
dbgrid y drag&drop

Buenas, estoy revisando una aplicacion que tiene un DbGrid que cuando se arrastra un elemento sobre ella inserta en una tabla capturando el campo sobre el que soltamos el raton...

si la tabla del dbgrid tiene menos de 17 registros no da ningun fallo, pero cuando existen mas registros a la rejilla le sale la barra de desplazamiento y conforme bajas, el foco va quedando atras, algunos registros no se pueden seleccionar, me explico...
cuando llego al registro 9 la barra de desplazamiento se mueve y entonces dnd antes estaba el 9 ahora esta el 10, pero ojo, se ilumina el registro 10 pero el foco se mantiene en el 9, si continuas bajando continua saltando cuando la barra de desplazamiento baja,e intentado kitar el autoscroll, xo no se como puedo hacerlo, os dejo el codigo:

Código Delphi [-]
procedure TModuloimagenes.apuntar(Sender: TObject;x,y:integer);
var
F,C : Integer;
begin
  with moduloimagenes do
    with sender as tdbgrid do
    begin
      //controlo que no se salga de los margenes
      if( (x>12) and (x<(tstringgrid(sender).ColWidths[1]+tstringgrid(sender).
      ColWidths[2])) )and ((y>20) and (y<(Tstringgrid(sender).RowCount *
      Tstringgrid(sender).RowHeights[f] )) )then
      begin
        {Extrae la columna y la fila que esta señalando el raton en las
         coordenadas x e y}
        TStringGrid(sender).MouseToCell(x,y,C,F);
        TStringGrid(sender).Col:=c;
        TStringGrid(sender).Row := F;
        Tdbgrid(sender).SetFocus;
        DM.patologi.RecNo:=F;
      end;
   end;
end;


alguna sugerencia?
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Drag & Drop en TListBox victortera OOP 2 29-06-2005 11:05:04
drag&drop en DBGRID JoseQ Varios 1 23-08-2004 16:29:39
Drag&Drop !!! rafstyle OOP 6 27-07-2004 05:39:41
Drag&Drop xflo Lazarus, FreePascal, Kylix, etc. 0 13-10-2003 20:31:22
Drag & Drop cone220 Varios 1 26-05-2003 20:06:34


La franja horaria es GMT +2. Ahora son las 01:23:24.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi