关于HELLOWORLD（别笑我:<）

Question

unit helloworld;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,MmSystem;type
  TFormMain = class(TForm)
    ButtonShowAbout: TButton;
    ButtonShowHello: TButton;
    ButtonQuit: TButton;
    procedure ButtonShowAboutClick(Sender: TObject);
    procedure ButtonShowHelloClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure ButtonQuitClick(Sender: TObject);
  private
    procedure FormMini(Sender: TObject);
    procedure FormRes(Sender: TObject);
  public
    { Public declarations }
  end;var
  FormMain: TFormMain;implementation
  uses about;
{$R *.dfm}procedure TFormMain.ButtonShowAboutClick(Sender: TObject);
begin
  AboutBox.ShowModal;
end;procedure TFormMain.ButtonShowHelloClick(Sender: TObject);
begin
  ShowMessage('你好，欢迎使用飞鱼软体!');
end;procedure TFormMain.FormMini(Sender: TObject);
begin
  PlaySound('Minimize',0,snd_async);
end;procedure TFormMain.FormRes(Sender: TObject);
begin
  PlaySound('RestoreUp',0,snd_async);
end;
procedure TFormMain.FormCreate(Sender: TObject);
begin
  Application.OnMinimize:=FormMini;
  Application.OnRestore:=FormRes;
end;procedure TFormMain.ButtonQuitClick(Sender: TObject);
begin
  Application.Terminate;
end;end.

Answer 1

unit about;interfaceuses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
  Buttons, ExtCtrls;type
  TAboutBox = class(TForm)
    Panel1: TPanel;
    ProgramIcon: TImage;
    ProductName: TLabel;
    Version: TLabel;
    Copyright: TLabel;
    Comments: TLabel;
    OKButton: TButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  AboutBox: TAboutBox;implementation{$R *.dfm}end.

Answer 2

但我想知道到底第一个哪儿错了，在WINDOWS下运行是非法操作
在DELPHI调试环境下运行是一运行就结束。

Answer 3

没有出错信息
如果运行可执行文件，就非法操作
如果在DELPHI下运行，直接终止，无任何提示

Answer 4

program Main;
{$APPTYPE CONSOLE}
begin
  Write('Hello World!');
  Readln;
end.

Answer 5

{$APPTYPE CONSOLE}呵呵这个不能少说明是写的不是啥类型的东西