Kategori: Delphi – Lazarus

Maaf, masih dipersiapkan 😀

TEdit adalah sebuah komponen yang biasa digunakan untuk meminta masukkan dari pengguna. Kali ini kita akan mencoba menggunakan komponen TEdit ini. Buatlah aplikasi baru dengan memilih File>New>Vcl Forms Application – Delphi. Lalu tambahkan Edit ke dalam form dengan memilih komponen pada ToolPalette. Tambahkan juga sebuah Button di bawah Edit1 (TEdit yang pertama ditambahkan biasanya diberi […]

Sampai tahap ini kita sudah mengetahui dengan jelas apa yang terjadi dibalik kemudahan-kemudahan Delphi. Sekarang kita sudah siap untuk melakukan banyak percobaan dengan VCL, yaitu kekuatan dan kemudahan Delphi. Tetapi sebelum itu, ada baiknya kita melihat lebih dalam tentang bagaimana sebenarnya susunan program Delphi. Susunan program Delphi Pilihlah menu File>New>VCL Form Application-Delphi (XE4) atau File>New>Application […]

Apa yang sudah dilakukan pada program Visibilitas adalah sudah cukup untuk menjaga konsistensi data, akan tetapi cara tersebut masih terasa kurang alami. Alangkah lebih mudahnya jika kita tetap memperlakukan posisi seperti sebuah variabel biasa. Jika kita menginginkan nilainya maka kita menempatkan variabel tersebut pada sebelah kanan operator penugasan. Sebaliknya jika kita ingin mengubah nilainya maka […]

Layar monitor yang sedang Anda gunakan untuk melakukan percobaan ini, di dalamnya terdapat banyak sekali kerumitan yang tidak Anda lihat. Tentu saja karena layar monitor tersebut dibungkus dengan kotak (walaupun tidak benar-benar berbentuk kotak). Kotak layar monitor disamping untuk membuatnya tampak rapi juga berfungsi agar peralatan-peralatan penting di dalamnya tidak dijamah secara langsung. Pada bagian […]

Semua class di dalam Delphi adalah turunan dari TObject. Jadi definisi tipe class seperti TGambar=class Memiliki arti yang sama dengan TGambar=class(TObject) Constructor dan destructor Constructor adalah method khusus yang berguna untuk pembuatan obyek. Biasanya constructor diberi nama Create. Pembuatan obyek yang sudah biasa kita lakukan adalah pemanggilan terhadap constructor yang telah didefinisikan di dalam TObject. […]

Sebenarnya untuk mendapatkan sebuah obyek tidak harus dilakukan kepada variabel dengan tipe yang sama dengan obyeknya, akan tetapi bisa dilakukan kepada variabel dengan tipe leluhur obyeknya. Sebagai contoh, untuk mendapatkan obyek dengan tipe TLingkaran, maka kita tidak hanya dapat menerapkan kepada variabel Lingkaran yang bertipe TLingkaran saja, tetapi kita juga dapat menerapkan kepada variabel Gambar […]

Perhatikan contoh program berikut dan hasilnya jika dijalankan. program Turunan2; {$APPTYPE CONSOLE} type TPoint=record X,Y:integer; end; TGambar=class Posisi:TPoint; procedure GambarObyek; end; TLingkaran=class(TGambar) Jari2:integer; procedure GambarObyek; end; TKotak=class(TGambar) Panjang:integer; Lebar:integer; procedure GambarObyek; end; procedure TGambar.GambarObyek; begin Writeln('Menggambar obyek'); end; procedure TLingkaran.GambarObyek; begin Writeln('Menggambar lingkaran'); end; procedure TKotak.GambarObyek; begin Writeln('Menggambar kotak'); end; var Gambar:TGambar; Lingkaran:TLingkaran; Kotak:TKotak; begin […]

Class monyet memiliki batasan-batasan seperti punya dua tangan, dua kaki, dua mata, dua lubang hidung, dua telinga, suka makan, tidak bisa berbicara, bisa membuat orang tertawa, dan lain-lain. Thole adalah obyek dari class monyet. Oleh karena itu Thole juga memiliki dua tangan, dua kaki, dua mata, dua lubang hidung, dua telinga, suka makan, tidak bisa […]

Sebenarnya object merupakan tipe yang hanya digunakan sebagai kompatibilitas dengan versi-versi awal. Untuk versi yang lebih baru sebaiknya menggunakan class. Akan tetapi tipe class selalu merupakan pointer. Jadi deklarasi terhadap variabel dengan tipe class hanya menyediakan pointer untuk obyeknya, tidak sekaligus membuat obyeknya. Sedangkan untuk membuat obyek dengan tipe class tidak dilakukan dengan new(NamaObyek) tetapi […]