刚接触DELPHI,好多都不会用,很不熟悉。我做了个这样的东西,不知道怎么搞的出现这样的问题,麻烦告之var
  Form1: TForm1;implementation
 uses unit2
{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
     form2.showModal;
    showMessage('模态显示完毕');
end;procedure TForm1.Button2Click(Sender: TObject);
begin
  form2.show;
  showMessage('非模态显示完毕');end;end.
运行后就这样
[Error] mutai.pas(28): ',' or ';' expected but 'PROCEDURE' found
[Fatal Error] Project1.dpr(6): Could not compile used unit 'mutai.pas'

解决方案 »

  1.   

    刚运行过你的代码,没有错误,可能错在你前面声明部分;贴出完整代码你对比一下:
    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls;type
      TForm1 = class(TForm)
        Button1: TButton;
        Button2: TButton;
        procedure Button1Click(Sender: TObject);
        procedure Button2Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
    begin
      form2.showModal;
      showMessage('模态显示完毕');
    end;procedure TForm1.Button2Click(Sender: TObject);
    begin
      form2.show;
      showMessage('非模态显示完毕');
    end;end.
      

  2.   

    一楼的 uses unit2
    二楼的 uses Unit2;就差一个分号,呵呵。
      

  3.   

    我加了分浩后,运行时不知道怎么搞的,是没错误,可是不生成PROJECT文件,没有运行结果,刚学它不知道怎么学,对它我就觉得是一个善变的小动物啊