Projeto MiniGui - Biblioteca visual para Harbour/xHarbour
28 Abr 2020 22:36
eu estou desenvolvendo um programa que e contas a pagar e tenho um textbox nao to conseguindo ver o retorno do que eu entrei no value...
@ 160,140 TEXTBOX T_DATA_PAG ;
OF Form_2 ;
WIDTH 100 ;
value cdata_pag ;
DATE ;
ON ENTER Form_2.T_PERIODICID.SetFocus
queria ver o que tem em cdata_pag antes de passar p o proximo textbox
joaovargas
Usuário Nível 1
Usuário Nível 1
Mensagens: 2
Data de registro: 07 Mar 2011 15:39
Cidade/Estado: piratini rs
29 Abr 2020 10:37
Bom dia, não está claro mas... acho que o que quer é isso:
IIF( Form_2.T_PERIODICID.cdata_pag.VALUE = CTOD(""), FAZ ISSO, FAZ AQUILO )
HASA
01 Mai 2020 16:51
cdata_pag:=data_pag ///campo do banco de dados
na verdade eu quero que quando o campo data_pag for vazio carregue a data corrente e mostre no textbox no cdata_pag
02 Mai 2020 12:29
primeiro um exemplo
DEFINE WINDOW menuusuario;
ROW 0 ;
COL 0 ;
WIDTH 1020;
HEIGHT 800;
TITLE 'teste'
@ 120, 250 TEXTBOX nomepesquisa;
WIDTH 200;
MAXLENGTH 50
menuusuario.nomepesquisa.value:=dtoc(data_pag)
if empty(menuusuario.nomepesquisa.value)
menuusuario.nomepesquisa.value:=dtoc(date())
endif
END WINDOW
menuusuario.Center
menuusuario.Activate
séria isso ?
03 Mai 2020 10:18
ja resolvi....obrigado....
Powered by phpBB © phpBB Group.
phpBB Mobile / SEO by Artodia.