alexa-tracking

Main Content

1024
1024
KASKUS
51
244
https://www.kaskus.co.id/thread/509778f5eb74b47a1d00008e/pemrograman-delphi7
Pemrograman Delphi7
agan-agan dan sista-sista, help me donk..

ada yang tau ga cara buat Segi 5 di delphi..?emoticon-Bingung (S)
buat gambar di photoshop simpan jpeg ..
masukin ke delphi emoticon-Big Grin
pada object inspector, klik 2x pada onpaint.
ketikan coding sbb
Code:

var bitmap:TBitmap;
begin
bitmap:=TBitmap.Create;
try
bitmap.LoadFromFile([B]'E:\Lat_PemrogGrafis\segi lima\logo-stmik-cikarang.bmp'[/B]);
Form2.Canvas.Brush.Bitmap:=bitmap;
Form2.Canvas.Polygon([Point(200,87),Point(330,182),Point(280,334),Point(119,334),Point(70,180),Point(200,87)]);
finally
Form2.Canvas.Brush.Bitmap:=nil;
bitmap.Free;
end;

end;


NB: yang dibold, tergantung file dikompie masing2 emoticon-Big Grin
ada yang punya report builder buat delphi 7?
ditunggu share-nya ya
emoticon-I Love Indonesia (S)