Fórum problemas com Length #273684

22/03/2005

0

é o seguinte calera estou usando o comando Length no onexit do dbedit so q ele esta contando os caracteres da mascara e na mesma tela fiz o mesmo processo e nao esta contando os caracteres da mascara como q faço para nao contar os caracteries da mascara ????


Valew



Guilherme

Guilherme

Responder

Posts

22/03/2005

Faelcavalcanti

Cara. Fica mais fácil você pegar a partir de uma query acho que de um DBEdit, não têm jeito não. Ah não ser que alguém saiba. Enfim, estou dando apenas minha sugestão!


Responder

Gostei + 0

22/03/2005

Guilherme

mas o q esta estranho é q tem um igualzinho q funciona !!!!


Responder

Gostei + 0

22/03/2005

Faelcavalcanti

:lol:
Coloca o código.

E também, tipow os dois pra gente fazer uma comparação.


Responder

Gostei + 0

22/03/2005

Guilherme

esse aki funciona
if TBClientePESSOA.Value = ´JURIDICA´ then begin
 if  ((Length(DBEdit3.Text) < 14) or (Length(DBEdit3.Text) > 14)) then begin
 ShowMessage(´Digite Corretamente o CNPJ !´);
 DBEdit3.SetFocus;
 Abort;
End end;
if TBClientePESSOA.Value = ´FISICA´ then begin
 if  ((Length(DBEdit3.Text) < 11) or (Length(DBEdit3.Text) > 11)) then begin
 ShowMessage(´Digite Corretamente o CPF !´);
 DBEdit3.SetFocus;
 Abort;
 end end;
 TBCliente.Edit;
 TBCliente.Post;
end;



esse aki nao
if TBDados_finanAVAL_PESSOA.Value = ´JURIDICA´ then begin
 if  ((Length(DBEdit48.Text) < 14) or (Length(DBEdit48.Text) > 14)) then begin
 ShowMessage(´Digite Corretamente o CNPJ !´);
 DBEdit48.SetFocus;
 Abort;
End end;
if TBDados_finanAVAL_PESSOA.Value = ´FISICA´ then begin
 if  ((Length(DBEdit48.Text) < 11) or (Length(DBEdit48.Text) > 11)) then begin
 ShowMessage(´Digite Corretamente o CPF !´);
 DBEdit48.SetFocus;
 Abort;
 end end;
end;



Responder

Gostei + 0

22/03/2005

Marcio.theis

Já tentou rodar por F9 para ver onde pode estar dando o problema? Ou onde esta pulando ?


Responder

Gostei + 0

22/03/2005

Guilherme

o delphi nao esta dando erro !!!!


Responder

Gostei + 0

22/03/2005

Faelcavalcanti

:shock: :shock: :shock:
Que lokura cara nessa tua máquina!


Responder

Gostei + 0

22/03/2005

Marcio.theis

Não é questão de erro, mas sim para ver o que estar acontecendo com os campos, valores, etc...


Responder

Gostei + 0

22/03/2005

Guilherme

como assim /?????


messenger gborges_13@hotmail.com me adicona ai galera !!!


Responder

Gostei + 0

22/03/2005

Faelcavalcanti

como assim /????? messenger gborges_13@hotmail.com me adicona ai galera !!!


Cara o que o [b:673571b831]taz[/b:673571b831], cujo nick, [b:673571b831]/]/]@t[/b:673571b831] :lol: :lol: ,tá querendo dizer é que você terá que depurar seu código, existem diversas estratégias para depuração, dá uma sacada nestes tópicos sobre [url=http://forum.clubedelphi.net/viewtopic.php?t=54083&highlight=depurar]Como usar o BreakPoint[/url].

Contudo, existem casos como o seu que pode ser uma falha ao valor passado ao componente e/ou coisas do tipo que nos passam desapercebidas e nem sequer notamos. Para ter certeza do que o código está fazendo você deverá inserir vários [b:673571b831]breakpoints[/b:673571b831] no seu código de forma a visualizar em run-time o valor dos parâmetros passados.

:wink:
Falow!


Responder

Gostei + 0

23/03/2005

Guilherme

valew mas o erro era q estava gravando o mascara no banco de dados !!!!


Responder

Gostei + 0

23/03/2005

Gandalf.nho

valew mas o erro era q estava gravando o mascara no banco de dados !!!!


Qual é a máscara que você está usando?


Responder

Gostei + 0

23/03/2005

Guilherme

999.999.999-99;0;



Responder

Gostei + 0

23/03/2005

Guilherme

galera agora nao consigo fazer com q a mascara nao seja gravada no banco de dados !!!! como q faço para q nao grave a mascara no banco de dado ?????


Responder

Gostei + 0

23/03/2005

Gandalf.nho

Estranho, pq o uso de 0 deveria impedir que gravasse os literais da máscara no banco. Você está usando a máscara diretamente na propriedade EditMask do TField ou está formatando via código?


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar