Meu botão no I.E
19/12/2003
0
[color=darkblue:6ecb8033b7]Gostaria de criar um botão no Internet Explorer, que ao ser clicado abrisse uma página de internet na mesma janela onde se encontra o botão.[/color:6ecb8033b7]
Grato pela atenção,
Túlio Sérgio
Grato pela atenção,
Túlio Sérgio
Tulio.sergio
Curtir tópico
+ 0
Responder
Posts
19/12/2003
Cebikyn
Assim:
Nas linhas marcadas com ´<--´, você escolhe um ícone para seu botão. Colocando do jeito que está, o IE mostrará o ícone 4 da shell32.dll. Vc pode colocar um ícone que está em seu programa, trocando a linha por:
WriteString(´HotIcon´, ´C:\SeuPrograma\SeuPrograma.exe,1´);
Note que a primeira linha marcada especifica qual ícone será exibido qnd o mouse passar por cima do botão, e a segunda especifica qual o ícone “normal”
[b:446cffb9e1]Funciona para Internet Explorer 5.0 ou superior.[/b:446cffb9e1]
const Tagit = ´\{10954C80-4F0F-11d3-B17C-00C0DFE39736}\´; var Reg: TRegistry; Path1: string; Merge: string; begin Reg := TRegistry.Create; try with Reg do begin RootKey := HKEY_LOCAL_MACHINE; Path1 := ´Software\Microsoft\Internet Explorer\Extensions´; Merge := Path1 + Tagit; OpenKey(Merge, True); WriteString(´ButtonText´, ´Texto do Botão´); WriteString(´MenuText´, ´Texto do Botão´); WriteString(´MenuStatusBar´, ´Texto para a Barra de Status do IE´); WriteString(´ClSid´, ´{1FBA04EE-3024-11d2-8F1F-0000F87ABD16}´); WriteString(´Default Visible´, ´Yes´); WriteString(´Exec´, ´http://www.clubedelphi.com.br/´); WriteString(´HotIcon´, ´,4´); // <-- WriteString(´Icon´, ´,4´); // <-- end finally Reg.CloseKey; Reg.Free; end; end;
Nas linhas marcadas com ´<--´, você escolhe um ícone para seu botão. Colocando do jeito que está, o IE mostrará o ícone 4 da shell32.dll. Vc pode colocar um ícone que está em seu programa, trocando a linha por:
WriteString(´HotIcon´, ´C:\SeuPrograma\SeuPrograma.exe,1´);
Note que a primeira linha marcada especifica qual ícone será exibido qnd o mouse passar por cima do botão, e a segunda especifica qual o ícone “normal”
[b:446cffb9e1]Funciona para Internet Explorer 5.0 ou superior.[/b:446cffb9e1]
Responder
Clique aqui para fazer login e interagir na Comunidade :)