Пример плагина на ATL/WTL типа Экстформс-эксплорера..
Написан в порядке изучения ATL и WTL
В копилочку..... Если есть жалание покритиковать, милости просим..

http://www.1cpp.ru/forumfiles/Attachments/OCP_ExtFiles_2006-06-22_19-10.rar

Еще.

В корне дерева лучше полный путь не показывать, а только имя его последней директории, а полный путь - в хинте, например, или в статусной строке при выделении соответствующей ветки дерева, а для традиционных предопределенных путей - их мнемо-имена (КаталогИБ и КаталогПриложения соответственно).

Цитата:

могу дать пример переименования и помещения в корзину файла/папки, написано на дельфе, но происходит вызов команд WinAPI, так что думаю перевести тебе труда не составит.
или мне самому дописать на VC++?

procedure SendToRecycleBin(FileName: string);
var
  SHF: TSHFileOpStruct;
begin
  try
    with SHF do begin
     Wnd := Application.Handle;
     wFunc := FO_DELETE;
     pFrom := PChar(FileName + #0 + #0);
     fFlags := FOF_ALLOWUNDO // Preserves undo information, if possible.
     or FOF_SILENT //  Does not display a progress dialog box.
     or FOF_NOCONFIRMATION; //  Responds with "yes to all" for any dialog box that is displayed.
     pTo := '';
     fAnyOperationsAborted := false;
     hNameMappings := nil;
     lpszProgressTitle := 'qwer';
    end;
    SHFileOperation(SHF);
  except
    // to do : generate error
  end;
end;

переименовать
    with SHF do begin
     Wnd := Application.Handle;
     wFunc := FO_RENAME;

     fFlags := FOF_ALLOWUNDO // Preserves undo information, if possible.
     or FOF_SILENT //  Does not display a progress dialog box.
     or FOF_NOCONFIRMATION; //  Responds with "yes to all" for any dialog box that is displayed.

     pFrom := PChar(vOldPos + #0);
     pTo := PChar(vNewPos);

     fAnyOperationsAborted := false;
     hNameMappings := nil;
     lpszProgressTitle := 'идет обработка ...';
    end;
    SHFileOperation(SHF);

Копирование перенос
  with OpStruc do begin
    Wnd := Handle;

    if cbMove.Checked then
     wFunc := FO_MOVE
    else
     wFunc := FO_COPY;

    pFrom := pchar(vOldPos + #0);
    pTo := pchar(vNewPos);

    case ComboBoxToDoWithSameName.ItemIndex of
     0: fFlags := FOF_NOCONFIRMMKDIR or FOF_NOCONFIRMATION;
     1: fFlags := FOF_NOCONFIRMMKDIR or FOF_RENAMEONCOLLISION;
    end;

    fAnyOperationsAborted := False;
    hNameMappings := nil;
    lpszProgressTitle := nil;
    ShFileOperation(OpStruc);
  end;

trdm писал(а) 23. Июня 2006 :: 10:43:


??

Цитата:

Достаточно двух пиктограмм - папка и файл.

Цитата:


Ага, понял. В любом случае, спасибо... за пример .

Вроде финал-релиза:
- файловые операции как в виндовом проводнике (ч/з динам. меню..),
- включение дополнительных директорий,
- включение, отключение стандартных каталогов IBDir & BinDir,
- включения/исключения файлов по имени и расширению,
- минимум дефолтных настроек,
- может еще чего найдете..
Пиктограммы пока не делал, если есть желающие, могу выложить исходники...

trdm писал(а) 26. Июня 2006 :: 13:32:


Шикарно! Спасибо!

Цитата:


Почему бы их по умолчанию сразу не выкладывать, раз не жалко? Так больше шансов, что кто-то решит ими воспользоваться, тем более, что не сделанные фичи здесь же озвучены.

Эх.......
Видимо не слишком востребован функционал..... Ни кто пиктограмки так и не прикрутил....