ShellBrowser Delphi Components Documentation
|
For each context menu item, the following example will ask the user whether or not to execute the selected action:
procedure TMainForm.ShellTreeContextMenuSelect(const command: String; var execute: Boolean); begin execute := mrYes = MessageDlg('Execute command "'+ command +'" on folder:'+ ShellTree.SelectedFolder, mtConfirmation, [mbYes, mbNo], 0); end;