Objeto Unidanfe

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

Moderador: Moderadores

Avatar do usuário
Alexandre Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 376
Registrado em: 26 Mar 2007 00:16
Localização: Itapema - SC

Objeto Unidanfe

Mensagem por Alexandre Silva »

Entao pessoal, pergunta meio basica,
mas porque nao consigo criar o objeto ?
precisa fivewin.ch ? tenho que instalar Five Win ?

Config:=CreateObject("Unimake.Unidanfe.Configurations.UnidanfeConfiguration")
*config:=TOLEAUTO():New("Unimake.Unidanfe.Configurations.UnidanfeConfiguration")

as duas opcoes acima retornam
Error TOleAuto/-1 CO_E_CLASSSTRING: TOLEAUTO:NEW

na compilacao eu uso
-lxhb
-lhbct
-lhbwin
-lhbtip
* Clipper 5.2e/Gaspro 4.0 /CDX/Blinker 7.0 Harbour 3.2 Console Hbmk2
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

sua assinatura menciona Harbour 3.2
Troque CreateObject() por win_OleCreateObject()
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Alexandre Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 376
Registrado em: 26 Mar 2007 00:16
Localização: Itapema - SC

Objeto Unidanfe

Mensagem por Alexandre Silva »

nao deu o erro
mas o Obeto esta NIL, nao tem metodos

* Harbour 3.2 windows 7
* Clipper 5.2e/Gaspro 4.0 /CDX/Blinker 7.0 Harbour 3.2 Console Hbmk2
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

Não sei como dá pra ver se o componente está instalado e disponível pra uso.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Alexandre Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 376
Registrado em: 26 Mar 2007 00:16
Localização: Itapema - SC

Objeto Unidanfe

Mensagem por Alexandre Silva »

Estou tentando compilar o que está no anexo
Anexos
UniDanfeDLL_xHarbour.zip
(1.61 KiB) Baixado 340 vezes
* Clipper 5.2e/Gaspro 4.0 /CDX/Blinker 7.0 Harbour 3.2 Console Hbmk2
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

Já instalou toda parte do unidanfe?
Se não instalou, não vai conseguir usar.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Alexandre Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 376
Registrado em: 26 Mar 2007 00:16
Localização: Itapema - SC

Objeto Unidanfe

Mensagem por Alexandre Silva »

Sim claro, instalei, testei ok
O que se pretende é usar via DLL , independente de ter o aplicativo aberto.
* Clipper 5.2e/Gaspro 4.0 /CDX/Blinker 7.0 Harbour 3.2 Console Hbmk2
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Objeto Unidanfe

Mensagem por alxsts »

Olá!

Você diz usar Harbour mas...
Alexandre Silva escreveu:na compilacao eu uso
-lxhb
Usa alguma função do xHarbour? Se não usa, retire esta lib. Talvez esteja causando algum conflito...
[]´s
Alexandre Santos (AlxSts)
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

win_OleCreateObject() é pra usar o que está instalado no Windows.
Se não estiver instalado e/ou liberado, não aparece.
Ou se depender de liberaçào, sei lá se eles fizeram isso de graça.
Como a DLL mistura COM e NET FRAMEWORK, pode ter necessidades especiais.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

alxsts escreveu:Usa alguma função do xHarbour? Se não usa, retire esta lib. Talvez esteja causando algum conflito...
Lembro de ter visto conflito no XHarbour, ao usar dois tipos ao mesmo tempo, que fazem o mesmo que win_OleCreateObject().
No Harbour, as duas tem o mesmo destino, mesmo a de compatibilidade com XHarbour, então talvez não tenha conflito.

Mas...... as bost.as de LIBs feitas pra XHarbour costumam adicionar outra função, que pode conflitar com tudo.
Tá cheio de CreateObject() espalhado por aí, por causa do XHarbour.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

createobject.png
Só uma busca rápida.
HMG tem a função CreateObject()
HMG Extended, num mesmo exemplo usa CreateObject() e win_OleCreateObject()

Então...
Quando usa Harbour, a solução é uma só.
Mas quando usa XHarbour ou Harbour com LIB gráfica... aí cada um que veja com seus fornecedores de LIB.

Parece piada, mas fazer o que?

Aí vém as discussões de um dizer que funciona de um jeito, e outro dizer que funciona de outro, ou com Harbour ou com XHarbour, ou com bcc, msvc, mingw, etc.
Na prática, as LIBs continuam sem padrão.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
malcarli
Usuário Nível 3
Usuário Nível 3
Mensagens: 239
Registrado em: 20 Ago 2015 18:14
Localização: marilia/sp

Objeto Unidanfe

Mensagem por malcarli »

Boa tarde, também não conseguir executar. Utilizando harbour x minigui extended. Pacote de dlls baixado e instalado conforme instruções do site.

Código: Selecionar todos

* ---------------------------------------------------------------------------------
* Carregar tela de configuração do UniDANFE
* ---------------------------------------------------------------------------------
Function TelaConfiguracao()
   Local TelaConfig
  
 * Criar objeto
 *  TelaConfig = CreateObject("Unimake.Unidanfe.UnidanfeServices")

   TelaConfig = win_oleCreateObject("Unimake.Unidanfe.UnidanfeServices")
   
 * Abrir tela de configuração  
   TelaConfig:ShowConfigurationScreen()
   
   Wait
RETURN nil

Compila, mas ao executar dá msg de método não exportado, conforme imagem em anexo. Também não entendi o porque, quem se habilita?
Anexos
1.png
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

Tente pelo Windows/VB.

Código: Selecionar todos

---arquivo vbs----
DIM oTela
SET oTela = createobject( "..." )
oTela.ShowConfigurationScreen
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Objeto Unidanfe

Mensagem por JoséQuintas »

malcarli escreveu:Pacote de dlls baixado e instalado conforme instruções do site.
E onde tem isso?
Cadê o link?
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
malcarli
Usuário Nível 3
Usuário Nível 3
Mensagens: 239
Registrado em: 20 Ago 2015 18:14
Localização: marilia/sp

Objeto Unidanfe

Mensagem por malcarli »

Responder