Delphi Programming.. {Help Please}

[JagoVB]

gan tolong masukannya dong,,codingan ane ini dimana salahnya yaa?? klo buat di menu yg pertama ane mau nampilin form2 trus menu yg kedua ane mau nampilin form3


Code:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus;

type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
timer1: TMenuItem;
font1: TMenuItem;
procedure timer1Click(Sender: TObject);
procedure font1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
Form2:


{$R *.dfm}

procedure TForm1.timer1Click(Sender: TObject);
begin
Form2.show;
end;

procedure TForm1.font1Click(Sender: TObject);
begin
Form3.show;
end;

end.