Buat aplikasi baru dan design seperti tampilan dibawah ini : komponen yang digunakan TButton dan TEdit, property yang diubah hanya pada bagian TButton ganti Caption menjadi ganti. Klik dua kali pada TButton (tombol ganti) lalu tambahkan script Form1.Caption := edit1.Text jalankan aplikasi diatas dengan menekan tombol F9 screenshoot :