Clipper On Line • Ver Tópico - Ações e Diálogos no FiveWin

Ações e Diálogos no FiveWin

Discussão sobre a biblioteca Fivewin - O Clipper para Windows.

Moderador: Moderadores

 

Ações e Diálogos no FiveWin

Mensagempor vmolina » 13 Jan 2012 13:58

Boa tarde pessoal, sou iniciante na programação fivewin e to aqui apanhando pra aprender.

Segue código do primeiro programa que estou fazendo.

#include "FiveWin.ch"

Static oWnd

Function Main() 

LOCAL oWnd, oWnd2

MENU oMenu
MENUITEM "OPCAO1" ACTION MsgInfo ("Coloque aqui uma chamada a um dialog ou window1")
MENUITEM "OPCAO2" ACTION MsgInfo ("Coloque aqui uma chamada a um dialog ou window2")   
MENUITEM "OPCAO3" ACTION MsgInfo ("Coloque aqui uma chamada a um dialog ou window3")     
MENUITEM "FECHAR" ACTION oWnd:End()
ENDMENU                                                       

DEFINE WINDOW oWnd TITLE "MEU PRIMEIRO PROGRAMA" MDI MENU oMenu    COLOR "W/BG"
SET MESSAGE OF oWnd TO "SOFTWARE PARA AUTOMAÇÃO" CLOCK DATE CENTERED

DEFINE WINDOW oWnd2 TITLE "oWnd2" COLOR "B/WG" ;
FROM 8, 8 TO 30, 50

ACTIVATE WINDOW oWnd MAXIMIZED VALID MsgYesNo( "Deseja sair ?" )

return nil


1º Como faço para a opção 1, 2,3 acionar uma janela com uma caixa de dialogo dentro com alguns campos para preenchimento de dados?

Obrigado e fico no aguardo.
vmolina
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 8
Data de registro: 13 Jan 2012 13:03
Cidade/Estado: BAHIA
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Ações e Diálogos no FiveWin

Mensagempor Pablo César » 13 Jan 2012 18:12

Olá Molina, seja bem vindo ao fórum !
Como faço para a opção 1, 2,3 acionar uma janela com uma caixa de dialogo dentro com alguns campos para preenchimento de dados?
Justamente, como faz com janela, mas está faltando...
Não programa com FW, mas pelo que eu percebo, é justamente isso que estaria faltando: definir a JANELA e ativá-la.
Um clip-abraço !

Pablo César Arrascaeta
Compartilhe suas dúvidas e soluções com todos os colegas aqui do fórum.
Evite enviar as dúvidas técnicas por MPs ou eMails, assim todos iremos beneficiar-nos.
Avatar de usuário

Pablo César
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 5539
Data de registro: 31 Mai 2006 10:22
Cidade/Estado: Curitiba - Paraná
Curtiu: 142 vezes
Mens.Curtidas: 150 vezes

Ações e Diálogos no FiveWin

Mensagempor Toledo » 13 Jan 2012 20:11

Molina, para dar ação para um menu basta definir a função que será executada:

MENUITEM "OPCAO1" ACTION Janela1()
MENUITEM "OPCAO2" ACTION Janela2() 
MENUITEM "OPCAO3" ACTION Janela3()


Agora basta abrir uma nova janela e colocar os GETs:

function Janela1()
   local oDlg, oGet1, oGet2
   local cCodigo := SPACE(5)
   local cNome := SPACE(40)

   DEFINE DIALOG oDlg FROM 1, 5 TO 40, 200 TITLE "Janela com GETs"
   
   @  05, 3  SAY "Código " OF oDlg
   @  06, 3  SAY "Nome   " OF oDlg

   @  05,  11 GET oGet1 VAR cCodigo  OF oDlg SIZE 50,20
   @  06,  11 GET oGet2 VAR cNome  OF oDlg SIZE 120,20

   ACTIVATE DIALOG oDlg CENTERED
   
return nil


Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Avatar de usuário

Toledo
Administrador

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

Ações e Diálogos no FiveWin

Mensagempor vmolina » 14 Jan 2012 08:06

Valeu Pablo Cézar obrigado, gostei do fórum...

Toledo muito obrigado pela dica e atenção, defini a função e rodou beleza.
vmolina
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 8
Data de registro: 13 Jan 2012 13:03
Cidade/Estado: BAHIA
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Ações e Diálogos no FiveWin

Mensagempor rochinha » 18 Jan 2012 11:45

Amiguinho,

Aproveitando de uma busca aqui no forum por "dificil aprendizado". São uma série de posts relacionados a Fivewin, com exemplos simples e explicados para inicio rápido.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para fivolution@hotmail.com. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Avatar de usuário

rochinha
Membro Master

Membro Master
 
Mensagens: 4209
Data de registro: 18 Ago 2003 20:43
Cidade/Estado: São Paulo - Brasil
Curtiu: 499 vezes
Mens.Curtidas: 182 vezes

Ações e Diálogos no FiveWin

Mensagempor vmolina » 18 Jan 2012 16:00

Valeu Rochinha, já estou acompanhando seus tutoriais.

Obrigado pela dica
vmolina
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 8
Data de registro: 13 Jan 2012 13:03
Cidade/Estado: BAHIA
Curtiu: 0 vez
Mens.Curtidas: 0 vez




Retornar para FiveWin

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 1 visitante


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
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro