Dúvida sobre o comando Combobox

[Paulo_CPV]

Boa tarde!

Gostaria de saber dos amigos do Forum, como eu posso colocar em um controle Combobox os anos de 1930 até mais ou menos 2030.

Agradeço desde já atenção dos colegas.

Abraços,

Paulo - Jacareí/SP

[Toledo]

Amigo, segue um pequeno exemplo:

Código: Selecionar todos

#include "minigui.ch"

Function Main()
Local aAnos:={}

   For i=1930 to 2030
     AADD(aAnos,Str(i,4))
   Next

   DEFINE WINDOW Form_1 ;
      AT 0,0 ;
      WIDTH 300 HEIGHT 250 ;
      TITLE 'Exemplo de ComboBox' ;
      MAIN

      @ 50,80 COMBOBOX Combo_1 ;
        WIDTH 100 ;
        ITEMS aAnos ;
        VALUE 1 ;
        TOOLTIP "Selecione o Ano"

   END WINDOW

   Form_1.Center
   Form_1.Activate

Return Nil

Abraços,

[lugab]

Bom dia...

Estou estudando o mingui e aproveito essa contribuição do Toledo pra perguntar aos colegas o q segue:

Já que não há get e read neste exemplo de mingui, eu gostaria de saber...

1) em qual linha digitada é solicitado (ou) a digitação do ano (ou) a seleção dos anos previamente armazenado na tabelinha

2) qual nome-de-campo recebera o resultado da pergunta 1 ?

3) Após receber e criticar este campo, o que se deve fazer para avançar para a próxima tela ?

4) Existe condição de usar GET e READ dentro do minigui , naturalmente, sem ter q alterar getsys ou coisa q o valha ?

Obrigado...