Generate Random String di Delphi

Saat itu lagi ada keperluan untuk bikin fungsi untuk generate random string, yang rencananya mau digunakan untuk random password.

Seperti biasa mencoba searching dulu di internet, siapa tahu udah ada yang bikin.
Akhirnya saya tertarik dengan salah satu trik berikut dari swissdelphicenter

Berikut Kode fungsi:



Fungsi diatas akan generate random string dengan panjang 15 karakter,

Silahkan dimodifikasi sesuai kebutuhan.

Disable ALT+TAB, ALT+ESC, CTRL+ESC, etc on Windows( XP, 2000, Seven) Dengan Delphi [Part III]

Tutorial ini merupakan lanjutan dari sebelumnya (Part II) yang hanya berfungsi untuk mematikan / Disable Task Manager ( Disable CTRL+ALT+DEL ).

Setelah beberapa kali googling, akhirnya menemukan tutorial sangat menarik, sesuai keinginan, yang didapat dari Forum delphiarea.

Sudah berupa kode komplit, berupa unit DisableWinKeys.pas, dibuat oleh Andrea Belli, hasil migrasi prject DLL buatan Gambiz@delphiarea.com

Setelah dipelajari, Unit tersebut berfungsi untuk mematikan tombol:
- CTRL+ESC
- ALT+TAB
- ALT+ESC

