Hmm... pernah merasa bosan dengan tampilan program pascal yang warna latar nya (background) hitam polos ketika di-
compile?
Kalau iya, ayo ikuti tutorial di bawah ini
Persiapan :
- Salin semua file yang ada di folder BGI dan UNITS ke folder dimana Anda menaruh file TPX.EXE
- Tekan Alt+Enter untuk berubah ke layar fullscreen
Terus?
- Jangan lupa menggunakan unit graph. Unit graph digunakan dengan menambahkan 'uses graph' (tanpa tanda petik) di awal program/di bawah 'program nama_program', sebaiknya gunakan unit crt juga:
uses crt,graph
- Jangan lupa untuk mendeklarasikan variabel yang berupa integer untuk digunakan dengan initgraph, contoh :
var
gp,gm:integer;
- Selanjutnya, di bagian program utama tambahkan 3 baris program sebagai berikut (contohnya dengan menggunakan variabel di atas) :
gp:=detect;
initgraph(gp,gm,'');
setbkcolor(warna);
Keterangan warna :
Pada tahap 3 di atas sudah ada
setbkcolor(warna)
Nah kita bisa mengganti warna nya dengan ketentuan sebagai berikut :
0 = Black
1 = Blue
2 = Green
3 = Cyan
4 = Red
5 = Magenta
6 = Brown
7 = LightGray
8 = DarkGray
9 = LightBlue
10= LightGreen
11 = LightCyan
12 = LightRed
13 = LightMagenta
14 = Yellow
15 = White
Anda boleh menuliskan nomor nya maupun warna nya langsung
Membuat Tulisan
Untuk membuat tulisan pada mode grafik
tidak bisa dengan menggunakan perintah
write atau
writeln ada perintah khusus, yaitu
outtext atau
outtextXY, lihat contoh program.
Contoh Program :
program warna_latar;
uses
crt,graph; {atau uses wincrt,graph;}
var
gp,gm : integer;
nama : string;
begin
gp:=detect;
initgraph(gp,gm,'');
setbkcolor(green);
outtextXY(250,250'Nama Anda?'); readln(nama);
moveto(260,270); outtext('Hi, '+nama);
readkey;
end.
Yang di atas itu kalau kita tambahkan unit
graph baru bisa jalan, tapi ada beberapa perintah sejenis yang hanya bisa digunakan dengan unit
crt, yaitu :
- Untuk mengubah warna text :
textcolor(warna)
- Untuk mengubah latar text :
textbackground(warna)
Gimana, sudah paham? atau kurang jelas? Silahkan berkomentar
Akan saya jawab sebisanya
Oh, ya... tunggu dulu, ada beberapa kekurangan jika kita menggunakan unit graph, salah satu nya karakter-karakter seperti titik(.), koma(,), tanda tanya(?), dan sejenisnya tidak muncul dengan baik di layar.
*Artikel ini di-posting atas permintaan saudara Opik. Terima kasih 
Experience is the best teacher, so don't give up to keep trying
Selamat kepada semua yang sudah dapat award
