validação
//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
Curtidas 0
Respostas
Rjun
17/03/2006
Parece que toda sexta-feira aparece um post assim...
GOSTEI 0
Martins
17/03/2006
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] :!:
GOSTEI 0