Montando um MBROWSE super simples e rápido
Utilização do MBROWSE
Local cVldAlt := ".T."
Local cVldExc := ".T."
Private cString := "ZZ1" // Nome da tabela a ser utilizada
// O campo aRotina é um campo padrão onde pode se personalizar os botões do programa
PRIVATE aRotina := { { "Pesquisar" , "AXPESQUI" ,0,1 } ,;
{ "Visulizar" , "AXVISUAL" ,0,2 } ,;
{ "Incluir" , "AXINCLUI",0,3 } ,;
{ "Alterar" , "AXALTERA",0,4 } ,;
{ "Ecluir" , "AXDELETA",0,8 }}
dbSelectArea("ZZ1")
dbSetOrder(1)
MBROWSE( 6, 1, 22, 75, "ZZ1")
Local cVldAlt := ".T."
Local cVldExc := ".T."
Private cString := "ZZ1" // Nome da tabela a ser utilizada
// O campo aRotina é um campo padrão onde pode se personalizar os botões do programa
PRIVATE aRotina := { { "Pesquisar" , "AXPESQUI" ,0,1 } ,;
{ "Visulizar" , "AXVISUAL" ,0,2 } ,;
{ "Incluir" , "AXINCLUI",0,3 } ,;
{ "Alterar" , "AXALTERA",0,4 } ,;
{ "Ecluir" , "AXDELETA",0,8 }}
dbSelectArea("ZZ1")
dbSetOrder(1)
MBROWSE( 6, 1, 22, 75, "ZZ1")
Caro Aleksandro, boa noite.
ResponderExcluirPreciso de um browse que permita editar campos como por exemplo: ao clicar em um campo data ele abra e permita inserir a nova data, campo valor e afins... Tentei usando o Mbrowse mas nao deu certo... Vc teria uma dica para me ajudar?
Desde já agradeço.
ASC - Mao