Fórum como fazer se um codigo for acionado parar o outro! #220345

13/03/2004

0

tipo..eu quero que quando um codigo for acionado, parar o outro codigo
veja o codigo:
dm.qryCPF.Close;
dm.qryCPF.SQL.Clear;
dm.qryCPF.SQL.Add(´select cpfcnpj from clientes where cpfcnpj = :mskCPF´);
dm.qryCPF.ParamByName(´mskCPF´).AsString := mskCPF.Text;
dm.qryCPF.Open;
if dm.qryCPF.RecordCount <> 0 then
begin
Mensagem(´CPF já cadastrado no banco de dados´);
mskCPF.Clear;
mskCPF.SetFocus;
SB.Panels[0].Text := ´CPF já cadastrado no banco de dados´;
end;
cpf(mskCPF.Text);
if (cpf(mskCPF.Text) = false) then
begin
Mensagem(´CPF inválido!´);
mskCPF.SetFocus;
end;


eu quero é: que quando tiver outro cliente cadastrado com o mesmo cpf, parar o codigo ali no end; do if dm.qryCPF.RecordCount <> 0 then begin
entederam:?
valeu


Linhares

Linhares

Responder

Posts

13/03/2004

Afarias

Não levando em consideração uma melhor ´estruturação´ do código, um EXIT resolve seu caso.


T+


Responder

Gostei + 0

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

Aceitar