Caros colegas,
criei esse pequeno prg p/ entender a combobox:
-------------------------------------------------------------------------------
#include "minigui.ch"
function Testeprg
use cliente
DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 640 HEIGHT 480 ;
TITLE SISTEMA ;
ICON Nil;
CHILD;
NOMAXIMIZE ;
FONT 'Arial' SIZE 10 ;
BACKCOLOR GRAY ;
ON INIT Nil;
ON RELEASE Nil
@ 210,100 combobox combo_1 ;
itemsource cliente->tipo ;
value 1 ;
width 170 font 'Arial' size 9
@ 300,100 BUTTON bt_avancar ;
CAPTION 'Avançar 1 registro' ;
ACTION { || Avancar() } ;
WIDTH 100 HEIGHT 30 FONT 'ARIAL' SIZE 9 FLAT
end window
CENTER WINDOW Form_1
ACTIVATE WINDOW Form_1
Return Nil
function avancar
skip
combo_1.itemsource:=brid012->tipo * COLOQUEI ESTE COMANDO P/
ACHAR SIMILAR COM A SINTAXE
ACIMA
form_1.combo_1.refresh
return nil
-------------------------------------------------------------------------------
Qual seria o comando p/ atualizar a combo_1, dentro da function AVANCAR?
Obrigado e um abraço à todos.
Leandro.