Плагин к Internet Explorer

← →
Delpher_Gray (2004-12-09 17:59) [0]

Делаю прогу-качалку с нета, а так-же всевозможные утилиты для пользователя интернета, проверка почты, закладки, и т.п... Вобщем хочу чтоб моя прога вклеивалась в Internet Explorer как тулбар, как это сделать ??

← →
mefisto (2004-12-09 19:16) [1]

Насчет тулбар незнаю но кнопку мона!!!!!!

======
ButtonText = Всплывающая подсказка к кнопке
MenuText = Текст, который будет использован для пункта в меню "Сервис"
MenuStatusbar = *Ignore*
CLSID = Ваш уникальный classID. Для создания нового CLSID (для каждой кнопки) можно использовать GUIDTOSTRING.
Default Visible := Показать ей.
Exec := Путь к Вашей программе.
Hoticon := иконка из shell32.dll когда мышка находится над кнопкой
Icon := иконка из shell32.dll

procedure CreateExplorerButton;
const
TagID = "\{10954C80-4F0F-11d3-B17C-00C0DFE39736}\";
var
Reg: TRegistry;
ProgramPath: string;
RegKeyPath: string;
begin
ProgramPath := "c:\folder\exename.exe";
Reg := TRegistry.Create;
try
with Reg do
begin
RootKey := HKEY_LOCAL_MACHINE;
RegKeyPath := "Software\Microsoft\Internet Explorer\Extensions";
OpenKey(RegKeyPath + TagID, True);
WriteString("ButtonText", "Your program Button text");
WriteString("MenuText", "Your program Menu text");
WriteString("MenuStatusBar", "Run Script");
WriteString("ClSid", "{1FBA04EE-3024-11d2-8F1F-0000F87ABD16}");
WriteString("Default Visible", "Yes");
WriteString("Exec", ProgramPath);
WriteString("HotIcon", ",4");
WriteString("Icon", ",4");
end
finally
Reg.CloseKey;
Reg.Free;
end;
end;

После выполнения этого кода достаточно просто запустить IE.

← →
Delpher_Gray (2004-12-19 14:29) [2]

Да, про кнопку я знаю, но ведь как-то можно и тулбар ? Это по-моему ActiveX нужно писать, а как ?

Плагин к Internet Explorer - тулбар Найти похожие ветки