![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Bienvenido al foro jjuguera
Cada TImage tiene un nombre que lo identifica y puedes usarlo o reasignarlo. También tienes una propiedad Tag que puedes usar como un puntero a lo que quieras. Saludos. |
#2
|
|||
|
|||
Cita:
procedure TForm1.Image2DragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean); begin Accept:= Sender is TImage; end; procedure TForm1.Image2DragDrop(Sender, Source: TObject; X, Y: Integer); begin (Sender as TImage).Picture.Assign((Source as TImage).Picture); showMessage(Nombre del objeto TImage (origen) que se ha alojado en este); end; Gracias de nuevo. |
#3
|
||||
|
||||
Por favor, no olvides usar las etiquetas para código. Gracias.
![]() |
#4
|
|||
|
|||
Lo siento, hasta que no me haga..., muchas gracias.
|
#7
|
||||
|
||||
Es normal, por cierto, ¡¡¡bienvenido!!!
![]() |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Drag Drop | JuanOrtega | Varios | 9 | 16-04-2014 08:00:31 |
Hacer Drag&Drop desde otro programa a texto (RichEdit) o imagen (Image) en mi program | rrf | Varios | 2 | 24-02-2009 14:38:06 |
imagen con drag & drop | Nomad | Gráficos | 5 | 18-06-2008 09:00:22 |
Drag and Drop... | dvlt | .NET | 0 | 07-02-2008 09:42:59 |
Drag&Drop | xflo | Lazarus, FreePascal, Kylix, etc. | 0 | 13-10-2003 19:31:22 |
![]() |
|