Como colocar mensagem de erro
Olá alguém sabe me informar como faço pra colocar uma mensagem de erro no meu sistema. Uso Delphi com Access e no meu banco de dados eu coloquei um campo numero do titulo como chave e ele não pode ser duplicado, o que eu quero é que quando alguém tentar duplicar esse numero ele me apareça uma mensagem assim:
Titulo duplicado e não aquela mensagem do delphi dizendo que o campo e chave e etc...Obrigado
Titulo duplicado e não aquela mensagem do delphi dizendo que o campo e chave e etc...Obrigado
Cláudiogyn
Curtidas 0
Respostas
Maxsoftware
19/11/2003
if Dados.Tb_CadCli.Locate(´nome´,eNome.text,[])= true then
begin
ShowMessage(´Este cliente já existe!´);
eNome.SetFocus;
eNome.SelectAll;
{ Aqui vc coloca a mensagem de erro...
}
end
begin
ShowMessage(´Este cliente já existe!´);
eNome.SetFocus;
eNome.SelectAll;
{ Aqui vc coloca a mensagem de erro...
}
end
GOSTEI 0