validação

17/03/2006

//insira este código no evento exit do dbedit2

begin
if dbedit1.field.ascurrency > dbedit2.field.ascurrency then
begin
showmessage(´Erro!´);
dbedit2.setfocus; //caso vc queira voltar ao dbedit2
abort;
if dbedit1.field.ascurrency < dbedit2.field.ascurrency then
begin
button1.setfocus; //proximo campo
end;
end;
end;
qq dúvida cpd_arim@hotmail.com


Cpd_arim

Respostas

17/03/2006

Rjun

Parece que toda sexta-feira aparece um post assim...


Responder Citar

18/03/2006

Martins

Parece que toda sexta-feira aparece um post assim...


:)

toda sexta é :?: :?:
Qual é mesmo o objetivo deste código? Validar se um valor informado é maior ou menor do q outro?

begin 
  if dbedit1.field.ascurrency > dbedit2.field.ascurrency then 
      begin 
          showmessage(´Erro!´); 
          dbedit2.setfocus; //caso vc queira voltar ao dbedit2 
          exit; 
      end 
  else 
      begin 
          button1.setfocus; //proximo campo 
      end; 
end; 


Da forma como está acima não ficaria melhor?

Não faço essas validações mesmo, mas valew por colaborar colega!!!

Bom fds [b:a344b3a6a6]Rjun[/b:a344b3a6a6] :!:


Responder Citar