Abrir Explorer e selecionar vários arquivos
Preciso do meu programa abrir o Windows Explorer e deixar selecionado vários arquivos. Sei que a função SHOpenFolderAndSelectItems da API faz isto, mas não consegui usá-la. Alguém já usou esta função?
Rodrigo
Curtidas 0
Respostas
Rodrigo
05/04/2011
Ninguém sabe me ajudar?
GOSTEI 0
Rodrigo
05/04/2011
Encontrei a solução, mas em C++. Se alguém tiver interesse, segue o código para uma aplicação console em C++:
//---------------------------------------------------------------------------#include <shlobj.h>
#pragma hdrstop
//---------------------------------------------------------------------------
#pragma link "shell32.lib"
#pragma argsused
int main(int argc, char* argv[])
{
// Initialize COM
CoInitialize(NULL);
LPITEMIDLIST pidlFolder = ILCreateFromPath("C:\\Sitrad");
LPITEMIDLIST *pidlChildren = new LPITEMIDLIST[5];
pidlChildren[0] = ILCreateFromPath("C:\\Sitrad\\Logo.bmp");
pidlChildren[1] = ILCreateFromPath("C:\\Sitrad\\logo 4_5.bmp");
pidlChildren[2] = ILCreateFromPath("C:\\Sitrad\\LogoHelpESP.bmp");
pidlChildren[3] = ILCreateFromPath("C:\\Sitrad\\LogoHelpING.bmp");
pidlChildren[4] = ILCreateFromPath("C:\\Sitrad\\LogoHelpPTB.bmp");
// Open Folder
SHOpenFolderAndSelectItems(pidlFolder, 5, (PCUITEMID_CHILD_ARRAY)pidlChildren, 0);
// Free allocated objects
ILFree(pidlFolder);
for (int x = 0; x < 5; x++) {
ILFree(pidlChildren[x]);
}
delete[] pidlChildren;
return 0;
}
//---------------------------------------------------------------------------
GOSTEI 0
Thiago Santana
05/04/2011
Tenta usar o componente OpenDialog...
Com ele vc ira abrir o explorer atraves do Delphi!
Espero ter ajudado...
Com ele vc ira abrir o explorer atraves do Delphi!
Espero ter ajudado...
GOSTEI 0