Utilizo isso com frequência, os eventos abaixo simulam o CTRL + e CTRL – (
rotacionar no sentido horário e anti-horário respectivamente ).

 

   // Pressiona CTRL SHIFT - ( Rotacionar sentido anti-horário )

   Keybd_Event( VK_CONTROL, 0, KEYEVENTF_EXTENDEDKEY or 0, 0 );

   Keybd_Event( VK_SHIFT, 0, 0, 0 );

   Keybd_Event( VK_SUBTRACT, 0, 0, 0 );

 

   // Libera CTRL e SHIFT

   Keybd_Event( VK_CONTROL, $45, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0
);

   Keybd_Event( VK_SHIFT, $45, KEYEVENTF_KEYUP, 0 );

 

----------------------------------------------------------------------------
--------

 

   // Pressiona CTRL SHIFT + ( Rotacionar sentido horário )

   Keybd_Event( VK_CONTROL, 0, KEYEVENTF_EXTENDEDKEY or 0, 0 );

   Keybd_Event( VK_SHIFT, 0, 0, 0 );

   Keybd_Event( VK_ADD, 0, 0, 0 );

 

   // Libera CTRL e SHIFT

   Keybd_Event( VK_CONTROL, $45, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0
);

   Keybd_Event( VK_SHIFT, $45, KEYEVENTF_KEYUP, 0 );

 

 

Espero que te ajude,

 

[]´s Roberto Camoloze

 

De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em
nome de Magnun Oliveira
Enviada em: sexta-feira, 13 de abril de 2007 11:29
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Rotacionar PDF utilizando ActiveX

 

Só um adendo ... os atalhos de teclado ainda funcionam neh? precisei disto
uma vez e a solução foi tranformar os pdfs em jpg e exibi-los com TImage.

----- Original Message ----- 
From: eric 
To: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br>  
Sent: Thursday, April 12, 2007 1:36 PM
Subject: [delphi-br] Rotacionar PDF utilizando ActiveX

Boa tarde, colegas.

Ao me deparar com a necessidade de abrir um PDF por dentro da minha
aplicação, descobri que a Adobe disponibiliza um ActiveX para lidar com
arquivos desta extensão.

Tudo está funcionando muito bem, porém, meu sistema não pode permitir que o
usuário salve o PDF, nem copie, nem imprima... etc.. enfim..., o usuário
apenas poderá visualizar o arquivo, navegar por suas páginas, trabalhar com
o zoom e com a rotação.

Como não encontrei uma forma de sesabiliar as funcionalidades indesejadas na
ToolBar, fui forçado a ocultá-la e fazer via código a utilização do Zoom. (a
navegação deixei por conta do próprio componente, não ocultando a
ScrollBars).

A dificuldade que encontrei é utilizar via código a opção de rotacionar o
arquivo.

Será que alguém poderia me ajudar?

Agradeço a atenção.

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]

Responder a