Como por PopupMenu em um ShellTreeView

[masterbsb 2]

Pessoal, o componente ShellTreeView do Delphi, já possui um PopupMenu, mais na minha aplicação preciso de um PopupMenu personalizado, linkar o PopupMenu com o ShellTreeView já consigo de boa, a duvida é como poderia eu por exemplo, excluir um diretório ou arquivo exibido no ShellTreeView através do meu PopupMenu? Se alguém conseguir me ajudar com mais essa, ficaria muito grato! Abraços

[wprmsite 0]

Já que seu PoupMenu esta funcionando. Basta você pegar o diretorio do item selecionado que usar uma função para remove-lo.

 

Por exemplo: Se um arquivo tiver selecionado chame DeleteFile(Diretorio do arquivo).

[masterbsb 2]

wprmsite, valeu pela ajuda brother, consegui fazer! :)

Segue o simples código, caso possa interessar a mais alguém!

 

No menu excluir do TPopupMenu eu adicionei o seguinte código:

 

[COD]

procedure TForm1.Excluir1Click(Sender: TObject);

begin

//deleta o arquivo setado no shelltreeview

DeleteFile(ShellTreeView1.Path);

//atualiza o shelltreeview para não mais mostrar o arquivo deletado

ShellTreeView1.Refresh(ShellTreeView1.Items.GetFirstNode) ;

end;[/COD]

[wprmsite 0]

 

wprmsite, valeu pela ajuda brother, consegui fazer! :)

Segue o simples código, caso possa interessar a mais alguém!

 

No menu excluir do TPopupMenu eu adicionei o seguinte código:

 

[COD]

procedure TForm1.Excluir1Click(Sender: TObject);

begin

//deleta o arquivo setado no shelltreeview

DeleteFile(ShellTreeView1.Path);

//atualiza o shelltreeview para não mais mostrar o arquivo deletado

ShellTreeView1.Refresh(ShellTreeView1.Items.GetFirstNode) ;

end;[/COD]

 

 

wprmsite, valeu pela ajuda brother, consegui fazer! :)

Segue o simples código, caso possa interessar a mais alguém!

 

No menu excluir do TPopupMenu eu adicionei o seguinte código:

 

[COD]

procedure TForm1.Excluir1Click(Sender: TObject);

begin

//deleta o arquivo setado no shelltreeview

DeleteFile(ShellTreeView1.Path);

//atualiza o shelltreeview para não mais mostrar o arquivo deletado

ShellTreeView1.Refresh(ShellTreeView1.Items.GetFirstNode) ;

end;[/COD]

 

Falou amigo!