Steganography Dengan Metode EOF

May 18th, 2012 No comments

4 tahun lalu, saya menulis tentang steganografi dengan metode LSB (Least Siginifcant Bit), yaitu teknik manipulasi bit-bit terakhir piksel warna pada gambar (bitmap) untuk menyembunyikan data. Yang jadi soal, bila data yang akan disisipkan ukurannya besar, sehingga gambar asli tidak dapat menampungnya. Karena soal inilah, dan banyaknya pertanyaan serta pencarian di google, saya akan menulis tentang metode steganografi yang lain: Metode EOF (End Of File).

Steganografi dengan metode EOF (End Of File) memiliki beberapa kelebihan:

Read more…

 

Desain Jaket Komunitas Penggemar Pemrograman Delphi Indonesia

May 14th, 2012 No comments

Setelah mendapatkan logo resmi Komunitas Penggemar Pemrograman Delphi Indonesia hasil vote member, kini Komunitas Penggemar Pemrograman Delphi Indonesia akan membuat jaket.

Usulan desain jaket sebanyak 7 buah sudah dikumpulkan dan siap di-vote (kayak pilkada) sesuai kesukaan member KPPDI.

Kriteria desain jaket

Ketentuan-Ketentuan

Selamat berkarya dan sukses selalu buat Delphier Indonesia!

(Maaf, Admin lagi sibuk ngurusin Asian-Sweety.com)

 

E-Book Gratis Pengenalan & Dasar-Dasar Pemrograman Delphi

May 10th, 2012 No comments

E-Book pengenalan dan dasar-dasar pemrogramana Delphi gratis berbahasa Indonesia. Cocok untuk mahasiswa yang sedang mempelajari Delphi atau siapa saja yang ingin memprogram dengan Delphi.

Silahkan download E-Book Gratis Pengenalan & Dasar-Dasar Pemrograman Delphi.

 

Mengganti Warna Baris Di DBGrid

May 9th, 2012 No comments

Karena banyak yang bertanya, “Bagaimana mewarnai baris/cell dalam TDBgrid standar bawaan Delphi sesuai nilai tertentu?”, saya posting di sini saja biar yang lain gak repot mencarinya.

Caranya mudah. Klik DBGrid yang akan diberi warna, kemudian lihat event OnDrawColumnCell.

Klik ganda pada event tersebut dan masukkan kode sehingga menjadi seperti berikut:


procedure TForm3.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
 DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
 if TDBGrid(Sender).DataSource.DataSet.FieldByName('jumlah_r').AsFloat > 50000000 then
 //if Column.FieldName = 'jumlah_r' then
 TDBGrid(sender).Canvas.Brush.Color := clRed;
 TDBGrid(sender).DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

Kode ini akan mewarnai baris pada DBGrid menjadi berwarna merah bila field “jumlah_r” bernilai lebih dari 50.000.000. Dan hasilnya seperti pada gambar di atas.

Bila ingin hanya kolom tertentu saja yang diberi warna, dalam contoh ini adalah kolom “jumlah_r”, silahkan hilangkan tanda komentar (//) di depan baris


//if Column.FieldName = 'jumlah_r' then

Sehingga kodenya menjadi:


procedure TForm3.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if TDBGrid(Sender).DataSource.DataSet.FieldByName('jumlah_r').AsFloat > 50000000 then
if Column.FieldName = 'jumlah_r' then
TDBGrid(sender).Canvas.Brush.Color := clRed;
TDBGrid(sender).DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

Hasilnya:

 

Desain Logo Komunitas Penggemar Pemrograman Delphi Indonesia

May 5th, 2012 No comments

Terimakasih atas partisipasi Anda dalam pemilihan ini. Berikut daftar logo yang akan dipilih. Logo dengan  vote terbanyak akan digunakan sebagai logo resmi Komunitas Penggemar Pemrograman Delphi Indonesia.

Pemilik desain logo yang terpilih berhak mendapatkan sebuah blog dengan nama domain (www.nama-domain.com) hosting di Blogger.com.

Silahkan dipilih yang paling mewakili kriteria berikut:

Logo Terbaik Untuk KPPDI

  • 001 By Arief Sofiyan (0%, 0 Votes)
  • 002 By Arief Sofiyan (1%, 1 Votes)
  • 003 By Endra Wijaya (23%, 32 Votes)
  • 004 By Arief Sofiyan (0%, 0 Votes)
  • 005 By Arief Sofiyan (0%, 0 Votes)
  • 006 By Arief Sofiyan (0%, 0 Votes)
  • 007 By Indra Reap (1%, 2 Votes)
  • 008 By Indra Reap (0%, 0 Votes)
  • 009 By Sandhi Satriya (4%, 5 Votes)
  • 010 By Endra Wijaya (4%, 5 Votes)
  • 011 By Endra Wijaya (2%, 3 Votes)
  • 012 By Sandhi Satriya (26%, 37 Votes)
  • 013 By Sandhi Satriya (2%, 3 Votes)
  • 014 By Sandhi Satriya (0%, 0 Votes)
  • 015 By Arief Sofiyan (4%, 6 Votes)
  • 016 By Arief Sofiyan (23%, 33 Votes)
  • 017 By Indra Reap (11%, 15 Votes)
  • 018 By Emboet RojoeNingrat (0%, 0 Votes)

Total Voters: 142

Loading ... Loading ...

Ketentuan-Ketentuan

Logo terpilih akan diumumkan di Komunitas Penggemar Pemrograman Delphi Indonesia.

Selamat berkarya dan sukses selalu buat Delphier Indonesia!

(Maaf, Admin lagi sibuk ngurusin Asian-Sweety.com)



Related Posts Plugin for WordPress, Blogger...