Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   drag&drop en DBGRID (https://www.clubdelphi.com/foros/showthread.php?t=13540)

JoseQ 23-08-2004 11:58:46

drag&drop en DBGRID
 
Tengo una serie de imagenes en mi formulario y un dbgrid asociado a una tabla de categorias, me gustaria arrastrar las imagenes hasta la tabla para asociar las imagenes con las categorias, erl problema es que no se como cambiar el foco del dbgrid durante el drag&drop, es decir, cuando termino el drag&drop me inserta la imagen asociada con la categoria que tenia antes de comenzar el drag&drop (por ejemplo el primero) y quiero que si suelto el boton del raton encima del 3er registro me inserte en la tabla esa categoria, gracias

yusnerqui 23-08-2004 15:29:39

Te daré una idea:

Código Delphi [-]
procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer)
var
F,C : Integer
begin
 TStringGrid(DBGrid1).MouseToCell(x,y,C,F);
  DBGrid1.Col  := C;
  DBGrid1.Row := F;
  DBGrid1.SetFocus;
end;
esto hace lo que quieres cuando pasas el mause por encima del DBGrid, no te será difícil adaptarlo a tu programa, también debes tener en cuenta que cuando sales por las esquinas del DBGrid te manda un error, supongo que no será difícil capturarlo, pero no tengo mucho tiempo ahora, al menos te doy esta idea y tu pones lo demás, espero te sirva

un saludo



La franja horaria es GMT +2. Ahora son las 21:28:31.

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