Arsip: Menggambar Kurva (Bezier)


by agusmade in Articles more 16 years ago 7215
Dalam pembuatan aplikasi pengolah gambar atau CAD (Computer Aided Design), software kita harus bisa menggambar kurva. GDI Windows hanya mendukung pembuatan kurva jenis bezier.
Kurva bezier adalah kurva yang digambar melalui minimal 3 titik. dengan 2 buah titik sebagai unjung dan sisanya adalah titik control. untuk lebih jelas soal kurva bezier silahkan kunjungi wikipedia soal bezier (http://en.wikipedia.org/wiki/B%C3%A9zier_curve)

Berikut adalah contoh program untuk menggambar kurva bezier secara random.
procedure TForm1.Button1Click(Sender: TObject);
var pusat:array of tpoint;
i:integer;
begin
setlength(pusat,4);
for i:=low(pusat) to high(pusat) do
begin
pusat[i].x:=random(width);
pusat[i].y:=random(height);
end;
canvas.PolyBezier(pusat);
end;
//----------------------------agusmade--------------------------//
Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com