[AHKv2] - Atualizar o valor da GUI Edit com texto visivel

Tire suas dúvidas sobre programação em AutoHotkey

Moderator: Gio

Finallf
Posts: 18
Joined: 30 Oct 2020, 13:52

[AHKv2] - Atualizar o valor da GUI Edit com texto visivel

Post by Finallf » 17 Nov 2020, 11:17

Olá Abiguinhos...

Estou com um problema para atualizar dinamicamenta a visualização de um texto em uma simple Gui.
Estou usando este codigo que adaptei do Window Spy como um debug:

Code: Select all

DebugGui := Gui.New()
DebugGui.Add("Edit","w320 r3 ReadOnly vDebugView")
DebugGui.Show("NoActivate")

DetectHiddenText 0				;
ovVisText := WinGetText()			; coloco no loop do meu codigo
UpdateText("DebugView", ovVisText)  ;

UpdateText(vCtl, NewText) {
	static OldText := {}
	ctl := DebugGui[vCtl], hCtl := Integer(ctl.hwnd)
    ;msgbox hCtl
	
	if (!oldText.HasProp(hCtl) Or OldText.%hCtl% != NewText) {
		ctl.Value := NewText
		OldText.%hCtl% := NewText
	}
}
Ele esta funcionando bem, sem problemas, mas queria aprender a passar o valor diretamente ao Gui Edit, sem verificar o texto antigo com o novo e sem esta funcão.
Ficaria mais ou menos assim:

Code: Select all

DebugGui := Gui.New()
DebugGui.Add("Edit","w320 r3 ReadOnly vDebugView")
DebugGui.Show("NoActivate")

DetectHiddenText 0
DebugGui.DebugView.Value := WinGetText()
Já tentei:

Code: Select all

DebugGui.vDebugView.Value := WinGetText()
vDebugView.Value := WinGetText()
DebugGui.DebugView.Value := WinGetText()
DebugView.Value := WinGetText()
DebugGui.Value := WinGetText()
Mas sempre da um erro, seja da variavel sem valor ou dela não existir ou de não ser um objeto.
Como seria a forma mais simples de passar o valor pego por WinGetText(), direto para o Gui Edit ?

Obrigado a Todos :D


Post Reply

Return to “Ajuda e Suporte Geral”