Clipper On Line • Ver Tópico - Status Bar na HWGUI

Status Bar na HWGUI

Projeto HwGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

Status Bar na HWGUI

Mensagempor acelconsultoria » 17 Dez 2007 09:00

E aí, pessoal...


Bom, eu pesquisei aqui no forum e na pasta SAMPLES, e não achei nada significativo que explicasse melhor como manipular a Status Bar usando a lib HWGUI. Alguém aqui tem um exemplo pra me passar ???


Abraços !!!
Adm. Maickon Sato
Consultoria e Projetos
-------------------------------------------------------
Avatar de usuário

acelconsultoria
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 231
Data de registro: 10 Jan 2006 16:05
Cidade/Estado: Itápolis-SP
Curtiu: 6 vezes
Mens.Curtidas: 6 vezes

Mensagempor sygecom » 17 Dez 2007 11:47

Vc pode usar a IDE(DESIGNER) para criar um .prg com STATUS BAR e ver mais ou menos como ela funciona....
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonardodemachado@hotmail.com

Faça você também sua doação esse fórum é uma lenda viva: http://www.pctoledo.com.br/doacao
Avatar de usuário

sygecom
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 7006
Data de registro: 21 Jul 2006 10:12
Cidade/Estado: Alvorada-RS
Curtiu: 1 vez
Mens.Curtidas: 130 vezes

Mensagempor acelconsultoria » 17 Dez 2007 14:09

É... eu também estou dando uma fuçada no designer... que é uma "mão na roda" também.

A HWGUI não é nenhum bicho de 7 cabeças, infelizmente os exemplos (SAMPLES) que vem junto com a lib não exploram todo o seu potencial. Mas tô gostando bastante !!!
Adm. Maickon Sato
Consultoria e Projetos
-------------------------------------------------------
Avatar de usuário

acelconsultoria
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 231
Data de registro: 10 Jan 2006 16:05
Cidade/Estado: Itápolis-SP
Curtiu: 6 vezes
Mens.Curtidas: 6 vezes

Mensagempor Luciano Bonfim » 18 Dez 2007 16:03

onde fica esse designer da hwgui?
Muito Obrigado,

Luciano Bonfim de Azevedo
www.bonfim.com.br
luciano@bonfim.com.br
www.linkedin.com/in/lucianobonfim
Skype : lucianobonfim
Avatar de usuário

Luciano Bonfim
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 414
Data de registro: 23 Ago 2007 09:34
Cidade/Estado: Rio de Janeiro / São Paulo
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Mensagempor sygecom » 19 Dez 2007 10:20

Na sua pasta da HWGUI procure a seguinte pasta \hwgui\utils\designer

Logo em seguida execute o seguinte .BAT blddesig.bat (tem que esta com o BCC e o XHARBOUR configurados na maquina)

Esse bat vai compilar a IDE(DESIGNER) da HWGUI.

É só usar , ele salva as telas em formato .XML e .PRG

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonardodemachado@hotmail.com

Faça você também sua doação esse fórum é uma lenda viva: http://www.pctoledo.com.br/doacao
Avatar de usuário

sygecom
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 7006
Data de registro: 21 Jul 2006 10:12
Cidade/Estado: Alvorada-RS
Curtiu: 1 vez
Mens.Curtidas: 130 vezes

Mensagempor Luciano Bonfim » 19 Dez 2007 10:29

Obrigado Leonardo,

gerei o excutável aqui... vou testar agora....

ia morrer sem saber que isso existia!! rs
Muito Obrigado,

Luciano Bonfim de Azevedo
www.bonfim.com.br
luciano@bonfim.com.br
www.linkedin.com/in/lucianobonfim
Skype : lucianobonfim
Avatar de usuário

Luciano Bonfim
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 414
Data de registro: 23 Ago 2007 09:34
Cidade/Estado: Rio de Janeiro / São Paulo
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Mensagempor acelconsultoria » 19 Dez 2007 15:10

