Кнопки калькулятора, Делфи

[De_Kurlzz]

Хочу сделать кнопки для калькулятора, но у меня не получается вводить цифры в окно при нажатии на соответствующие кнопки (или производить какое-либо арифметическое действие)
Скачал с этого сайта исходник, смотрел, смотрел, так и не понял каким же образом они вводятся. Нашёл в урок по созданию калькулятора, но там что то тоже мутно всё, вроде ввёл всё так как там написано, но не работает.
Вот попытка по этому "уроку" сделать ввод одной цифры:

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Buttons, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    BitBtn1: TBitBtn;
    procedure BitBtn1Click(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
       edit1.Text:=edit1.Text+'1'
    end;
end.

Что здесь не так?

[was3110]

Здесь все правильно. В текст должна дописаться единица. А что не работает?

[Alex2009]

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

Здесь все правильно. В текст должна дописаться единица. А что не работает?

Да все здесь работает.Код 100% рабочий.Я не знаю что у вас там не работает но код абсолютно правильный.Вы бы исходник кинули ну а мы посмотрим,что там у вас.

[De_Kurlzz]

Здесь все правильно. В текст должна дописаться единица. А что не работает?

Как раз еденица при нажатии на кнопку и не пишется у меня(

Вот исходник моей попытки:

[DoDge_VipeR]

А вы кнопке событие - то назначили?
ни фига вы не назначили!
Выберите кнопочку-->перейдите на вкладочку Events Инспектора Обьектов --> назначьте кнопочке событие ONclick

[De_Kurlzz]

Спасибо! (^_^)