Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

fLaSh_PT

Carregando objectos dinamicamente

Mensagens Recomendadas

fLaSh_PT

Simples função, mas muito útil para carregar objectos dinamicamente.

    ''' <summary>
    ''' Carrega um objecto dinamicamente.
    ''' </summary>
    Public Function GetDynamicallyObject(ByVal sName As String, _
                                Optional ByVal oArgs() As Object = Nothing) As Object
	' Obtem o namespace da aplicação.
        Dim sAssemblyName As String = [Assembly].GetEntryAssembly().GetName.Name.Replace(" ", "_")
	' Obtem o tipo de objecto
        Dim oType As Type = Type.GetType(sAssemblyName & "." & sName)
	' Activa o objecto
	If oType IsNot Nothing Then
		Return Activator.CreateInstance(oType, oArgs)
	ELse
		Return Nothing
	End If
    End Function

Exemplo:

Dim f as Form = GetDynamicallyObject("Form1")


Making the impossible possible and pwing the world on db at a time.

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.