[NCD]

Тоже правильно подмечено, aleksnine, здесь ведь Caption формы присваивается новое значение, а переменная остаётся той же (я этого не заметил), в итоге получается один и тот же результат. Хотя в нашем случае удобнее будет использовать мой способ, если нужно счётчик выводить на Caption формы, и не заморачиваться с этими переменными.

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin

Form1.Caption{Form1.Caption='0'} := IntToStr(StrToInt(Form1.Caption) + 1);

end;

Всё в одну строчку - простенько и со вкусом