Clipper On Line • Ver Tópico - Como criar Abas

Como criar Abas

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

Moderador: Moderadores

 

Como criar Abas

Mensagempor h1e1 » 10 Mar 2015 14:18

Olá a todos!

Estou programando em xharbour e usando fiveWin.

Como crio abas usando o fivewin?

Obrigado :D
Avatar de usuário

h1e1
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 22
Data de registro: 11 Fev 2015 17:22
Cidade/Estado: Santa Bárbara D'Oeste
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Como criar Abas

Mensagempor h1e1 » 10 Mar 2015 14:30

achei kkkkkkkkkk :)´
Avatar de usuário

h1e1
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 22
Data de registro: 11 Fev 2015 17:22
Cidade/Estado: Santa Bárbara D'Oeste
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Como criar Abas

Mensagempor Kapiaba » 10 Mar 2015 16:47

Olá, deixe sempre documentando de como resolveu, para as gerações futuras.

// Two folders at a time! Wow!

// New, much, much simpler!!!

#include "FiveWin.ch"
#include "Folder.ch"

//----------------------------------------------------------------------------//

function Main()

   local oDlg, oFld1, oFld2
   local cItem

   SET _3DLOOK ON

   DEFINE DIALOG oDlg RESOURCE "Test"

   REDEFINE FOLDER oFld1 ID 110 OF oDlg ;
      PROMPT "&Clipper", "&and", "&Windows", "&Magic" ;
      DIALOGS "Sub1", "Sub2"

   REDEFINE COMBOBOX cItem ITEMS { "One", "Two", "Three" } ;
      ID 105 OF oFld1:aDialogs[ 1 ]

   REDEFINE BUTTON ID 110 OF oFld1:aDialogs[ 1 ] ;   // Redefining a child
      ACTION MsgInfo( "First Page" )                // control !!!

   REDEFINE BUTTON ID 104 OF oFld1:aDialogs[ 2 ] ;   // Redefining a child
      ACTION MsgInfo( "Second Page" )               // control !!!

   REDEFINE FOLDER oFld2 ID 120 OF oDlg ;
      PROMPT "&The", "&beauty", "&and power", "&of xBase" ;
      DIALOGS "The", "Beauty"

   oDlg:aControls[ 2 ]:aDialogs[ 1 ]:bRClicked = ;
       { || MsgInfo( oDlg:aControls[ 2 ]:aDialogs[ 1 ]:hWnd ) }

   ACTIVATE DIALOG oDlg CENTERED

return nil

procedure AppSys  // XBase++ requirement

return

//----------------------------------------------------------------------------//


abs

Kapiaba
Colaborador

Colaborador
 
Mensagens: 1766
Data de registro: 07 Dez 2012 15:14
Cidade/Estado: São Paulo
Curtiu: 311 vezes
Mens.Curtidas: 119 vezes




Retornar para FiveWin

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 3 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