Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 19.11.2008, 08:03
Ama Ama вне форума
Активный
 
Регистрация: 15.07.2008
Сообщения: 260
Репутация: 23
По умолчанию Вопрос по системе

Доброе время суток. Подскажите как мне добавить в системное меню винды свою команду. Т.е. Когда выделяются файлы и нажимая левую кнопку мыши чтобы в меню была и моя команда, как например у винрара
Ответить с цитированием
  #2  
Старый 19.11.2008, 08:40
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию

может правую
Ответить с цитированием
  #3  
Старый 19.11.2008, 09:01
Alexo Alexo вне форума
Начинающий
 
Регистрация: 24.01.2007
Сообщения: 191
Репутация: 15
По умолчанию

Код:
procedure AddFileMenu(Const FilePrefix : String);
const
  MenuTitle = 'Edit with Prog';
  
var
  Reg : TRegistry;
  Typ : string;

begin
  reg := TRegistry.Create;
  with reg do begin
    RootKey := HKEY_CLASSES_ROOT;
    OpenKey('.' + FilePrefix, True);
    typ := ReadString('');
    if typ = '' then begin
      typ := Fileprefix + 'file';
      WriteString('', typ);
    end;
    CloseKey;
    OpenKey(typ + '\shell\' + MenuTitle + '\command', True);
    WriteString('', ParamStr(0) + ' "%1"');
    CloseKey;
    Free;
  end;
end;
__________________
Delphi - это лишь инструмент, а что ты сможешь создать при помощи этого инструмента, зависит исключительно от тебя.
Ответить с цитированием
  #4  
Старый 19.11.2008, 09:25
Ama Ama вне форума
Активный
 
Регистрация: 15.07.2008
Сообщения: 260
Репутация: 23
По умолчанию

Мне нужно добавить команду не на определенный тип файлов, а на все файлы и папки.

Последний раз редактировалось Ama, 20.11.2008 в 16:39.
Ответить с цитированием
  #5  
Старый 20.11.2008, 16:38
Ama Ama вне форума
Активный
 
Регистрация: 15.07.2008
Сообщения: 260
Репутация: 23
По умолчанию

Т.е. я имею в виду, как у какого-нибудь антивирусника или архиватора, когда щелкаешь правой кнопкой мыши что в этом Popup меню была и моя команда и еще как получить доступ к выделленым файлам при вызове этого самого Popup меню.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 20:07.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter