最基本问题

Question

unit Unit2;interfaceuses
    Dialogs;Type
    procedure showmessage;const
    Info ='############################### '+#13#10+
          '    左箭头 ——移动方块向左     '+#13#10+
          '    右箭头 ——移动方块向右     '+#13#10+
          '    下箭头 ——加速方块向下     '+#13#10+
          '    上箭头 ———旋转方块       '+#13#10+
          '############################### '+#13#10implementationend.
----------------------------------------------------------------
[Error] UnitAbout.pas(10): Identifier expected but 'PROCEDURE' found
  [Fatal Error] MyBlock.dpr(6): Could not compile used unit 'UnitAbout.pas'
------------------------------------------------------------------
请看一下上面的代码和错误，我因为刚学delphi不太会用。
我想问一下interface,type,implementation部分该如何写。
给一些相关的知识也行。

Answer 1

unit Unit2;interface
uses dialogs;
const
    Info ='############################### '+#13#10+
          '    左箭头 ——移动方块向左     '+#13#10+
          '    右箭头 ——移动方块向右     '+#13#10+
          '    下箭头 ——加速方块向下     '+#13#10+
          '    上箭头 ———旋转方块       '+#13#10+
          '############################### '+#13#10; procedure test;
implementation
 procedure test;
 begin
 end;
end.

Answer 2

缺少UnitAbout.pas单元文件，UnitAbout.pas中Procedure过程没有定义！
在project Manager删除UnitAbout.pas试一试

Answer 3

把TYPE去掉，加上PROCEDURE的定义；

Answer 4

一般来说，type 接下来的应该是类和接口等的定义，接着才是，方法，Priate
proteceted,publish,public，接着是实现.