https://foro.gambas-es.org/viewtopic.php?f=1&t=1356&p=7862#p7862
-----------------------------------
pittusa
Domingo, 30 Enero 2011, 11:02

Drag/Drop
-----------------------------------
Hola.

Tengo unos pictures creados por código almacenados en arrays.

Tengo que arrastrar las imágenes que contienen de unos a otros, pero quiero que al arrastrar la imagen
el picture del que sale la imagen desaparezca.

el codigo que tengo es este:

[code linenumbers=false syntax=gambas]PUBLIC SUB fotosale_MouseDrag() 'este es el grupo de pictures del que salen las imágenes.
    
    IF Mouse.Left THEN
    Drag.Icon = LAST.Picture
    LAST.Drag(LAST.Picture.Image)
    
    
ENDIF
  
  
END 

PUBLIC SUB fotoentra_Drop() ' Este es el grupo que recibe las imágenes.

  DIM i AS Integer
  i = LAST.tag
   arrayimagen2[i].picture = Drag.Icon

END[/code]

Este código funciona las imágenes se arrastran y se ponen en el picture que las recibe.
Pero no se como decirle que desaparezca del picture que fue arrastrada.

Supongo que tendré que decirle en el evento drop del grupo de imágenes que
reciben que se cambie la imagen del picture del que vienen.

No se como hacerlo.

Gracias