Dan penulis modifikasi unit tersebut untuk menambahkan beberapa variasi kombinasi tombol yaitu:
- CTRL+ENTER
- WINKEY (Left/Right),
- MENUKEY (Left/Right

Berikut Kode lengkapnya:


Cara pemanggilannya:
(Pastikan DisableWinKeys sudah ditambahkan pada bagian uses)


Kode ini berfungsi dengan baik di Windows XP & Seven(tested),
semoga saja kompatible dengan versi-versi Windows lainnya

Disable CTRL-ALT-DEL Dengan Delphi [Part II]

Sudah membaca tutorial Bagaimana Caranya Disable System Key Dengan Delphi [Part 1] ?

Yup, kode tersebut hanya berlaku untuk Windows 9.x.
Oleh karena itu penulis googling dan menemukan kode yang diinginkan di forum delphiarea.
Kodenya:



Berhasil 'kan? YUP..

Terus bagaimana dengan kombinasi tombol yang lain? CTRL-ESC, ALT-TAB?

Solusinya? ya googling again.... atau tunggu tutorial berikut

Direct Printing Dengan Delphi

Biar tidak terjadi kesalahpahaman, direct printing yang saya maksud adalah, suatu proses cetak/print secara langsung(direct) ke LPT (Port Printer), khususnya Teks yang di print menggunakan Printer Dotmatrix

Tujuannya adalah untuk kecepatan proses print, yang seringnya diimplementasikan untuk cetak struk/nota, maupun laporan(Text Base Reporting).

Lebih jelasnya, lihat gambar berikut:

'

Diatas merupakan contoh direct printing melalui Command Prompt Windows System.

Bagaimana jika dilakukan melalui pemrograman Delphi?

Ya, Command diatas disimpan dalam batch file ( .cmd / .bat ),
terus batch file tersebut dijalankan di Delphi perintah ShellExecute(), bisa kan.

Dengan cara itu bisa dilakukan, tapi disini kita akan coba implementasikan secara internal(tidak melalui perantara batch-file)

Perhatikan prosedure kode ini:


Contoh diatas diatas akan mencetak semua teks(string) yang ada di dalam variabel infoNota(TStringlist).


Nah, anda lebih suka yang mana?

Bagaimana Caranya Disable System Key Dengan Delphi [Part 1]

Pertama kita harus tahu apa itu system key?
System Key yang saya maksud disini adalah kombinasi tombol antara lain CTRL+ALT+DEL, ALT+TAB, CTRL+ESC. Dan bagaimana caranya men-disable tombol-tombol tersebut dengan DELPHI?

Setelah googling sana sini, akhirnya dapat juga caranya, yaitu tutorial Disable ALT+TAB, CTRL+ESC, CTRL+ALT+DEL yang dibuat oleh Zarko Gajic

Berikut code nya:


Berhasil? Jawabannnya adalah YA & TIDAK

Karena prosedur tersebut Tidak berfungsi di OS WINNT System (XP, 2000)

 
jadi, solusinya?
mari kita googling lagi, atau baca tutorial berikutnya Disable CTRL-ALT-DEL Dengan Delphi [Part II]

GExperts 1.33 (Stable Release)

Pembaca mungkin sudah membaca posting mengenai GExperts disini. Saat ini GExperts sudah sampai versi 1.33 (Stable Release). Detil perubahan bisa dilihat di readme.txt

 

More Info & Download

Delphi Tips Explorer 2008

 

Kumpulan berbagai macam tips delphi programming sesuai kategori,
dan dilengkapi fitur search sehingga memudahkan proses pencarian tips yang diinginkan

Download Link

http://www.maknyos.com/eomqcowszhvf/tip_explorer_2008_setup.exe.html

pass:
www.indofiles.org

Trik Input Angka Dalam Format Rupiah ( Ribuan ) Dengan Delphi

Proses input angka rupiah, akan lebih manarik, lebih memudahkan interaksi dengan user, jika proses input tersebut dalam format ribuan ( rupiah ).





Berikut ini trik untuk proses input dalam format ribuan ( rupiah ) :

1. Pada form, tambahkan component Edit ( Tedit )
2. Pada Component TEdit, tambah code pada Event OnKeyPress


3. Pada Component TEdit, tambah code pada Event OnKeyUp


Lihat hasilnya: ( screenshot)

Note Saver - Konversi Catatan ke Executable dan Secure

Note Saver
versi 1.0 ( beta )
( download link )


Merupakan sebuah tools yang bermanfaat untuk mengkonversi catatan ( .txt ) ke Executable, sehingga Catatan Anda akan portable, stand-alone.

Berikut Fitur-Fitur Notes Saver

• Aplikasi Utama portable, tidak butuh instalasi/file pendukung lainnya
• Aplikasi untuk Konversi ( .txt ) ke ( .exe )
• Catatan Anda yang sudah dikonversi ( .exe ) dapat dibuka dikomputer mana saja, tanpa tergantung aplikasi utama
• Berpassword, hanya Anda saja yang bisa membuka catatan tersebut
• Freeware, gratis untuk digunakan baik personal / komersil

Aplikasi di "cooking" dengan Delphi-7.

Download Link

-semoga bermanfaat-

Implementasi Menu Dinamis menggunakan Delphi + MySQL

nubie only

Menu-menu akan ditampilkan dalam listbox, yang mana menu tersebut dari database. Apabila menu diklik, akan menampilkan form di pagecontrol ( Tab baru)


Hal-hal yang dibutuhkan:
- Database MySQL, download
- Komponen ZeosLib, download
- Kompiler Delphi 7, selain Delphi7 silahkan disesuaikan.


struktur table:


isi table 

contoh hasil:

Untuk contoh code silahkan download :
Downlod+source



---update link : 25 Agustus 2011 --
Download Source code delphi:
http://www.indowebster.com/implemmenudinamis_v_1.html


-semoga bermanfaat-

DelphiSpeedUP IDE Plugin

Salah satu programming tools favoritku yaitu DelphiSpeedUP IDE Plugin.


Fitur-Fitur Plugin ini yaitu :

• Improves Delphi/BCB/BDS's load times
• Optimizes often used RTL functions by functions form the FastCode project
• All optimizations are done in memory and do not change any file on disk
• Adds a "Close all and kill" menu item to the "File" menu that terminates the IDE very fast
• The fast termination is used when you close the IDE while pressing the CTRL key.
• Shows waiting cursor while loading designtime package

Support IDE

• C++ Builder 5,6
• Delphi 5, 6, 7
• Borland Delphi Studio 2005, 2006
• CodeGear RAD Studio 2007 (December Update)

Screenshot Plugin yang terinstall di myLaptop ( Delphi 7 )

StartUP IDE

Add Menu

Tertarik ?? Info lebih detil / download disini

GExperts (Programming Tools for Delphi & C++ Builder)

Jika anda sudah membaca posting sebelumnya ( MustBe Installed on MyLaptop ), terdapat informasi mengenai Tools Develop, salah satunya yaitu GExperts.


Sesuai dengan judulnya, Tool GExperts memang sangat berguna bagi programmer delphi & C++ builder.

Why ? karena GExperts akan menambahkan fitur-fitur yang menarik di IDE Delphi & C++ builder.






Fitur2nya yaitu: (yg sering saya manfaatkan)

• Procedure list, bermanfaat untuk menampilkan daftar procedure/function di source
• Clipboard History, bermanfaat untuk menampilkan histori dari perintah CP (Copy-Paste)
• Clean directory, bermanfaat untuk membersihkan(hapus) file2 temporary dari project source
• source export, bermanfaat untuk export source ke format HTML, RTF (kebutuhan dokumentasi)
• Macro templates, bermanfaat untuk generate comment procedure/function, Units, dsb
• dan fitur-fitur menarik lainnya yang dapat anda explore sendiri.

tertarik? klik disini utk download