ошибки в delphi

[Aleksandr1984]

Всем доброго времени суток. Пытаюсь создать конвертор валют в delphi для зачёта, но прога выдаёт две ошибки. Подскажите в чём проблема.
Вот код:

unit Unit3;

interface

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

type
  TForm3 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure TForm3.Form3Create(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);
var
 usd: real;   // цена в долларах
 k: real;     // курс
 rub: real;   //  цена в рублях
begin

 // получить данные из полей редактирования
 k := StrToFloat(Edit1.Text);
 usd := StrToFloat(Edit2.Text);

 //пересчитать цену из долларов в рубли
 rub := usd * k;

 //вывести результат расчёта в поле Label3
 Label3.Caption := FloatToStr (usd) + ' $ = ' +
                   FloatToStrF(rub, ffCurrency, 6,2) + ' руб. ';
end;

procedure TForm3.Button2Click(Sender: TObject);
begin
  Form3.Close; //Закрыть окно
end;

end.

А вот сообщения об ошибках:
[Pascal Error] Unit3.pas(20): E2065 Unsatisfied forward or external declaration: 'TForm3.Form3Create'
[Pascal Fatal Error] Project2.dpr(5): F2063 Could not compile used unit 'Unit3.pas'

[Аватар]

Сообщение от Aleksandr1984

Подскажите в чём проблема

в этом:

    procedure TForm3.Form3Create(Sender: TObject);