Amigo, no centura vc precisará usar ActiveX para manipular o IE. Eu já fiz 
manipulação do Excel via ActiveX e, por isso, sei que é possível manipular o IE 
apesar de nunca tê-lo feito. Existe um exemplo de uso de ActiveX pelo centura 
no site http://www.guptaexplorer.com.br.

Ricardo Gomes.
  ----- Original Message ----- 
  From: Luiz Henrique da Cruz 
  To: sqlwin@virtualand.net 
  Sent: Monday, May 28, 2007 4:09 PM
  Subject: [sqlwin] Manipulando propriedades do Internet Explorer com Centura


  Boa tarde,

   

  Alguém saberia me dizer se tem como criar objetos OLE pelo Centura.

  Precisaríamos criar o objeto do internet explorer e mudar algumas 
propriedades.

   

  O código fonte em Delphi fica da seguinte forma:

   

    IEApp := CreateOLEObject('InternetExplorer.Application'); 

    IEApp.visible := true; 

    IEApp.Top := 0; 

    IEApp.Left := 0; 

    IEApp.width := screen.width; 

    IEApp.height := screen.height; 

    IEApp.Navigate('http://www.clubedelphi.net'); 

   

  Caso alguem saiba como faço, ou onde posso procurar, ficarei muito grato.

   

  Abraços,

  LUIZ HENRIQUE DA CRUZ
  Centura Developer
  [EMAIL PROTECTED] 
  ASM Soluções em RH
  Rua Álvares Penteado, 203
  Cep: 01012-001 - São Paulo - SP
  Tel: +55 (11) 3526-5206
  Fax: +55 (11) 3526-5218

  www.asm.com.br 

   


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

  De: Alex Gauna [mailto:[EMAIL PROTECTED] 
  Enviada em: segunda-feira, 28 de maio de 2007 14:44
  Para: 'Luiz Henrique da Cruz'
  Assunto: Manipulando propriedades do Internet Explorer com Centura

   

  Luis,

   

  Segue código de exemplo em Delphi. Será que existe algo parecido em Centura?

   

  Tem culhões de colocar o artigo na lista?

   

  procedure TForm1.Button1Click(Sender: TObject); 

  begin 

    IEApp := CreateOLEObject('InternetExplorer.Application'); 

    IEApp.visible := true; 

    IEApp.Top := 0; 

    IEApp.Left := 0; 

    IEApp.width := screen.width; 

    IEApp.height := screen.height; 

    IEApp.Navigate('http://www.clubedelphi.net'); 

  end;

   

  valeu,

   

   

   

   

  Atenciosamente,

   

   

   

  Alex Fabiano F. Gauna

  ASM Soluções em RH

  Tel.: (11) 3526-5221
  Fax: (11) 3526-5272
  [EMAIL PROTECTED] 

   

<<image001.jpg>>

Responder a