validação
17/03/2006
0
//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
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
Curtir tópico
+ 0
Responder
Posts
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
Clique aqui para fazer login e interagir na Comunidade :)