Básico - Crítica em campos com EditMask definido
Boa Tarde pessoal, primeira vez que posto no fórum e me surgiu uma dúvida que acredito ser básica(fácil) para vocês!
Lá vai:
Tenho:
IBDataSet: DataSet_Cliente (onde tenho os campos os quais alguns tenho máscaras definidas no campo EditMask)
Problema:
Estou tentando fazer a crítica dos dados onde:
if (DBEdit1.Text = ´´) then
showmessage(´Campo 1 em branco! Preencha´);
Os campos que não teem mascara definida esse procedimento funciona, o problema são os campos com mascara definida:
Exemplo, campo data! A Máscara definida é 99/99/9999;0;_
Já tentei:
if (DBEditDATA.Text = ´´) then
showmessage(´Campo DATA em branco! Preencha´);
if (DBEditDATA.Text = ´ / / ´) then
showmessage(´Campo DATA em branco! Preencha´);
if (DBEditDATA.Text = ´__/__/____´) then
showmessage(´Campo DATA em branco! Preencha´);
E nenhum desses procedimentos funciona!
Por gentileza, algum sabe alguma forma de fazer funcionar esta crítica para campos que possuem máscara?
Tentei ser o mais claro possível! :)
Grato desde já e abraço a todos,
Nicollas
Lá vai:
Tenho:
IBDataSet: DataSet_Cliente (onde tenho os campos os quais alguns tenho máscaras definidas no campo EditMask)
Problema:
Estou tentando fazer a crítica dos dados onde:
if (DBEdit1.Text = ´´) then
showmessage(´Campo 1 em branco! Preencha´);
Os campos que não teem mascara definida esse procedimento funciona, o problema são os campos com mascara definida:
Exemplo, campo data! A Máscara definida é 99/99/9999;0;_
Já tentei:
if (DBEditDATA.Text = ´´) then
showmessage(´Campo DATA em branco! Preencha´);
if (DBEditDATA.Text = ´ / / ´) then
showmessage(´Campo DATA em branco! Preencha´);
if (DBEditDATA.Text = ´__/__/____´) then
showmessage(´Campo DATA em branco! Preencha´);
E nenhum desses procedimentos funciona!
Por gentileza, algum sabe alguma forma de fazer funcionar esta crítica para campos que possuem máscara?
Tentei ser o mais claro possível! :)
Grato desde já e abraço a todos,
Nicollas
Nick
Curtidas 0
Respostas
Edilcimar
17/10/2005
no onexit do campo data utilize uma variavel e use try
ex: try
data := strtodate(maskedit1.tex);
except
showmessage(´data errada´);
maskedit1.setfocus;
end;
ex: try
data := strtodate(maskedit1.tex);
except
showmessage(´data errada´);
maskedit1.setfocus;
end;
GOSTEI 0
Nick
17/10/2005
Assim, o problema não é o campo data...
por exemplo no campo CPF a mascara é 999.999.999-99;0;_
faz de conta que o campo tem o
CPF [333.444.555-66]
X:=DBEditCPF.TExt;
se eu armazenar esse valor em uma variavel X ele vai guardar o valor 33344455566
se eu fizer um
if (x=´33344455566´) then
showmessage(´Campo CPF Preenchido´);
//Funciona!
O problema é que não funciona quando o campo tá em branco:
CPF [ . . - ]
X:=DBEditCPF.Text;
if (X=´´) then
showmessage(´Campo CPF em branco´);
//NÃO Funciona!
Esse é o problema quando o campo está em branco em um campo onde existe máscara ele não entra no if(acima)! Queria saber uma maneira de contornar esse problema ;)
Mas obrigado pela ajuda edilcimar!
por exemplo no campo CPF a mascara é 999.999.999-99;0;_
faz de conta que o campo tem o
CPF [333.444.555-66]
X:=DBEditCPF.TExt;
se eu armazenar esse valor em uma variavel X ele vai guardar o valor 33344455566
se eu fizer um
if (x=´33344455566´) then
showmessage(´Campo CPF Preenchido´);
//Funciona!
O problema é que não funciona quando o campo tá em branco:
CPF [ . . - ]
X:=DBEditCPF.Text;
if (X=´´) then
showmessage(´Campo CPF em branco´);
//NÃO Funciona!
Esse é o problema quando o campo está em branco em um campo onde existe máscara ele não entra no if(acima)! Queria saber uma maneira de contornar esse problema ;)
Mas obrigado pela ajuda edilcimar!
GOSTEI 0
Emerson Nascimento
17/10/2005
ou ainda:
if DBEditDATA.Field.AsString=´´ then
showmessage(´Campo DATA em branco! Preencha´)
else
if DBEditCPF.Field.AsString=´´ then
showmessage(´Campo CPF em branco! Preencha´);
if DBEditDATA.Field.AsString=´´ then
showmessage(´Campo DATA em branco! Preencha´)
else
if DBEditCPF.Field.AsString=´´ then
showmessage(´Campo CPF em branco! Preencha´);
GOSTEI 0
Nick
17/10/2005
Beleza emerson.en ,
era exatamente isso!
Valeu! Abração! :)
era exatamente isso!
Valeu! Abração! :)
GOSTEI 0