[Страдалецъ]

Можно.

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
 Timer1.Interval:=1000;
 Timer1.Enabled := not Timer1.Enabled;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 Inc(i);
 if i > 4 then i := 0;
 case i
 of 1: label1.Caption:='1000';
    2: label2.Caption:='1000';
    3: label3.Caption:='1000';
    4: label4.Caption:='1000';
 end;
end;

Т.е. нажатие на кнопку будет включать процесс, а вторичное выключать.