Mengubah caption button secara software

Penjelasan kali ni ane akan membuat tombol 'STOP' artinya ketika program berhenti label button2 akan kembali pada keadaan awalnya.
ni caranya..:
1. Pada latihan 4 anda sudah bisa mengisi instruksi program pada tombol Close. Sekarang anda latihan lagi menempatkan tombol baru dengan nama label RUN.
2. Sorot component pallet standart button. Bawa komponen tombol tersebut ke Form. Ubahlah label button2 dengan nama RUN dengan mengganti label caption pada menu propertiesnya.
3. Tampilan pada Form akan tampak seperti di bawah ini


4. Klik dua kali tombol RUN maka anda akan segera masuk ke lembar unit kerja.
5. Ketikkan di antara begin-end program berikut ini :
procedure TForm1.Button2Click(Sender: TObject);
begin
button2.Caption:='STOP';
end;
6. Kemudian jalankan kembali program anda dengan menekan F9.
7. Uji program dengan menekan tombol RUN, amati apa yang terjadi ?
8. Penjelasan : Ketika tombol RUN ditekan maka label caption tombol button2 akan diubah dengan nama label baru yaitu STOP.
9. Tutuplah program dengan menekan tombol close pada Form. Amati kembali label pada tombol button2. Apa yang terjadi ?

Selamat mencoba..