VB6 - Arrastando e copiando imagens (drag and drop)

Neste aplicativo feito na linguagem Visual Basic carregamos gráficos usando DragDrop.

Os controle de origem que contém os gráficos é um controle ListView exibindo imagens, semelhante à opção de visualização de miniaturas no Windows Explorer, embora o controle poderia ser qualquer outro com suporte aos eventos Drag(DragDrop, DragOver).

O controle destino, ou seja, onde você coloca os gráficos, é uma grade de células e, neste caso, usamos um controle FlexGrid, que possui a propriedade CellPicture para atribuir a imagem na célula ativa (linha e propriedade atual Col do Grid)

O exemplo não tem uma utilidade particular e é realizada com base em outros códigos obtidos na web, mas pode servir como uma ideia para alguma escolha de um programa que precisa implementar algo semelhante.

Além disso, outra coisa importante é que o código é feito tudo no formulário principal, como é algo simples, tudo o que permite fazer o exemplo, como declarado é o de inserir gráficos dentro das células. Então, se você pode adicionar opções extras, como a criação de uma classe ou de controle.

Abaixo vemos o formulário do projeto em execução:

Tudo muito simples do jeitão do Visual Basic.

Pegue o projeto completo aqui: CopiandoImagens.zip

Veja os Destaques e novidades do SUPER CD VB 2013 (sempre atualizado) : clique e confira !

Quer migrar para o VB .NET ?

Veja mais sistemas completos para a plataforma .NET no Super DVD .NET , confira...

Quer aprender C# ??

Chegou o Super DVD C# 2013 com exclusivo material de suporte e vídeo aulas com curso básico sobre C#.

Referências:

José Carlos Macoratti