Valeu Sandro mas não deu certo... declarei as variáveis mas continua o problema
de access violation...
João, o que me forneceram foi uma OCX que eu importei pro Delphi 7. Aí foi
gerada uma unit que importei ao meu projeto. A unit tem a estrutura que postei
abaixo.
Não sei o que pode estar faltando, sinceramente nunca trabalhei com ocx antes.
Obrigado pela ajuda, mas continuo sem saber o que fazer...
Abraços
----- Mensagem original ----
De: sandrobit2000 <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Maio de 2007 16:00:10
Assunto: [delphi-br] Re: erro ao criar objeto - object or class type required
kra este problema eu tive pq passava direto o valor e nao eh o correto
para a dll, tente passar por referencia, isso acho q ajuda no meu caso
ajudou:
errado
F.InicializarCompon ente(Barras, 1, 1, true, true, 1 );
correto
F.InicializarCompon ente(Barras, iVar1, iVar2, bVar1, bVar2, iVar1 );
Espero q te ajude
Bit
Ainda falta informação nos seus fontes, alguém tem que criar um objeto
que implemente a interface _Modelo_RT. Então basta você:
var
VModelo: _Modelo_RT;
begin
VModelo := Obj.Create as _Modelo_RT;
e VModelo estará pronto pra uso.
--
Joao Morais
>
> ----- Original Message -----
> From: [EMAIL PROTECTED]
> To: delphi-br@yahoogrupos.com.br
> Sent: Tuesday, May 15, 2007 11:31 AM
> Subject: Re: [delphi-br] erro ao criar objeto - object or class type required
>
>
> Rubem, fiz o teste como vc citou, mas continua o erro de "Object or Class
> Type Required".
>
> Amigos, basicamente a estrutura da minha unit é:
>
> unit exemplo;
>
> {$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers.
> {$WARN SYMBOL_PLATFORM OFF}
> {$WRITEABLECONST ON}
> {$VARPROPSETTER ON}
> interface
>
> uses Windows, ActiveX, Classes, Graphics, OleCtrls, OleServer, StdVCL,
> Variants;
>
> const
> // TypeLibrary Major and minor versions
> Modelo_MajorVersion = 8;
> Modelo_MinorVersion = 9;
>
> LIBID_Modelo_RealTime: TGUID = '{1E7931DE...}';
>
> type
> Seriais = TOleEnum;
> const
> Com1 = 1;
> Com2 = 2;
> Com3 = 3;
>
> // tem uma sequencia grande de type´s e const´s ...
>
> type
> _Modelo_RT = interface;
> _Modelo_RTDisp = dispinterface;
> __Modelo_RT = dispinterface;
>
> Modelo_RT = _Modelo_RT;
>
> // *********************************************************************//
> // Declaration of structures, unions and aliases.
> // *********************************************************************//
> Status = packed record
> Data : TDateTime;
> Hora : TDateTime;
> etc...
> end;
>
> _Modelo_RT = interface(IDispatch)
> ['{654C5BE8...}']
>
> // aqui tem as funções que quero utilizar, como por exemplo a
> InicializarComponente
> end;
>
> implementation
>
> uses ComObj;
>
> end.
>
> Agora pergunto... como utilizo estas funções/procedures em meu projeto ?
>
> Obrigado
----- Mensagem original ----
De: sandrobit2000 <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Maio de 2007 16:00:10
Assunto: [delphi-br] Re: erro ao criar objeto - object or class type required
kra este problema eu tive pq passava direto o valor e nao eh o correto
para a dll, tente passar por referencia, isso acho q ajuda no meu caso
ajudou:
errado
F.InicializarCompon ente(Barras, 1, 1, true, true, 1 );
correto
F.InicializarCompon ente(Barras, iVar1, iVar2, bVar1, bVar2, iVar1 );
Espero q te ajude
Bit
__________________________________________________
Fale com seus amigos de graça com o novo Yahoo! Messenger
http://br.messenger.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
