OCX

PDIAS 24/04/2004 15:07:37
#22411
Ola , Como faço para chamar esta funcao varias vezes ?
Como declarar uma variavel tipo PropertyBag ?

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
With PropBag
mTabela = .ReadProperty("Tabela")
mColuna1 = .ReadProperty("Coluna1")
mColuna2 = .ReadProperty("Coluna2")
mCampo1 = .ReadProperty("campo1")
mCampo2 = .ReadProperty("campo2")
End With
End Sub
USUARIO.EXCLUIDOS 24/04/2004 16:39:51
#22415 Resposta escolhida
PARA ESTA ROTINA SALVAR AS CONFIGURAÇÕES SEMPRE QUE AS PROPRIEDADES FOREM ALTERADAS. EM PROPERTY LET OU SET CHAME

PROPERTYCHANCHED NOMEDAPROPRIEDAE

PARA DECLARAR FAÇA

DIM P AS NEW PROPBAG


DICA PARA SALVAR O CONTEUDO DAS PROPRIEDADE NO ARQUIVO

OPEN ARQUIVO FOR OUTPUT AS #1
PRINT #1,P.CONTENTS
CLOSE #1

PARA LER

OPEN ARQUIVO FOR INPUT AS #1
PRINT #1,DADO
CLOSE #1
P.CONTENTS = DADO
USUARIO.EXCLUIDOS 25/04/2004 14:36:30
#22515
é LUIS

EU APENAS MOSTREI COMO CRIAR DIRETAMENTE UM OBJETO PROPERTYBAG

APENAS PARA DECLARA COMO PROPERTYBAG O NEW NÃO DEVE SER USADO
Tópico encerrado , respostas não são mais permitidas
Voltar