Fórum como testo campo requerido?? #342450
09/06/2007
0
Ola, tenho 4 campos requeridos: Nome, CPF, Idade, Sexo, como eu faço o teste para q se algum esteja em branco, automaticamente ele va para este campo vazio?
estou usando FB
Obrigado
estou usando FB
Obrigado
Njuniorba
Curtir tópico
+ 0
Responder
Posts
12/06/2007
Vitor Alcantara
Você poderia conferir se a propriedade required do campo está marcada e também se ele está vazio.
Tipo:
var
x:Integer;
begin
For x := 0 To ComponentCount - 1 do
if Components[x] is TDbEdit then
if (TDbEdit(Components[x]).Field.Required) and
(TDbEdit(Components[x]).Field.AsString = ´´ ) then
Begin
MessageBox(Handle, PChar(´O campo ´+ TDbEdit(Components[x]).Field.DisplayLabel + ´ é um campo obrigatório.´) , ´ Campo requerido´, mb_ok);
TDbEdit(Components[x]).SetFocus;
exit;
end;
end;
Tipo:
var
x:Integer;
begin
For x := 0 To ComponentCount - 1 do
if Components[x] is TDbEdit then
if (TDbEdit(Components[x]).Field.Required) and
(TDbEdit(Components[x]).Field.AsString = ´´ ) then
Begin
MessageBox(Handle, PChar(´O campo ´+ TDbEdit(Components[x]).Field.DisplayLabel + ´ é um campo obrigatório.´) , ´ Campo requerido´, mb_ok);
TDbEdit(Components[x]).SetFocus;
exit;
end;
end;
Responder
Gostei + 0
12/06/2007
Nightshade
a biblioteca de componentes JEDI possui o JVValidators, saiu na ediçao 72 da Clube delphi parece uma materia ensinando usar eles, nao tenho certeza a ediçao, eh uma das ultimas com uma caba verde q diz POO..
na area de downloads do site tu visualiza ela e pega o exemplo mostrando como ele eh utilizado..
muito bom o componente e util.
na area de downloads do site tu visualiza ela e pega o exemplo mostrando como ele eh utilizado..
muito bom o componente e util.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)