Fórum Como salvar um arquivo que esta no ShellListView1 #351479
07/01/2008
0
Olá! Sweleciona a pasta, tudo certo, exibe os arquivos no ShellListView1. mas Preciso salvar automaticamente os arquivos que estão nele, na verdade são imagens .jpg. Os arquivos estao na memoria de uma camera digital. Não consigo dar um savetofile (´C:\´) dos arquivos. Alguem pode me ajudar
for liX3 := 0 to ShellListView1.Items.Count - 1 do
begin
// doload(shelllistview1.Folders[liX3].PathName);
//
ShellListView1.Items[liX3].Selected := True;
if ShellListView1.Items[liX3].selected = true then
begin
// verifica se existe a pasta, caso contrário, a cria
// SaveToFile(´C:\Documents and Settings\TR55057\Desktop\Imagens_Camera\´+ShellListView1.Folders[liX3].PathName);
end;
//
end;
for liX3 := 0 to ShellListView1.Items.Count - 1 do
begin
// doload(shelllistview1.Folders[liX3].PathName);
//
ShellListView1.Items[liX3].Selected := True;
if ShellListView1.Items[liX3].selected = true then
begin
// verifica se existe a pasta, caso contrário, a cria
// SaveToFile(´C:\Documents and Settings\TR55057\Desktop\Imagens_Camera\´+ShellListView1.Folders[liX3].PathName);
end;
//
end;
Marciopoffo
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)