面像对象问题

Question

各位高手:
   救救我吧
我写了一个类(class)代码如下:
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;type
 Tbb=class
 procedure ss;
end;var
  Form1: TForm1;implementation{$R *.dfm}
procedure ss;
begin
application.MessageBox('测试');
end;end.
提示错误:
[Error] Unit1.pas(30): Not enough actual parameters
[Error] Unit1.pas(19): Unsatisfied forward or external declaration: 'Tbb.ss'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

Answer 1

1.Application.MessageBox的参数不对。
Application.MessageBox(PChar('测试'),'标题',MB_OK+MB_ICONINFORMATION);

Answer 2

我改成Application.MessageBox(PChar('测试'),'标题',MB_OK+MB_ICONINFORMATION);
还有是有错提示:
[Error] Unit1.pas(19): Unsatisfied forward or external declaration: 'Tbb.ss'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

Answer 3

procedure tbb.ss;//看看这里啊
begin
application.MessageBox('测试');
end;