DonationCoder.com Software > ContextMenu Commander

ContextMenu Commander

<< < (14/17) > >>

GoodGuy98:
I would like the ability to do something along these lines.

This would be one operation to perform this function which is currently done manually.

(1). Right-click to create a New Folder
(2). Change Directory to the New Folder
(3). Change the default view to "List" in the Windows Explorer toolbar.
(4). Right-click to create a New Text Document and backspace over the
     "New Text Document.txt" to change it to "Url.txt".
(5). Double-click on "Url.txt" to open it with Notepad.

I copy the URL of the software into the "Url.txt" and store the downloaded
file into the New Folder.

Example of the Folder Structure.

C:\Arc\
  C:\Arc\Router Screen Capture\
    router_screen_capture_v1.0.5_setup.exe
    Url.txt
  C:\Arc\Simple Port Forwarding\
    simple_port_forwarding_v2.3.0_setup.exe
    Url.txt

It would create a new folder to add ContextMenu Commander and the Url.txt file.

  C:\Arc\ContextMenu Commander\
    contextmenu_commander.exe
    Url.txt

I would like to have a new right-click context menu entry to make the process as
easy as possible. The step to copy the URL of the software into the "Url.txt" and store the downloaded
file into the New Folder would still be done by hand.

MilesAhead:
afa opening a specific tab in the property page, I wrote this for CommentConfig and it's hard-wired to open the Comment tab, but it could be generalized.

What's not shown in this code snip is processing WMDropFiles message.
I load a StringList with the file names from the drag & drop. The way
I used it, if the CommentConfig program was open you could drag & drop
a bunch of files onto the program form and it would open them all to the
Comment Property Page Tab if it existed, instead of doing it by hand for
each file.

sei is an array of SHELLEXECUTEINFO structs with the same length
as FileList that you find out by handling WMDropFiles.

for each file dropped it does ShellExecuteEx with the 'properties' verb.
Then it looks for a child window with a Title containing whatever string
you are looking for.  In this case 'Comment'


--- ---procedure TForm1.ProcessFiles;
var
  x: Integer;
  CharsCopied: Cardinal;
  WindowHandle, CommentHandle: HWND;
  MyMsg: TMessage;
  AnError, Found: boolean;
  MaxTabs: Integer;

begin
  MaxTabs := 4;
  for x := 0 to Count - 1 do
  begin
    AnError := False;
    Found := False;
    ZeroMemory(@sei[x], sizeof(SHELLEXECUTEINFO));
    sei[x].cbSize := sizeof(SHELLEXECUTEINFO);
    sei[x].fMask := SEE_MASK_INVOKEIDLIST;
    sei[x].lpVerb := 'properties';
    sei[x].nShow := SW_SHOW;
    sei[x].lpFile := PChar(FileNameList[x]);
    sei[x].Wnd := Handle;
    if not ShellExecuteEx(@sei[x]) then
      raise Exception.Create('ShellExecuteEx Failed!');
    Sleep(500);
    WindowHandle := GetForegroundWindow;
    MyMsg.Msg := PSM_SETCURSEL;
    MyMsg.lParam := 0;
    MyMsg.wParam := 1;
    while (not AnError) and (MyMsg.wParam < MaxTabs) and (not Found) do
    begin
      if not PostMessage(WindowHandle, MyMsg.Msg, MyMsg.wParam, MyMsg.lParam) then
      begin
        ShowMessage('PostMessage Error!');
        AnError := True;
      end;
      Sleep(200);
      CommentHandle := GetWindow(WindowHandle, GW_CHILD);
      CharsCopied := GetWindowText(CommentHandle, Title, sizeof(Title) - 1);
      if Pos('Comment', Title) > 0 then
        Found := True;
      Inc(MyMsg.wParam);
    end; // While
  end; // For
end; // ProcessFiles

wxdjs:
thinks for this soft

VLM:
Is this project still active. (It's October 2011 :) If "yes", then from where can one download this software? Also, does the software enable one to rearrange the Windows context menu, and add/rearrange separators? I would find that VERY helpful!

MilesAhead:
Is this project still active. (It's October 2011 :) If "yes", then from where can one download this software? Also, does the software enable one to rearrange the Windows context menu, and add/rearrange separators? I would find that VERY helpful!
-VLM (October 04, 2011, 12:41 PM)
--- End quote ---

No. Nothing like that. It amounts to an old Delphi way of opening the Properties and then navigating to the Comment Tab for one or more selected files. If I did it today I'd probably use one of the hotkey languages.  AutoIt3 or AHK. I came up with this to make it a bit more convenient to add comments for multiple files.  In the Comment Tab is an EditBox that's used to read or edit the comment. CommentConfig and TipOff were both 32 bit explorer shell extensions.  Not only does 64 bit render them non functional, but the usage was less than smooth.

I've redone commenting for files using Comment Explorer.  But that has nothing to do with the Context Menu at all. It just uses clipboard and ToolTips to display file comments rather than the shell extension approach. It doesn't matter if the OS is 32 or 64 bit.

If you search Comment Explorer on donationcoder you'll see the thread for it.

Navigation

[0] Message Index

[#] Next page

[*] Previous page