不知道为什么的问题-----！！！在线等待？！！

Question

各位高手们好：
     请你们看一下代码？？？？？？
     
procedure TForm1.Button1Click(Sender: TObject);
var
   f:textfile;
begin
   opendialog1.Title:='删除文件：';
   if opendialog1.Execute then
      begin
         assignfile(f,opendialog1.FileName);
         try
           reset(f);
           if messagedlg('确实要删除此'+opendialog1.FileName+'文件吗？',mtconfirmation,[mbyes,mbno],0)=mryes then
              begin
                 closefile(f);
                 erase(f);
              end;
         except
             on ezerodivide do handlezerodivide;
             on eoverflew do handleoverflew;
             on ematherror do handlematherror;
         else
             handleallothers;
         end;      end;
end;请问：：我在编辑时它总是告诉我：handlezerodivide,handleoverflew,handlematherror和handleallothers没有声明。
它们不是系统的错误处理例程吗？干吗还声明呀？不是拿来就可以用的吗？如果还是想用上面的句子，请问在什么地方声明？怎样声明？？？关键是在哪儿声明和怎么声明？？？
请您们帮我一下好吗？

Answer 1

use 里
申明什么我也不知道

Answer 2

这些例程都要自己编的，自己处理异常，当然你可以调用Application.HandleException。但是看你的代码，
             on ezerodivide do handlezerodivide;
             on eoverflew do handleoverflew;
             on ematherror do handlematherror;
这三个异常都不会发生的