Clipper On Line • Ver Tópico - TEXTBOX VER O VALOR QUE ENTRO NO VALUE
Página 1 de 1

TEXTBOX VER O VALOR QUE ENTRO NO VALUE

MensagemEnviado: 28 Abr 2020 22:36
por joaovargas
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

TEXTBOX VER O VALOR QUE ENTRO NO VALUE

MensagemEnviado: 29 Abr 2020 10:37
por HASA
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

TEXTBOX VER O VALOR QUE ENTRO NO VALUE

MensagemEnviado: 01 Mai 2020 16:51
por joaovargas
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

TEXTBOX VER O VALOR QUE ENTRO NO VALUE

MensagemEnviado: 02 Mai 2020 12:29
por Claudio Souza
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 ?

TEXTBOX VER O VALOR QUE ENTRO NO VALUE

MensagemEnviado: 03 Mai 2020 10:18
por joaovargas
ja resolvi....obrigado....