Fórum É simples, mas num sei #148216

Galera,

Eu tô implementando em meu projeto um conjunto de boTões para inserir, gravar, deletar etc (ao invés de usar o DBNavigator). Só que ele não compila Fica dando a mensagem: Undeclared identifier: ´DsEdit´ e Incompatible Types: ´TDataSetState´ and ´Integer. E o código segue abaixo. Por favor, o que há de errado

procedure TfrmCadClie.FormCloseQuery(Sender: TObject;
var CanClose: Boolean);
begin
If DMCliente.TbCliente.State in [dsEdit, DsInsert] Then
If MessageDlg(´Existem dados pendentes,´+#13+´deseja gravá-los?´,mtConfirmation,[mbYes,mbNo],0)=mrYes then
CanClose:=False
Else
Begin
DMCliente.TbCliente.Cancel;
DMCliente.Database1.Rollback;
Tratabotoes;
CanClose:=True;

O que há de errado?