Bom, é o seguinte. Eu usei o designer, desenvolvi as telas, salvei em PRG... mesmo assim, não consegui entender os mistérios da Status Bar !!!

Peguei uns exemplos que vem na pasta samples, mas os exemplos apenas utilizam o objeto PANEL, e não a Status Bar !!!

Ou seja, ainda tô tentando achar !!! :(Neg
Adm. Maickon Sato
Consultoria e Projetos
-------------------------------------------------------
Avatar de usuário

acelconsultoria
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 231
Data de registro: 10 Jan 2006 16:05
Cidade/Estado: Itápolis-SP
Curtiu: 6 vezes
Mens.Curtidas: 6 vezes

Status Bar - achei !!!

Mensagempor acelconsultoria » 20 Dez 2007 08:46

E aí, galera... dei uma "fuçada" melhor aqui e consegui desvendar os mistérios da Status Bar da HWGUI, aqui vai um pequeno exemplo:

#include "windows.ch"
#include "guilib.ch"
#include "hwgui.ch"

Function Main()

PUBLIC Janela_Principal, Painel_Principal
INIT WINDOW Janela_Principal MAIN TITLE "Usando a Status Bar" ;
       ON EXIT {||EndWindow()}

   MENU OF Janela_Principal
      MENU TITLE "&Cadastro"
         MENUITEM "&Clientes"       ACTION EndWindow()
         SEPARATOR
         MENUITEM "&Sair"           ACTION {||dbCloseAll(), EndWindow()}
      ENDMENU
   ENDMENU

   ADD STATUS TO Janela_Principal PARTS 550, 200, 150 // atribui a Status Bar para a Janela_Principal, dividindo-o em 3 partes

   WriteStatus( Janela_Principal,1," MENSAGEM: Módulo Principal do Sistema" ) // atribui o valor para a primeira parte
   WriteStatus( Janela_Principal,2," USUÁRIO: Fulano" ) // atribui o valor para a segunda parte
   WriteStatus( Janela_Principal,3," DATA: " + DTOC(DATE()) ) //atribui o valor para a terceira parte
   
ACTIVATE WINDOW Janela_Principal MAXIMIZED
Return Nil



Enfim, é bem simples. O difícil mesmo foi encontrar um exemplo de como funciona.

Abraços !!!
Adm. Maickon Sato
Consultoria e Projetos
-------------------------------------------------------
Avatar de usuário

acelconsultoria
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 231
Data de registro: 10 Jan 2006 16:05
Cidade/Estado: Itápolis-SP
Curtiu: 6 vezes
Mens.Curtidas: 6 vezes

Mensagempor Luciano Bonfim » 28 Fev 2008 17:44

usei a barra de status num DIALOG ela apareceu, mas nao consigo escrever nada nela!

alguem sabe o motivo?


ADD STATUS TO TelaAcesso PARTS 300

   WriteStatus( TelaAcesso,1,"AAAAAAAAAAAFDDDDDDDDDDDDDDDD" )
//   WriteStatus( TelaAcesso,2," parte2" )
//   WriteStatus( TelaAcesso,3," parte3" )
ACTIVATE DIALOG TelaAcesso

Muito Obrigado,

Luciano Bonfim de Azevedo
www.bonfim.com.br
luciano@bonfim.com.br
www.linkedin.com/in/lucianobonfim
Skype : lucianobonfim
Avatar de usuário

Luciano Bonfim
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 414
Data de registro: 23 Ago 2007 09:34
Cidade/Estado: Rio de Janeiro / São Paulo
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Mensagempor Itamar M. Lins Jr. » 28 Fev 2008 17:51

Luciano Bonfim escreveu:usei a barra de status num DIALOG ela apareceu, mas nao consigo escrever nada nela!

alguem sabe o motivo?


ADD STATUS TO TelaAcesso PARTS 300

   WriteStatus( TelaAcesso,1,"AAAAAAAAAAAFDDDDDDDDDDDDDDDD" )
//   WriteStatus( TelaAcesso,2," parte2" )
//   WriteStatus( TelaAcesso,3," parte3" )
ACTIVATE DIALOG TelaAcesso



Parece que só depois da ACTIVATE DIALOG voce consegue escrever na status bar.
Coloque na clausula ON INIT da DIALOG {||writestatus(...,.t.}

Saudações
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

Mensagempor Luciano Bonfim » 28 Fev 2008 18:32

Itamar,

Muito Obrigado funcionou...

aproveitando a oportunidade vc sabe como eu recupero o que está escrito na status bar?

na gtwvw eu uso a funçäo WVW_SBgetText mas em HWGUI eu nao sei

Muito Obrigado
Muito Obrigado,

Luciano Bonfim de Azevedo
www.bonfim.com.br
luciano@bonfim.com.br
www.linkedin.com/in/lucianobonfim
Skype : lucianobonfim
Avatar de usuário

Luciano Bonfim
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 414
Data de registro: 23 Ago 2007 09:34
Cidade/Estado: Rio de Janeiro / São Paulo
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Status Bar na HWGUI

Mensagempor Linguagemclipper » 23 Abr 2020 14:16

Estava com o mesmo problema, mas depois percebí olhando o GUILIB.CH que o Status só funciona numa WINDOW e eu estava querendo colocar num DIALOG igual ao colega aí.
Quando troquei o DIALOG pelo WINDOW o STATUS deu certo!
Usando xHarbour v1.2.3 Rev. 10264 + BCC 5.8, Elchs' LetoDBf, DBFCDX e SIBRA para imprimir relatórios.
Avatar de usuário

Linguagemclipper
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 214
Data de registro: 16 Abr 2016 17:33
Cidade/Estado: Maceió/AL
Curtiu: 38 vezes
Mens.Curtidas: 12 vezes

Status Bar na HWGUI

Mensagempor asimoes » 23 Abr 2020 17:47

Pode usar em uma INIT DIALOG
   oFont    := HFont():Add( "Tahoma", 10 )
   
   nStyle   := DS_CENTER + WS_VISIBLE + WS_SYSMENU
   
   oIconDLG := HIcon():AddResource("ICON_A", 24, 24)
   
   INIT DIALOG oDlg TITLE "Teste" ;
               AT 0, 0 ;
               SIZE 1024 768 ;
               ICON oIconDLG ;
               STYLE nStyle ;
               FONT oFont ;
               CLIPPER ;
               NOEXIT ;
               COLOR 13827581
   
   ADD STATUS oStatus TO oDlg PARTS 0 STYLE BS_LEFT ON INIT {|This| Status( This ) } 

ACTIVATE DIALOG oDlg

FUNCTION Status( This )

   This:SetTextPanel( 1, "Tecle enter/esc para continuar" )

RETURN Nil
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Status Bar na HWGUI

Mensagempor Itamar M. Lins Jr. » 23 Abr 2020 21:57

Ola!
Usando a versão do SVN 2.22
Primeiro vc monta, coloca os objetos na DIALOG ou na Window.
INIT DIALOG oDlg CLIPPER NOEXIT TITLE cTitulo 

   Add status to oDlg parts 300,300,0

oDlg:Activate()

Assim como está ai em cima monta a barra de status vazia e dividida em 3 partes.
INIT DIALOG oDlg CLIPPER NOEXIT TITLE cTitulo ;
On Init {|| hwg_WriteStatus( oDlg,2,'Reg: ' + Transform( tp50e->(lastRec()) ,"9,999,999" )), hwg_msginfo( "aqui mais coisas para fazer, depois de aberto o DIALOG") }

   Add status to oDlg parts 300,300,0

oDlg:Activate()

Depois de montado/aberto o dialog vc pode usa "ON INIT..."
Lembrando que é um objeto e vc pode mudar, escrever o tempo todo nele...

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes




Retornar para HwGui

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