23 Mai 2019 19:09
define splitbox parent janela
define toolbarex toolbar_vnp15000 parent janela flat buttonsize 50,50;
button button_incluir;
caption 'Incluir';
picture pict+"adicionar.bmp";
action vnp11000_opc('inserir');
button button_alterar;
caption 'Alterar';
picture pict+"alterar.bmp";
action vnp11000_opc('alterar');
button button_deletar;
caption 'Deletar';
picture pict+"lixo.bmp";
action vnp11000_opc('deletar');
button button_consultar;
caption 'Consultar';
picture pict+"consulta.bmp";
action vnp11000_opc('consultar');
separator;
button button_bloqueio;
caption 'Bloqueio';
picture pict+"bloqueio.bmp";
action vnp11000_opc('bloquear');
separator;
button button_desbloqueio;
caption 'Desbloqueio';
picture pict+"desbloqueio.bmp";
action vnp11000_opc('desbloquear');
separator;
button button_historico;
caption 'Histórico';
picture pict+"historico.bmp";
action vnp11000_opc('historico');
separator;
button button_buscar;
caption 'Buscar';
picture pict+"buscar.bmp";
action busca('Buscar Cliente',600,'vnp11000_busca()');
separator;
button button_voltar;
caption 'Voltar';
picture pict+"voltar.bmp";
action janela.release;
end toolbar
end splitbox
24 Mai 2019 13:22
24 Mai 2019 22:52
24 Mai 2019 23:15