最后一个end的后面应该还有一个“end.”
把“procedure FormCreate(Sender: TObject);”这一行注释掉,用“//”

解决方案 »

  1.   

    第二个错误:删除:
     type 
       ...
      procedure FormCreate(Sender: TObject);//删除
      

  2.   

    至于[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas',
    把上面的两个错误搞定了它就自动消失了
      

  3.   

     cobi 说的没错。我觉得没有必要用try..except..end 语句,用if..else 更清晰。
      

  4.   

    这是你修改程序的时候出的错误。
    可以进行以下修改:
    1.删除声明的procedure FormCreate(Sender: TObject);行,
      以为此事件的实现已被删除了。
    2.你删除FormCreate的实现部分是多删除了一个end.加上就可以了。
    在今后的编码过程中,要注意这样的问题。
    Delphi 自己也有此毛病。