[Cracer]

Доброго времени суток, читающий этот форум. Я понимаю что задаю откровенно ламерский вопрос но тем не менее =)
Есть код:

Код:

var
  Form1: TForm1;
  Size: Integer;
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
Size := 100;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Size:= -1;
Form1.Caption:= Size;
end;

При компиляции ругается на не поддерживаемый тип... Методом перебора перепробовал все... Подскажите пожалуйста что ему скормить? =)