Página 1 de 1
Clausula Cancel no Botão
Enviado: 20 Fev 2008 10:07
por celo.michels
Pessoal tenho um GET nele tem um Valid que verifica se a variavel esta preenchida, ou seja, se estiver vazia o Valid retorna .f.
Porem mesmo quando o campo estiver vazio e eu clicar no Botão sair quero que saia da janela.
É o mesmo que o CANCEL nos botoes do Fivewin.
Como faria isto com a HwGui.
Enviado: 20 Fev 2008 11:22
por sygecom
Posta um pequeno exemplo de uso que em cima do seu exemplo agente pode ajustar....
Eu uso aqui botão SAIR e os valid não atrapalham.
Enviado: 20 Fev 2008 16:15
por celo.michels
Código: Selecionar todos
#include "mysay.ch"
#include "hwgui.ch"
Local oFont :=hfont():Add( "Ms Sans Serif",,10)
oFont1 :=hfont():Add( "Ms Sans Serif",,10)
lSai := .t.
zPORTA := SpACE(10)
INIT DIALOG oDLG clipper noexit Title "Medicamento Controlado" at linsay(10), myrow(5) size 255,100 font ofont
//@ 30,20 SAY "Escolha o Tipo de Saida de Mercadorias." SIZE 550, 30
@ 30,20 get zPORTA picture "@!" style WS_TABSTOP size 50,20 Valid {||!empty(zPORTA )}
@ linsay(02),myrow(3) button "Venda de Mercadoria" ;
on click {||ENDDIALOG()} Size 110,25 style WS_TABSTOP
@ linsay(16),myrow(3) button "Perda de Mercadoria" ;
on click {||ENDDIALOG()} Size 110,25 style WS_TABSTOP
ACTIVATE DIALOG oDlg
Enviado: 20 Fev 2008 19:38
por sygecom
Marcelo, como lhe disse no MSN, eu faço validações a partir do botão SALVAR sendo assim nd interfere no botão FECHAR , que dah um close() na dialog, pelo o que vc postou realmente tem esse problema, qualquer posto aqui.