COMO UTILIZAR OCX EM UM MODULO.
Olá Pessoal.
Gostaria de Saber como utilizar as funcionabilidades de uma Ocx em um arquivo .bas (Módulo)?
Isso tem como ser feito?
Muito Obrigado
Leandro
Hum...o que vc está pensando em fazer com ocx em um módulo?
Estamos falando de metodos , eventos e propriedades ?
Seja mais especifico
Seja mais especifico
Boa Tarde Pessoal.
Gostaria de utilizar as funcionabilidades da Ocx SysInfo que obtém o sistema operacional facilmente.
Obs.:Estou querendo colocar esses recursos da ocx em um módulo poque utilizo uma ferramenta Case, e essa ferramenta utilizar funcões e Procedimentos de um módulo facilmente.
Muito Obrigado
Leandro
Gostaria de utilizar as funcionabilidades da Ocx SysInfo que obtém o sistema operacional facilmente.
Obs.:Estou querendo colocar esses recursos da ocx em um módulo poque utilizo uma ferramenta Case, e essa ferramenta utilizar funcões e Procedimentos de um módulo facilmente.
Muito Obrigado
Leandro
Bom...No caso de uma ocx que geralmente é um controle de form, não faria sentido usar em um módulo, porém essa ocx sysinfo retorna informações do sistema, pode ser uma biblioteca de funcs e procedimentos, da qual (Acho eu) vc pode declarar normalmente em um modulo (dim myocx as SysInfo) e usar seus métodos e procs onde quiser...
Espero ter ajudado de alguma forma!
Espero ter ajudado de alguma forma!
Tentei executar alguma coisa no módulo e ele me exibiu a seguinte msg:
"Object Variable or With block variable not set."
Não sei o que esta errado, mas vou continuar tentando, pois as vezes posso estar fazendo alguma coisa de errado.
O que fiz no módulo foi mais ou menos assim.Exemplo :
Dom SO as SysInfo
1- If SO.OSPlatform = 2 Then
2- If SO.OSVersion = 5 Then
3- MsgBox "Windows 2000"
4- Endif
5- Endif
Ele parou na primeira (1-) linha com a msg que mostre acima.
Muito Obrigado
Leandro
"Object Variable or With block variable not set."
Não sei o que esta errado, mas vou continuar tentando, pois as vezes posso estar fazendo alguma coisa de errado.
O que fiz no módulo foi mais ou menos assim.Exemplo :
Dom SO as SysInfo
1- If SO.OSPlatform = 2 Then
2- If SO.OSVersion = 5 Then
3- MsgBox "Windows 2000"
4- Endif
5- Endif
Ele parou na primeira (1-) linha com a msg que mostre acima.
Muito Obrigado
Leandro
Provavelmente você deverá referenciar alguma Dll.
No form tem a Microsoft SysInfo Control 6.0, já pelo módulo...
No form tem a Microsoft SysInfo Control 6.0, já pelo módulo...
Leandro, talvez se vc colocar
Set SO = new Sysinfo
dpois do DIm SO as SysInfo pode resolver esse problema...
Set SO = new Sysinfo
dpois do DIm SO as SysInfo pode resolver esse problema...
Boa Tarde.
Ocorreu erro tmb.
Agora se eu tivesse essa ocx no form (referenciada), mas sem ter ela na tela, ou seja, sem dar um clique duplo no Ãcone da ocx, eu consigo fazer algo?
Obrigado
Um abraço
Leandro
Ocorreu erro tmb.
Agora se eu tivesse essa ocx no form (referenciada), mas sem ter ela na tela, ou seja, sem dar um clique duplo no Ãcone da ocx, eu consigo fazer algo?
Obrigado
Um abraço
Leandro
Pessoal, Bom Dia.
Alguém sabe ou já fez algo parecido, utilizar uma ocx sem que a ocx esteja no form, mas esteja na ToolBox????
Obrigado
Alguém sabe ou já fez algo parecido, utilizar uma ocx sem que a ocx esteja no form, mas esteja na ToolBox????
Obrigado
Tópico encerrado , respostas não são mais permitidas