Belajar Program Grafik Delphi

G R A F I K Borland DelPhi

SEKILAS TENTANG GDI (GRAFIK DEVICE INTERFACE)
Pemrograman Grafik pada sistem operasi windows selalu menggunakan antar muka yang disebut GDI, GDI merupakan kumpulan fungsi yang digunakan untuk mengakses atau menggambar ke piranti tertentu, seperti layar, printer, dsb. GDI mempunyai kelebihan tidak tergantung piranti (device independent).

CANVAS
Canvas merupakan area gambar abstrak dari objek atau komponen-komponen Grafis.Jika bekerja dengan grafik ada dua istilah yang harus dibedakan ayaitu Drawing dan painting.

PIXEL
Bagian terkecil dari gambar yang dapat diberikan warna-warni.
Bentuk Umum :
Canvas.Pixels[x,y]:=Warna;
X,y : koordinat
Warna : Kode Warna

Contoh :
FOR A:= 1 TO 200 DO
BEGIN
canvas.Pixels[400+a,100]:=clblue;
canvas.Pixels[400,100+a]:=clred;
canvas.Pixels[600-a,300]:=clgreen;
canvas.Pixels[600,300-a]:=clpurple;
canvas.Pixels[600-a,300-a]:=clmaroon;
canvas.Pixels[400+a,300-a]:=clgray;
for z:= 1 to 10000000 do
END;

KODE WARNA YANG SERING DIGUNAKAN
ClBlack, clTeal, ClMaroon, clGray, ClGreen, clSilver, clOlive, clRed, clNavy, clLime
clPurple, clBlue, clYellow, clFuchsia, clAqua, clWhite

RGB dan TColor
RGB (Red, Green, Blue) tiga warna primer yang mempunyai intensitas dinyatakan dengan bilangan 0 sampai dengan 255 , Tcolor untuk menangani penyimpanan model warna RGB.

Bentuk Umum :
Object : = Tcolor(RGB(warna 0 - 255,warna 0 - 255,warna 0 - 255))

Contoh :
Form1.color:=Tcolor(RGB(255,0,0)); ß Warna Merah
Form1.color:=Tcolor(RGB(0,255,0)); ß Warna Hijau
Form1.color:=Tcolor(RGB(0,0,255)); ß Warna Biru

Text
Untuk dapat menampilkan Teks pada Canvas (form)
Bentuk Umum : Canvas.TextOut(x,y,s)
X,Y : koordinat;
S : string yang ditampilkan

Contoh :
VAL(EDIT9.Text,T,P);
VAL(EDIT10.Text,X,P);
VAL(EDIT11.Text,Y,P);
canvas.font.Color:=clblue;
canvas.Font.Size:=T;
canvas.TextOut(X,Y,edit8.text);

Pen
Pen digunakan untuk menggambar garis atau bentuk pada canvas, beberapa property yang penting pada pen adalah :
Color untuk memberikan warna pena
Width untuk menentukan lebar pena
Style untuk menentukan gaya pena

Nama Style
Bentuk Style

. psSolid
. psDash
. psDashDot
. psDashDotDot
. psDot
. psClear
. psInsideFrame

. Mode untuk operasi raster yang digunakan pena
Operasi raster adalah operasi yang dikenakan terhadap dua pixel (pixel dari pena dan pixel dari jendela),yaitu: pmBlack, pmCopy,pmMaskNotPen, pmMask, pmMaskPenNot, pmMergeNotPen, pmMerge, pmMergePenNot, pmNop, pmNot, pmNotCopy, pmNotMask, pmNotMerge, PmNotXor, PmWite, pmXor
Contoh arti :Pmcopy artinya pixel dari pena disalin ke jendela

Bentuk Umum : Canvas.Pen.Property

Contoh :
VAL(EDIT1.Text,X1,P);
VAL(EDIT2.Text,X2,P);
VAL(EDIT3.Text,Y1,P);
VAL(EDIT4.Text,Y2,P);
Canvas.Pen.Width:=5;
canvas.Pen.Color:=clGreen;
canvas.Pen.Style:=pssolid;
canvas.Pen.mode:=pmXor;
canvas.ellipse(X1,Y1,X2,Y2);

Brush
Brush adalah kuas digunakan untuk menentukan corak pengisisan objek, ada tiga property yaitu :

. Color untuk menentukan warna kuas yang digunakan
. Style untuk menentukan gaya arsiran dari kuas
Berapa jenis Style yang digunakan adalah :
bsSolid, bsBDiagonal, bsFDiagonal, bsHorizontal, bsVertical, bsCross, bsDiagCross ,bsClear
. Bitmap Style untuk merancang pola kuas pada file.bmp

Contoh :
VAL(EDIT1.Text,X1,P);
VAL(EDIT2.Text,X2,P);
VAL(EDIT3.Text,Y1,P);
VAL(EDIT4.Text,Y2,P);
canvas.Pen.Style:=pssolid;
canvas.brush.style:=bsCross;
canvas.Rectangle(X1,Y1,X2,Y2);

Shape
Untuk menampilkan gambar bentuk – bentuk tertentu, property yang penting adalah :
· Shape untuk memilih bentuk yang telah disediakan yaitu :
Stcircle, StEllipse, StRectangle, StRoundRect, StRoundSquare, StSquare

Image
Digunakan untuk menampilkan gambar Bitmap
Property penting :
· Picture untuk menampilkan gambar dari file kedalam area image
· Stretch untuk menampilkan gambar disesuaikan dengan area image
· Width untuk menentukan lebar area image
· Left untuk menentukan posisi area image diukur dari kiri form
· Top untuk menentukan posisi area image diukur dari atas form