Delphi Guru

Combobox tidak hanya menyediakan fasilitas untuk menampung string saja. Kita bisa menambahkan object ke dalam combobox. Dengan fasilitas ini kita akan mendapat kan banyak manfaatnya. Mis : Kita menyediakan data cabang dalam combobox. Ketika kita akan menyimpan transaksi yang menggunakan data cabang tersebut, tentunya kita membutuhkan ID atau kode dari cabang yng terpilih. Dengan kemampuan bisa menampung object, kita tidak perlu query lagi ke database guna mendapatkan ID/Kode cabang yang terpilih. Kita tinggal ambil object dari cabang yang terpilih, lalu ambil kode atau ID nya. Untuk memasukkan object kedalam combobox, ikuti langkah - langkah berikut ini : TComboObject = class(TComponent) private FData1: string; FData2: string; FID: Integer; public property Data1: string read FData1 write FData1; property Data2: string read FData2 write FData2; property ID: Integer read FID write FID; end; Kelas TComboObject ini saya turunkan dari TComponent....

Pada artikel ini, saya akan memberikan trik membuat lebar kolom pada list view menyesuaikan lebarnya dengan panjang data secara runtime. Agar lebar kolom secara otomatis menyesuaikan dengan lebar data cukup mudah. Kita hanya perlu memberikan nilai width pada kolom tersebut dengan angka -2 (minus 2). Lebih detailnya ikut langkah - langkah berikut : Nama Property Value Name lv1 ViewStyle vsReport Width 505 2. Masukkan komponen TButton ke dalam form, set property di bawah ini : Nama Property Value Name btnBuatKolom Caption Buat Kolom Pada event OnClick button btnBuatKolom isikan baris kode berikut ini : procedure TfrmMain.btnBuatKolomClick(Sender: TObject); var i: Integer; lvColumn: TListColumn; begin for i := 1 to 10 do begin lvColumn := lv1.Columns.Add; lvColumn.Caption := 'Data Ke ' + IntToStr(i); end; end; 3. Masukkan s...

Sebagai seorang programmer, keberadaan bug adalah satu hal yang harus kita hindari. Namun seteliti apapun seorang programmer, dan sebaik apapun seorang tester melakukan testing, keberadaan bug selalu ada. Untuk melakukan pengelolaan bug agar terdokumentasi dengan baik dan tidak terulang dikemudian hari, ada beberapa tools yang bisa dipakai. Salah satunya adalah Mantis Bug Tracker (MBT) . MBT menyediakan fasilitas untuk mendokumentasikan bug baik yang ditemukan oleh tester pada saat melakukan proses testing maupun yang ditemukan oleh user. MBT juga memudahkan bagi serang project manager untuk meng-assign bug tertentu kepada timnya. Selain itu, MBT juga menyediakan fasilitas untuk memonitor progress penyelesaian dari suatu bug. MBT, dalam mengelola bug-bug yang ada membagi status bug dalam beberapa status mulai dari assign, acknowledge, feedback, confirm, resolve dan close. MBT juga membagi kategori bug dalam beberapa kategori mis : Urgent/Normal dan beberapa kategori yang lain. ...

Sistem penomoran yang sering dipakai adalah sistem penomoran angka arab. Angka arab terdiri dari sembilan angka yaitu 0,1,2,3,4,5,6,7,8,9. Selain sistem penomoran arab ada sistem penomoran lain yang juga sering dipakai, yaitu sistem romawi. Sistem penomoran romawi menggunakan 7 simbol yang bisa dikombinasikan untuk merepresentasikan angka 1 s.d. 1.000.000. Sismbol-simbol dalam sistem romawi yaitu : I = 1, V = 5, X = 10, L = 50, C = 100, D = 500, M = 1000. Contoh : 1973 (Arab) sama dengan MCMLXXIII (Romawi). Pada artikel berikut ini akan diberikan cara untuk mengkonversi angka romawi kedalam sistem arab. Berikut ini source code nya : function RomanToArabic(const romanNumber : string) : integer ; const romanChars = 'IVXLCDMvxlcdm?!#' ; decades : array [0..8] of integer = (0, 1, 10, 100, 1000,10000, 100000, 1000000, 10000000) ; OneFive : array [boolean] of byte = (1, 5) ; var newValue, oldValue : integer ; cIdx, P : byte ; begin result := 0; ...

Untuk mempercantik tampilan cxGrid, kita bisa melakukan perubahan warna baris-barisnya. Kita bedakan warna antara baris ganjil dan genap. Untuk melakukan ini, ikuti langkah-langkah berikut : 1.        Masukkan komponen cxGrid -           Set alignmentnya menjadi alTOP -           Ganti viewnya yang tadinya DBTable menjadi Table (jika anda akan langsung mengkases data ke database bisa tetap menggunakan DBTable), namakan dengn : cxGridTableGrid1TableView1 -           Tambahkan tiga kolom mis :  Nama Barang, Harga 2.        Masukkan komponen cxStyleRepository -           Klik Kanan > Edit -           Tambahkan dua style dengan klik tombol Add -   ...

Sizing TComboBox Drop Down List Width - No Cut Off When a combo box is in dropped down state Windows draws a list box type of control to display combo box items for selection. When the length (of a string) of items exceeds the width of the combo box, the items are displayed as cut-off! Change the Default Application Icon for a Console Mode Delph For a normal GUI application you can change the application icon using Project - Options - Application - Application Settings - Icon. For console mode applications this section is disabled - and thus all console mode application have a default icon. Set Of String ...

Set Of String in Delphi? Union, Intersection and Difference! A set is a collection of ordinal values. The values in a set have no order and it makes no sense to have a value twice (or more times) in a set. Since strings are not ordinal types you cannot have set of string declarations. Or, can you? Implementing StartsText With SubText As Pattern - When Pattern Is A Regular Expression! in regex :: For a relative file path like "abcdeffile.txt" I need to check if the file is located in the "abcdef" folder (or in any of its sub folders).... Read more Use TFile Delphi Record To Encrypt or D...