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.
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--------------------------//
Random Articles
- Membuat tampilan seperti XP
- Powtils
- Zoom-In and Zoom-Out Text in a TRichEdit (Undocumented feature)
- Cara mudah menambahkan angka nol '0' didepan sebuah nilai angka
- Atasi gagal koneksi dengan ADOConnection
- Kopi Darat v2 Delphi Indonesia (delphi-id.org)
- Ngoding Pascal di REPL.IT
- Bug: Round Function
- PascalClass #3: Web Development with Free Pascal
- Lazarus Release 2.0.12
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
Last Articles
Recent Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago