Monthly Archives: December 2008

Untuk mengecek status keberadaan file, bisa gunakan fungsi File Search. Perintah dasar untuk File Search dalam delphi adalah FileSearch(const Name, DirList: string): string; Berikut contoh penerapan File Search. Siapkan sebuah EditText dan Button, dan terapkan source code berikut ini. procedure … Continue reading →

Dengan fungsi windows, banyak yang bisa didapatkan, salah satunya adalah mendapatkan status ataupun mensetting capslock dan numlock. Sintax dasarnya adalah var KeyState: TKeyboardState; begin Keybd_Event(VK_CAPITAL, 1, KEYEVENTF_EXTENDEDKEY or 0, 0); Keybd_Event(VK_CAPITAL, 1, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0); end; VK_Capital adalah jenis … Continue reading →

Untuk menghilangkan bunyi tung pada saat enter, silahkan gunakan tambahkan key := #0 pada event keypress. Berikut AP Berikan contoh : procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key = #13 then key := #0; end;

Pembatasan karakter sangat penting diketahui oleh para programmer pemula. Ini diakibatkan untuk menghindari error dari data yang dimasukkan oleh user. Misalkan saja, seharusnya text tersebut hanya boleh diisi oleh angka saja, tetapi karena tidak ada pembatasan karakter inputan, maka user … Continue reading →

Array adalah beberapa data yang memiliki index. Penggunaan array dilakukan jika kita ingin mengumpulkan data lalu data yang ada ingin diproses. Untuk source code penggunaan array(Static), silahkan klik disini

Fungsi Pengulangan (Loop) dalam delphi bisa dilakukan dengan berbagai cara, tergantung keperluan dan kebutuhan serta keinginan programmer itu sendiri. Untuk fungsi looping itu sendiri didalam delphi bisa dilakukan dengan For..To atau While atau juga bisa menggunakan Repeat. Untuk mendapatkan source … Continue reading →

Fungsi case (pemilihan) adalah fungsi yang harus dipahami oleh programmer delphi pemula. Case digunakan jika anda menggunakan suatu pemilihan pada suatu object. Dengan fungsi case, anda tidak perlu lagi membuat if terlalu banyak. Untuk source code penggunaan case, silahkan klik … Continue reading →

Fungsi pengandaian (If..Then..Else) adalah fungsi wajib yang harus dipahami programmer. Namun penulisan menggunakan Delphi agak berbeda dengan visual basic. Pada delphi menggunakan begin..end untuk penulisannya. Berikut Ap Berikan contoh penggunaan If dan Else dengan beberapa kombinasi perintah, semoga bisa dipahami … Continue reading →