ToleAuto() x TActivex()

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
fladimir
Colaborador
Colaborador
Mensagens: 2445
Registrado em: 15 Nov 2006 20:21

ToleAuto() x TActivex()

Mensagem por fladimir »

Olá nobres colegas...

Tenho algumas rotinas q uso o ToleAuto():New('InternetExplorer.Application') ....

Pesquisando vi q os colegas q usam o Fivewin usam em alguns casos o TActivex() // parece q é uma classe feita pelo Antonio Linhares pra manipular o Shell.Explorer.2 e outros. (não tenho certeza)

Exemplo:

Código: Selecionar todos

oActiveX = TActiveX():New( oWnd, "Shell.Explorer.2" ) 
oChildWnd:oClient = oActiveX
oActiveX:Do("Navigate2",(CurDrive() + ":\"+CurDir()+"\project.htm"))
ACTIVATE WINDOW oChildWnd
Minhas dúvidas são algum é mais vantajoso q o outro?
Quando usar 1 e qdo usar outro?
O q preciso é consultar o CNPJ pelo Sintegra q nem temos exemplos de uma classe q um colega fez em FiveWin e extrair o conteúdo, porém até onde vi usa-se a classe TActivex() q parece ser do Five, então voltando ao tópico qual a diferença com o TOleAuto() poderia conseguir o mesmo efeito de extração sem usar o TActivex e manipular o Shell.Explorer via classes nativas do Harbour?

´[]´s
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web


Sejamos gratos a Deus.
Kapiaba
Colaborador
Colaborador
Mensagens: 1908
Registrado em: 07 Dez 2012 16:14
Localização: São Paulo
Contato:

ToleAuto() x TActivex()

Mensagem por Kapiaba »

Para consultar o Sintegra, pode-se usar qualqeur um dos dois. Eu prefiro em aCtiveX, pois senti mais segurança, e é mais novo.

Mas, gosto é gosto, faça o teste com os dois, e decida.

Abs
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

ToleAuto() x TActivex()

Mensagem por asimoes »

Fladimir,

Em harbour, activex você vai achar exemplos de uso em:

fonte: demowvg.prg em conrib\gtwvg
finte: activex.prg em contrib\hbwin
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
fladimir
Colaborador
Colaborador
Mensagens: 2445
Registrado em: 15 Nov 2006 20:21

ToleAuto() x TActivex()

Mensagem por fladimir »

vlw
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web


Sejamos gratos a Deus.
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

ToleAuto() x TActivex()

Mensagem por rochinha »

Amiguinhos,

Sempre uso TOleAuto(), gosto mais, exemplo:

Código: Selecionar todos

...
oTeste := TOleAuto():New( "Shell.Explorer" )
oTeste:Parametro1 := 1
oTeste:Metodo( "teste", 123, date() )
...
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Responder