Try não funciona no D7?

Pessoal alguém sabe me dizer o que está errado neste código:

Begin
Try
dm.TblLocProf.close;
dm.TblLocProf.SQL.clear;
dm.TblLocProf.SQL.add(´SELECT * FROM mkprofessor WHERE cpf Like :cpf ´);
dm.TblLocProf.ParamByName(´cpf´).AsString:=EdCPF.Text;
DM.TblLocProf.Prepare;
dm.TblLocProf.open;
cpf:=DM.TblLocProfcpf.Value;
Except
If MessageDlg(´O CPF informado ainda não foi cadastrado no sistema!´+#13+´Deseja continuar e cadastrar este professor?´,mtInformation,[mbYes,mbNo],0)=mrYes Then
Begin
EdNome.Text:=´´;
EdNome.SetFocus;
End
Else
Begin
EdCPF.Text:=´´;
EdCPF.SetFocus;
End;
End;
End

Quando cai no bloco que deve executar o Try ele não faz nada, por que será?

Valeu

Angelo