Tela Indexada - Metodo de Acesso da Variavel

#1

Bom dia ! Estou desenvolvendo uma tela indexada mas gostaria de acessar o valor de um variavel sem precisar criar um segundo control, como mostra o tutorial. Basicamente, ao receber o caminho da variavel pelo arg na tela , essa informação vem como texto, e queria saber se há como converte-la para acessar a variavel diretamente sem adicionar num campo fonte de um xcontrol.

#2 
Sub Popup_OnPreShow(Arg)
	Dim obj
	Dim oTag
	Dim sSource
	
	On Error Resume Next
	
	' Deleta objetos previamente criado (se houver).
	For Each obj In Me
		If ( Left(obj.Name, 3) = "txt" ) Then 
			Me.DeleteObject( obj.Name )
		End If
	Next
	
	Set oTag = Application.GetObject( Arg )
	
	If ( IsObject(oTag) ) Then
		' Valor corrente da variavel.
		'MsgBox oTag.Value
		
		' Adicionando um display programaticamente.
		With Me.AddObject( "DrawString", True, "txt" )
			.TextColor = vbBlack
			.BorderStyle = 0	' Normal
			.BorderColor = vbGray
			.TextAlignment = 1	' Center
			.FillStyle = 0 		' Solid
			.ForeGroundColor = vbWhite
			
			.Format = "0.0"

			.X = PxToHm(24)
			.Y = PxToHm(48)
			.Height = PxToHm(24)
			.Width = PxToHm(96)

			sSource = oTag.PathName & ".Value"
			.Links.CreateLink "Value", sSource
		End With
	End If
End Sub

Private Function PxToHm( px )
	PxToHm = px * 2540 / 96
End Function

Private Sub Foo()
End Sub
#3

Bom dia Leandro! Vou testar aqui, obrigado.