Jump to content

Shortcuts


rjsma

Recommended Posts

"ya" ? É difícil de ajudar sem perceber ao certo o que pretendes... vou tentar:

Eu penso que o que ele procura é uma maneira de correr outras aplicações a partir da dele, podendo assim construír uma barra de atalhos.

Process.Start será suficiente?

Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Link to comment
Share on other sites

Pelo que vi do vídeo, ele usa uma listview para colocar lá os ficheiros. Na descrição ele deixa lá o link para download.

Depois, para compreenderes como funciona o drag drop, lê este artigo da wiki:

https://wiki.portugal-a-programar.pt/dev_net/vb.net/dragdrop/

Por fim, é associares os conceitos. Tenta fazer algo e quando encravares, colocas o código que te está a criar confusão, e alguém te vai ajudar nesse problema concreto. É que assim é complicado, há muitas pontas por onde pegar.

Nick antigo: softclean | Tens um projeto? | Wiki P@P

Ajuda a comunidade! Se encontrares algo de errado, usa a opção "Denunciar" por baixo de cada post.

Link to comment
Share on other sites

Então não te ajudei "nada" 😉

Naquele primeiro vídeo que mostraste, eles para carregar os ícones usam uma ImageList (que também está na toolbox, onde vais buscar a listview). Depois a parte de carregar os icones é feita por código, que está algures no meio do vídeo (não fixei onde), ou no projecto que te dei o link de download.

Começa por preparar essa parte e tenta pô-la a funcionar, depois já se trata do drag drop de atalhos para lá. 😉

Nick antigo: softclean | Tens um projeto? | Wiki P@P

Ajuda a comunidade! Se encontrares algo de errado, usa a opção "Denunciar" por baixo de cada post.

Link to comment
Share on other sites

coloquei este codigo ao programa

For Each foundFile As String In My.Computer.FileSystem.GetFiles(path)

                lvItem = ListView.Items.Add(My.Computer.FileSystem.GetFileInfo(foundFile).Name)

ListViewLargeImageList.Images.Add(System.Drawing.Icon.ExtractAssociatedIcon(foundFile).ToString, System.Drawing.Icon.ExtractAssociatedIcon(foundFile))

                ListViewSmallImageList.Images.Add(System.Drawing.Icon.ExtractAssociatedIcon(foundFile).ToString, System.Drawing.Icon.ExtractAssociatedIcon(foundFile))

                lvItem.ImageKey = ListViewLargeImageList.Images.Keys(passar_icons).ToString

                lvItem.SubItems.AddRange(New String() {My.Computer.FileSystem.GetFileInfo(foundFile).Extension, "Column3"})

                passar_files = passar_files + 1

                tssl_ficheiros.Text = passar_files & " Ficheiros e " & passar_dirs & " Pastas = " & passar_dirs + passar_files

                passar_icons = passar_icons + 1

                Application.DoEvents()

            Next

mas diz que o path nao foi declarado

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.