Arsip: Menggambar Kurva (Bezier)


by agusmade in Articles more 17 years ago 7535
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--------------------------//

AI Forward

๐Ÿš€ We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com