EOleException Undeclared Identifier (Try except)
Olá, estou tendo esse erro ao tentar duplicar uma chave única ou primária nos registros, então no try tentei criar uma exceção pra ele, com a seguinte sintaxe:
Porém o termo 'EOleException' está dando como não declarado, alguém sabe como posso fazer isso?
try
FMForm.produtoQuery.ExecSQL;
CIForm.SelectAll('produto');
ShowMessage('Cadastrado com sucesso!');
except
on EDataBaseError do
ShowMessage('ERRO1.');
on EOleException do
Showmessage('ERRO2.');
end;
FMForm.produtoQuery.ExecSQL;
CIForm.SelectAll('produto');
ShowMessage('Cadastrado com sucesso!');
except
on EDataBaseError do
ShowMessage('ERRO1.');
on EOleException do
Showmessage('ERRO2.');
end;
Porém o termo 'EOleException' está dando como não declarado, alguém sabe como posso fazer isso?
Vitor Ferreira
Curtidas 0
Respostas
Natanael Ferreira
21/06/2016
Adicione [b]ComObj[/b] na uses do form.
GOSTEI 0