Clipper On Line • Ver Tópico - Mais uma Duvida em Combobox ou bug?

Mais uma Duvida em Combobox ou bug?

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

Mais uma Duvida em Combobox ou bug?

Mensagempor Nascimento » 31 Mar 2019 15:03

Mais outro problema em combobox estou enfrentando

crio 2 combobox o primeiro pego dados da dbf , o segundo espera a opção de escolha para preencher
para facilitar o entendimento vamos pensar da seguinte forma Estado e capital ok

então se eu escolher no combo1 "Pernanbuco" , no combo2 seria preenchido como "Recife"

segue o codigo que fiz para que os amigos entendam, fiz no modo mais simples possivel

uso minigui extended

#include 'minigui.ch'

FUNCTION Main()
   
   DEFINE WINDOW Form_1            ;
      AT 90,90                     ;
      WIDTH 700                    ;
      HEIGHT 350                   ;
      TITLE "erro combobox" ;
      MAIN
      define tab tab_Form_1 ;
         at 34,10 ;
            width form_1.width -40 height 250 ;
              font 'ms sans serif' size 10 bold   
         define page "Combo"
                      define frame fr_grup
              row    35
              col    30
              width  170             
              height 55
              fontname 'tahoma'
              fontsize 9
              caption "Informe o Grupo"       
              transparent .t.
           end frame
             define comboboxex cb_grupo
              row 55
              col  40                               
              width 150
              items {"QUARTO","SALA","COZINHA","BANHEIRO","FRENTE","QUINTAL"}
              value 1
              tooltip "Escolha o Grupo"
              fontname 'tahoma'               
              fontsize 10
              on change  {||Atualiza_Grupos()}
           end comboboxex
           define frame fr_sgrup
              row    35
              col    240
              width  170             
              height 55
              fontname 'tahoma'
              fontsize 9
              caption "Informe o Sub-Grupo"
              action msginfo()       
              transparent .t.
           end frame
           *
             define combobox cb_sgrupo
              row 55
              col  250            
              width 150
*              items
              value 1
              tooltip "Escolha o Sub-Grupo"
              fontname 'tahoma'
              fontsize 10
           end comboboxex   
         end page
      end tab
      on key ESCAPE of Form_1  action Form_1.release
   END WINDOW
   Form_1.Activate
   RETURN NIL
   
*-------------------------------------------------------------------------------
Static Procedure Atualiza_Grupos(Arg1)
private  aNewValues:={"CAMA","SOM","FOGAO","PIA","GARAGEM","CACHORRO"}
  DoMethod( "Form_1", "cb_sgrupo", 'SetArray', aNewValues )
*  Form_1.cb_sgrupo.SetArray := aNewValues  // Se eu tentar desta forma da erro, o curioso é que esta no doc da minigui
   
Return .t.

     

A arte de programar é simplesmente fazer seus pensamentos serem interpretados por uma maquina :) clipper 5.3 /harbour/minigui
Avatar de usuário

Nascimento
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 711
Data de registro: 19 Jul 2008 12:11
Cidade/Estado: OLINDA-PE
Curtiu: 110 vezes
Mens.Curtidas: 76 vezes

Mais uma Duvida em Combobox ou bug?

Mensagempor JoséQuintas » 31 Mar 2019 17:25

* Form_1.cb_sgrupo.SetArray := aNewValues // Se eu tentar desta forma da erro, o curioso é que esta no doc da minigui
a


Pelo nome: SetArray é Configurar array, o que sugere método (função) e não propriedade (variável)

   Form_1.cb_sgrupo.SetArray( aNewValues  )


Não resolve o seu problema, mas mostra porque deu erro.
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

Mais uma Duvida em Combobox ou bug?

Mensagempor Nascimento » 31 Mar 2019 18:04

realmente amigo quintas, mais resolvi, a propriedade so funciona para combobox , e não para comboboxEX

então , aos amigos atentar, algumas propriedades são diferentes entre combobox e comboboxex
A arte de programar é simplesmente fazer seus pensamentos serem interpretados por uma maquina :) clipper 5.3 /harbour/minigui
Avatar de usuário

Nascimento
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 711
Data de registro: 19 Jul 2008 12:11
Cidade/Estado: OLINDA-PE
Curtiu: 110 vezes
Mens.Curtidas: 76 vezes




Retornar para MiniGui

Quem está online

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