API do Windows

Question

Em um formul�rio usei o componente webBrowser para navegar na web, quando eu pressiono as teclas ctrl+P chamo a janela de impress�o do windows. Como fa�o para chamar essa tela atrav�s de um menu?
Gostaria de usar tbm a fun��o copiar e colar do windows atrav�s de uma procedure. Algu�m sabe como fa�o?
Valeu,
C�ssio

Adriano Santos · Answer

U� cara, n�o entendi.Se conseguiu colocar um CTRL+P para chamar a janela (que por entre aspas seria at� mais dif�cil) por que n�o consegue colocar no Menu?Coloque a fun��o que chama a impress�o em um item de menu, v� nas propriedades deste item e olhe a propriedade ShortCut. Configure-a com o atalho que voc� quer CTRL+P, acabou o problema.Quanto a copiar, o que exatamente quer copiar? Texto? Arquivo?...

Cassioflima · Answer

as teclas ctrl+P funcionam como atalho para impress�o do windows, sem que eu precise programar nada, isso vem de heran�a do windows, o que eu n�o consigo � fazer com que isso funcione atrav�s de programa��o delphi, como manipular a api do windows, entedeu?

Adriano Santos · Answer

Ahhhh, agora entendi. O CTRL + P j� � herdado por default no componente TWebBrowser n�? � verdade, pensei que voc� tivesse programado isso em algum local do seu sistema, desculpe.

Bom, neste caso voc� pode usar o seguinte:

procedure TfPrincipal.Button2Click(Sender: TObject);
var
  vaIn, vaOut: OleVariant;
begin
  WebBrowser1.ControlInterface.ExecWB(OLECMDID_PAGESETUP, OLECMDEXECOPT_DONTPROMPTUSER, vaIn, vaOut);
  //OLECMDID_OPEN
  //OLECMDID_NEW
  //OLECMDID_SAVE
  //OLECMDID_SAVEAS
  //OLECMDID_SAVECOPYAS
  //OLECMDID_PRINT
  //OLECMDID_PRINTPREVIEW
  //OLECMDID_PAGESETUP
  //OLECMDID_SPELL
  //OLECMDID_PROPERTIES
end;

Abra a unit SHDocVw e veja estas constantes. Tem v�rias l�, da pr� fazer a festa. :lol:

Cassioflima · Answer

excelente ajuda!!! e aproveitando seus conhecimentos, se eu quiser fazer outra coisa por exemplo: fazer com que novas p�ginas que s�o abertas exemplos pop-up serem abertos no meu browser, no mesmo esquema porexemplo do iexplorer, vc sabe como?
valeu :)

Adriano Santos · Answer

Cara, preciso dar uma olhada, mas adiantando acredito que voc� possa registrar no Windows (regedit) como browser padr�o, assim como faz outros browsers que voc� instala no computador.

Ex.: Quando voc� instala o FireFox e abre ele a primeira vez, ele te pergunta se voc� que ele seja o �visualizador� padr�o de p�ginas. Se responder sim ele registra no Regedit do Windows e ai s� alegria. Provavelmente ter� que fazer isso, s� � necess�rio descobrir qual chave � usada para isso no Regedit.

Adriano Santos · Answer

Consegui cara: � bem f�cil de fazer.[code:1:e65387ee61]//FirefoxMudarBrowserPadrao(�C:ARQUIV~1MOZILL~1FIREFOX.EXE -url "�1"�);//Internet ExplorerMudarBrowserPadrao(�C:Arquivos de programasInternet ExplorerIEXPLORE.EXE -nohome�);//Seu browserMudarBrowserPadrao(ParamStr(0));[/code:1:e65387ee61]Fun��o que muda o browser padr�o[code:1:e65387ee61]procedure MudarBrowserPadrao(APath: String);begin  Ini := TRegistry.Create;  Ini.RootKey := HKEY_CLASSES_ROOT;  Ini.OpenKey(�HTTPSHELLOPENCOMMAND�, False);  Ini.WriteString(��,APath);  Ini.Free;end;[/code:1:e65387ee61]S� � necess�rio programar direitinho o seu browser para funcionar abrindo as p�ginas com recebimento de par�metros, e j� era....

Cassioflima · Answer

Fiz o que vc disse, declarando a vari�vel Ini do tipo Tregistry e tbm declarando Registry em uses. Tbm deixei o browser recebendo parametro, mas quando � aberto um novo pop-up continua sendo aberto pelo iexplorer.

Adriano Santos · Answer

O que ocorre?Quando vc abre uma p�gina pelo seu browser que tem pop-up ele abre o pop-up no IE?...

Cassioflima · Answer

isso mesmo. Acessei o Regedit e em todos os lugares que estava sendo chamado o iexplorer.exe alterei para browser.exe mas mesmo assim ficou o iexplorer....

Adriano Santos · Answer

Esse prog � grande?Quer mandar pra mim?S� olhando agora, pq eu j� esgotei meus conhecimentos em cima do caso....

Cassioflima · Answer

qual o seu email?...

F�rum API do Windows #291870