Tampilan projek sebelum di run
Setelah di run akan menghasilkan tampilan
Kemudian Setelah Tombol untuk menampilkan grafis di klik semua, akan menghasilkan
Langkah-langkah pembuatan projek
1. Membuat interface sedemikian rupa
2. Klik button “TITIK” kemudian mengetikan di file cpp nya dengan source code berikut:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Form1->Canvas->MoveTo(100,112);
Form1->Canvas->LineTo(101,113);
}
3. Klik button “GARIS” kemudian mengetikan di file cpp nya dengan source code berikut:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Canvas->MoveTo(170,112);
Form1->Canvas->LineTo(290,112);
}
4. Klik button “PERSEGI” kemudian mengetikan di file cpp nya dengan source code berikut:
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Form1->Canvas->Rectangle(320,70,400,150);
}
5. Klik button “SEGITIGA” kemudian mengetikan di file cpp nya dengan source code berikut:
void __fastcall TForm1::Button4Click(TObject *Sender)
{
Form1->Canvas->MoveTo(500,70);
Form1->Canvas->LineTo(450,140);
Form1->Canvas->LineTo(550,140);
Form1->Canvas->LineTo(500,70);
}
6. Klik button “LINGKARAN” kemudian mengetikan di file cpp nya dengan source code berikut:
void __fastcall TForm1::Button5Click(TObject *Sender)
{
Form1->Canvas->Ellipse(600,70,680,150);
}
oh, muantap artikelnya, salam kenal yah
ReplyDeletePost a Comment