Form peringatan ini mempunyai banyak kegunaan diantara meminimalisir salah pencet dan salah menjalankan perintah yang tidak seharusnya, membuat kita memillih antara 2 atau lebih pilihan.
Bagaimana cara membuatnya lihat saja dibawah ini caranya :-s
2. Ikon Tanya dan Pilihan Yes No
3.Ikon Peringatan Warning Yes No Cancel
4.Ikon Peringan STOP Ok
Bagaimana cara membuatnya lihat saja dibawah ini caranya :-s
- Buat Form sebagai berikut:
- Berikan kode berikut pada Button1 / "Kata kataku :) "
void __fastcall TForm1::Button1Click(TObject *Sender) { Application->MessageBoxA("Cintailah dia sepenuh jiwa dan ragamu","Kataku!!" ,MB_OK | MB_ICONWARNING ); }
- Maka saat dijalankan dan diklik kata2ku akan seperti ini
"Cintailah dia sepenuh jiwa dan ragamu" ;((
|
- Anda ingin mengganti ikon dan tombol, telah disedikan sebagai berikut :
void __fastcall TForm1::Button1Click(TObject *Sender) { Application->MessageBoxA("Cintailah dia sepenuh jiwa dan ragamu","Kataku!!" ,MB_OK | MB_ICONINFORMATION ); }Ikon Informasi maka hasilnya akan seperti ini :
2. Ikon Tanya dan Pilihan Yes No
void __fastcall TForm1::Button1Click(TObject *Sender) { Application->MessageBoxA("Apakah kamu mencintainya????","Perasaanmu!!" ,MB_YESNO | MB_ICONQUESTION ); }Hasil :
3.Ikon Peringatan Warning Yes No Cancel
void __fastcall TForm1::Button1Click(TObject *Sender) { Application->MessageBoxA("Buktikan perasaanmu sekarang!!!!","Perasaanmu!!" ,MB_YESNOCANCEL | MB_ICONWARNING );
}Hasil :
4.Ikon Peringan STOP Ok
void __fastcall TForm1::Button1Click(TObject *Sender) { Application->MessageBoxA("Kita PUTUS!!!!","Pesan dari pacar" ,MB_OK | MB_ICONSTOP );
}
BYE (b) (b) (b) (b) (b) (b) |
Tidak ada komentar:
Posting Komentar