![]() |
|
|
#1
|
|||
|
|||
|
Доброе время суток. Подскажите как мне добавить в системное меню винды свою команду. Т.е. Когда выделяются файлы и нажимая левую кнопку мыши чтобы в меню была и моя команда, как например у винрара
|
|
#2
|
|||
|
|||
|
может правую
![]() |
|
#3
|
|||
|
|||
|
Код:
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; |
|
#4
|
|||
|
|||
|
Мне нужно добавить команду не на определенный тип файлов, а на все файлы и папки.
Последний раз редактировалось Ama, 20.11.2008 в 16:39. |
|
#5
|
|||
|
|||
|
Т.е. я имею в виду, как у какого-нибудь антивирусника или архиватора, когда щелкаешь правой кнопкой мыши что в этом Popup меню была и моя команда и еще как получить доступ к выделленым файлам при вызове этого самого Popup меню.
|