Clipper On Line • Ver Tópico - Passagem de parâmetros

Passagem de parâmetros

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

Passagem de parâmetros

Mensagempor Paulo_CPV » 14 Mai 2015 20:06

Boa noite!

Pessoal, gostaria de uma orientação de vocês como eu posso fazer o seguinte: como eu devo passar o parâmetro cFormulario para o comando LOAD WINDOW e ACTIVATE WINDOW.

#include "hmg.ch"

declare window Main

Function main_janela_action

   LOCAL cFormulario := ThisWindow.Name

   IF IsWindowActive(cFormulario)
   
      DoMethod(&cFormulario,"MINIMIZE")
      DoMethod(&cFormulario,"RESTORE")
      DoMethod(&cFormulario,"SETFOCUS")
   
   ELSE
   
      LOAD WINDOW &cFormulario         -> Está dando erro aqui
      ACTIVATE WINDOW &cFormulario  -> e aqui, como pode ser resolvido
   
   ENDIF

Return Nil


Abraços,

Paulo - Jacareí/SP
Paulo_CPV
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 178
Data de registro: 07 Mar 2013 10:27
Cidade/Estado: Jacarei/SP
Curtiu: 0 vez
Mens.Curtidas: 1 vez

Passagem de parâmetros

Mensagempor Toledo » 15 Mai 2015 10:21

Amigo, acho que o ThisWindow.Name só vai retornar o nome do formulário quando a window estiver ativa, então neste caso você não poderia usar o ThisWindow.Name e sim já informar o nome do formulário:

LOCAL cFormulario := "Main"

Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar de usuário

Toledo
Administrador

Administrador
 
Mensagens: 3038
Data de registro: 22 Jul 2003 18:39
Cidade/Estado: Araçatuba - SP
Curtiu: 263 vezes
Mens.Curtidas: 258 vezes

Passagem de parâmetros

Mensagempor NiltonGM » 19 Out 2018 21:13

Olá Paulo,
Estou com este mesmo problema, como vc resolveu para não usar a macro substituição "&"? Ao Compilar a macro não substitui nesse caso.
Nilton Medeiros
nilton@sistrom.com.br
Avatar de usuário

NiltonGM
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 393
Data de registro: 05 Jun 2014 23:47
Cidade/Estado: Caieiras/SP
Curtiu: 249 vezes
Mens.Curtidas: 24 vezes

Passagem de parâmetros

Mensagempor JoséQuintas » 19 Out 2018 21:25

Essa foi uma coisa chata que achei da HMG, mas com certeza tem solução.
Como HMG usa variável pra isso, talvez criar como STATIC dentro do form, e colocar sub-rotinas nesse mesmo fonte usando a variável, e acessar a variável por meio de função ou classe dentro do PRG.

Isso caso não encontre outra alternativa.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18014
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para MiniGui

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 4 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro