COMO ABRIR FORMULARIOS A PARTIR DE UMA VARIAVEL
Alguém pode me ajudar com duas situações?
1 - Gostaria de abrir formulários a partir de uma variável, por exemplo:
VariavelX = "frmFormulario"
Como faço para dar um Show na variável?
2 - Como faço para executar aquivos e abri-los no programa padrão configurado pelo sistema operacional?
Por exemplo, como abrir um arquivo HTML pelo IE...
1 - Gostaria de abrir formulários a partir de uma variável, por exemplo:
VariavelX = "frmFormulario"
Como faço para dar um Show na variável?
2 - Como faço para executar aquivos e abri-los no programa padrão configurado pelo sistema operacional?
Por exemplo, como abrir um arquivo HTML pelo IE...
Para o segundo caso se tiver o INTERNET EXPLORES 5 ou superior adocione uma referencia de MICROSOFT SHELL AND AUTOMATION
E faça o seguinte
Dim o as new shell
o.open(Caminho do arquivo)
E faça o seguinte
Dim o as new shell
o.open(Caminho do arquivo)
Bem tu pode fazer isso
declare uma colection numa modulo
DIM FORMCOL as new collection
Chame a rotina atualizar coleção
Public Sub ATUALIZARCOL
dim F as FORM
for each f in FORMS
col.add f,f.name
next
end if
Crie uma rotina abrir form e quando precisar chame ela
Public Sub AbrirForm(Nome as string)
dim f as form
set f = FORMCOL(Nome)
f.shoe
end sub
declare uma colection numa modulo
DIM FORMCOL as new collection
Chame a rotina atualizar coleção
Public Sub ATUALIZARCOL
dim F as FORM
for each f in FORMS
col.add f,f.name
next
end if
Crie uma rotina abrir form e quando precisar chame ela
Public Sub AbrirForm(Nome as string)
dim f as form
set f = FORMCOL(Nome)
f.shoe
end sub
Ei bruno acho que ele guarda apenas a classe do form na memoria, pois eu fiz um sistema com 38 formularios deste jeito e não sofreu nenhuma alteração.
Pelo que vi a parte visual do form só era carregada quando eu dava um SHOW.
Mas não testei com mais forms que 38
Pelo que vi a parte visual do form só era carregada quando eu dava um SHOW.
Mas não testei com mais forms que 38
Tópico encerrado , respostas não são mais permitidas