Optimisasi dbGrid III

"Just Sharing Knowledge on the web"

 Melanjutkan Optimisasi dbGrid dari artikel sebelumnya,sekarang kita lanjutkan Optimisasi dbGrid nya,yaitu menampilkan data bertipe Memo dan mengedit nya secara Popup.
screenshoot nya sperti gambar di atas.
kita langsung aja deh ke codingnya,cape abis pulang kuliah mna gk ada yg ngurus lagi.

Seperti biasa saya asumsikan anda mempunyai sebuah tabel dengan salah satu fieldnya bertipe memo.

Menampilkan data field bertipe memo
Secara default jika kita memiliki sebuah field bertipe memo maka field tersebut hanya akan bertuliskan "MEMO" di dbGrid,untuk menampilkan bukanlah hal yang sulit,kita hanya menuliskan 1 baris code pada event OnGetText pada fieldnya.untuk memperjelas berikut screen shootnya:

lalu ketikan code berikut:




procedure Tdm.QBukuDeskripsiGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
text:=copy(qbuku.fieldbyname('Deskripsi').asstring,1,30);
end;

gampangkan?hanya dengan fungsi copy sekarang field bertipe memo sudah tampil di dbGrid.
lalu bagaimana untukmengeditnya secara Popup(itu lho jendela yang muncul keluar),jawabannya adalah mudah.yang diperlukan adalah sebuah Form untuk melakukan pengeditan,tambahkan saja di dalam Form itu sebuah Memo,Panel dan button kurang lebih seperti screeen shoot di atas.jangan lupa untuk merubahnya Formnya menjadi Available Form di Project Options. pada event onDblClick di dbGrid tambahkan code berikut:

procedure TForm2.DBGrid1DblClick(Sender: TObject);
begin
if dbgrid1.SelectedField=dm.QBuku.FieldByName('Deskripsi') then
With TForm7.Create(nil) do
try
memo1.Text:=dm.QBuku.fieldbyname('Deskripsi').AsString;
Showmodal;
dm.QBuku.Edit;
dm.QBuku.FieldByName('Deskripsi').AsString:=memo1.Text;
Finally Form7.Free; end;
end;

*Form7 adalah Form yang dibuat tadi.
saya rasa tidak perlu ditambahkan commentar pada code nya karena sangat mudah dipahami ya kan?.
pada componenet memo di Form7 yang kita buat tadi ,pada saat user menekan enter maka component memo yang akan pindah baris,bukannya ter update dan keluar dari form edit(dlm hal ini form7) tadi.untuk itu kita akan menambahkan event onKeyDown pada TMemo yang berada di Form edit tadi,berikut potongan codenya:
procedure TForm7.Memo1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=VK_RETURN then button1click(Button1);//jika key enter ditekan maka procedure button1click akan di execute
end;

Gampangkan,tentu saja procedure buttonclick itu adalah Close;.
yups sekarang anda telah mempunyai sebuah dbGrid yang hampir optimal,dan tentu saja user akan lebih "betah" memakai aplikasi anda.

Semoga Bermanfaat,Keep spirit and keep sharing

Readmore »»  “Optimisasi dbGrid III”

Sejarah nama Facebook dan bahasa Sunda

"Just Sharing Knowledge on the web"
Siapa sih yang tidak tahu Mark Zuckerberg. Yaa! dia adalah penemu sekaligus pembuat Facebook.com salah satu jejaring sosial yang dimiati banyak orang. Saat ini pun ia di nobatkan sebagai pemuda terkaya di dunia. Tapi tahukah anda kenapa si Mark ini menamakan site jejaring sosialnya dengan nama facebook.

Kita memang sering menggunakan facebook. Tapi gak pernah tahu facebook itu berasal dari mana. Kalau mau tahu, begini nih ceritanya.

Pada suatu hari Mark jalan-jalan ke Bandung. Dia berniat ke ITB tuk studi banding. Tapi sayangnya, ini perjalanannya yang pertama kali ke sana. Otomatis si mark ini bakalan kesasar.

Maklum waktu itu si mark belom sekaya saat ini. Namanya juga masih mahasiswa. Terus, di tengah kebingungannya menuju ITB, akhirnya ia mencoba bertanya-tanya dengan salah seorang tukang es cendol.

Karena stylenya tampang mahasiswa dan terpelajar, si mark pun berlagak kebingungan. Dia basa-basi beli es cendol tuh abang. "Bang, es cendolnya satu dong".

Nah, sembari menikmati es cendol, si mark pun iseng nanya si abang cendol,"bang tahu gak bang, kalo es cendol abang nih seger dan enak banget."

si abang pun tersenyum dan langsung bales,"ah, si ujang bisa ajah mujinya". Trus si mark bales lagi,"tahu gak bang, kalo abang jualan es cendolnya di ITB bakalan laku keras tuh bang."

Si abang bingung, karena perkataan si Mark tersebut. Mark pun kaget, khawatir salah bicara. Lalu Mark pun minta maaf seraya berkata, " bang, kenapa ada yang salah yah?".

Abang pun menjawab,"ah, si ujang gimana sih, saya kan sejak dolo sampe sekarang emang jualannya di depan pintu gerbang ITB."

Dengan wajah malu si mark ngomong,"ah, yang bener bang. Buktinya apa?".

Si abang negesin,"Ah, si ujang bagimana seh, emangnya gak liat itu ada patung Ganesha (lambang ITB). MUKA BUKU (buka buku--bahasa sunda--) atuh, jaang. Tong malongo wae (jangan bengong ajeh)". si mark (GUBRRAKK!!).

setelah jatuh, mulai saat itu. kata yang terngiang di kepalanya cuman "MUKA BUKU". Sampai pada akhirnya si mark kembali ke negeri asalnya. Setelah selesai membuat site jejaringnya ia pun ingin menamakannya.

Dan tetap, pada waktu itu kata yang terngiang masih "MUKA BUKU", yang filosofinya, kalo ingin tahu sesuatu apapun yah harus buka buku, karena buku itu sumber ilmu dan perlu dibaca dan diketahui isinya.

Namun sayangnya kata "MUKA BUKU" terlalu sundanese banget. Pikir si mark,"ah, gue kan orang bule. Jadi gak ada salahnya kata "MUKA BUKU" gue translit jadi "FACEBOOK".
(sumber http://ketawa.com)

Readmore »»  “Sejarah nama Facebook dan bahasa Sunda”

Tipe Manusia dari Statusnya di Pesbuk

"Just Sharing Knowledge on the web"
1. Manusia Super Update
Kapanpun dan di manapun selalu update status. Statusnya tidak terlalu panjang tapi terlihat bikin risih, karena hal-hal yang tidak terlalu penting juga dipublikasikan.
Contoh : "Lagi makan di restoran A..", "Dalam perjalanan menujuneraka..", "Saatnya baca koran..", dan sebagainya.

2. Manusia Melankolis
Biasanya selalu curhat di status. Entah karena ingin banyak diberi komentar dari teman-temannya atau hanya sekedar menuangkan unek-uneknya ke facebook. Biasanya orang tipe ini menceritakan kisahnya dan terkadang menanyakan solusi yang terbaik kepada yang lain.
Contoh : "Kamu sakitin aku..lebih baik aku cari yang lain..", "Cuma kamu yang terbaik buat aku..terima kasih kamu sudah sayang ama aku selama ini..".

3. Manusia Tukang Ngeluh
Pagi, siang, malem, semuanya selalu ada aja yang dikeluhkan.
Contoh : " Jakarta maceeet..!! Panas pula..", "Aaaargh ujan, padahal baru nyuci mobil..sialan. .!!", "Males ngapa2in.. cape hati gara2 si do' i..", dsb.

4. Manusia Sombong
Mungkin beberapa dari mereka ga berniat menyombongkan diri, tapi terkadang orang yang melihatnya, yang notabene tidak bisa seberuntung dia, merasa kalo statusnya itu kelewat sombong, dan malah bikin sebel.
Contoh : "Otw ke Paris ..!!", "BMW ku sayang, saatnya kamu mandi..aku mandiin ya sayang..", "Duh, murah-murah banget belanja di Singapur, bow,"

5. Manusia Puitis
Dari judulnya udah jelas. Status nya selalu diisi dengan kata-kata mutiara, tapi ga jelas apa maksudnya. Bikin kita terharu? Bikin kita sadar atas pesan tersembunyinya? atau cuma sekedar memancing komentar? Sampai saat ini, tipe orang seperti ini masih dipertanyakan.
Contoh : "Kita masing-masing adalah malaikat bersayap satu. Dan hanya bisa terbang bila saling berpelukan", "Mencintai dan dicintai adalah seperti merasakan sinar matahari dari kedua sisi", "Jika kau hidup sampai seratus tahun, aku ingin hidup seratus tahun kurang sehari, agar aku tidak pernah hidup tanpamu".

6. Manusia in English
Tipe manusianya bisa seperti apa saja, apakah melankolis, puitis, sombong dan sebagainya. Tapi dia berusaha lebih keren dengan mengatakannya dalam bahasa Inggwis gicyu Low..
Contoh : "Tie and Chair..", "I can tooth, you Pink sun.." dsb..

7. Manusia Lebay
Updatenya selalu bertema 'gaul' dengan menggunakan bahasa dewa.. ejaan yang dilebaykan..
Contoh.." met moulnin all.. pagiiieh yg cewrah... xixiixi" << lol~

8. Manusia Terobsesi
Mengharap tapi ga kesampaian.. pengen jd artis ga dapat-dapat.
Contoh : "duwh... sesi pemotretan lagi! cape..."

9. Manusia Sok Tau
Sotoy tenarnya. Padahal dia sendiri tidak tahu apa yang ditulisnya.
Contoh : "Pemerintah selalu memanjakan rakyatnya.. bla..bla...bla,"

10. Bioskop Mania
Update film yang abis ditonton dan kasih comment..
Contoh : "ICE AGE 3..Recomended! !", "Transformers 2 mantab euy.."

11. Manusia pedagang
Contoh: "jual sepatu bla bla bla"

12. Manusia penyuluh masyarakat
Contoh: "jangan lupa dateng ke TPS, 5 menit utk 5 tahun bla..bla"

13. Manusia Alay
Ada berbagai macam versi, dari tulisannya yang aneh, atau tulisannya biasa aja, hanya saja kosakata nya ga lazim seperti bahasa alien.
Contoh:Alay 1 : "DucH Gw4 5aYan9 b6t s4ma Lo..7aNgaN tin69aL!n akYu ya B3!bh..!!"
Alay 2 : "km mugh kog gag pernach ngabwarin aq lagee seech? kmuw maseeh saiangs sama aq gag seech sebenernywa? "
Alay 3 : "Ouh mY 9oD..!! kYknY4w c gW k3ReNz 48ee5h d3ch..!!"(Khusus buat tipe ini, ga usah di baca juga gpp..saya pribadi juga mikirdulu buat nulis ini, walaupun jadinya kurang mirip sama yg aslinya..)

14. Tipe Hidden Message
Tipe ini biasanya tidak to the point, tapi tentunya punya niat biar orang yg dituju membaca nya. (bagus kalo baca..kalo ngga? kelamaan nunggu) padahal kan bisa langsung aja sms ya..
Contoh : "For you my M***, I can' t live without you..you are my bla bla bla..","Heh, cewe bajingan..ngapain lo deket2in co gw?! kyk ga laku aja lo.." (padahal ce tersebut tidak ada dalam jaringannya. . mana bisa baca...:p)

15. Tipe Misterius
Tipe yang biasanya bikin banyak orang bertanya tanya atas apa maksud dari status orang tersebut..Biasanya dalam suatu kalimat membutuhkanSubjek + Predikat + Objek + Keterangan. Tapi orang tipe ini mungkinhanya mengambil beberapa atau malah hanya 1 saja..Dan pastinyamengundang kontroversi.
Contoh : "Sudahlah.." , "Telah berakhir.." (apanya??),"Termenung.. ." (so what gitu, loh)

Kalian ngikut yang mana???
(sumber http://ketawa.com)

Readmore »»  “Tipe Manusia dari Statusnya di Pesbuk”

Mengurutkan Field saat mengklik Title pada dbGrid (Optimisasi DBGrid I)

Akhirnya update Update Blog juga dan ada sedikit kemajuan pada project perpus versi 2,maklum kemaren-kemaren lagi exists jadi chater .
pada Tutorial delphi kali ini kita akan mencoba mengoptimalkan component dbGrid Standart menjadi lebih mantab

Tidak diragukan lagi bahwa DBGrid adalah component yang sangat berguna dalam pengembangan suatu aplikasi khususnya aplikasi yang
berhubungan dengan database. Hanya saja component dbGrid di delphi khususnya ver 7.0(jadul ya) belum optimal,tapi mendinglah dari pada VB

kalo untuk delphi versi selanjutnya gak tau ya belum beli sih. untuk itulah kita akan sama-sama mengoptimalkan component yang keren ini.
Jika pada artikel sebelumnya ada mengedit data secara lookup, nah untuk yang berikutnya kita maju ke Mengurutkan Field pada title dbGrid.

gimana klo kita langsung ke step bye step nya dari pada nanti muntah baca basa-basi gak jelas dari saya. Coba perhatikan contoh di atas
, jika user mengKlik bagian title dari dbGrid maka data akan ter sortir mantab kan (caranya gimna jar??). pingin tau caranya??Rokok dulu sini tapi berhubung saya baik hati dan tidak sombong saya akan share gimana caranya,cukup klik dan terusin bacannya.

Agar lebih singkat saya asumsikan anda mempunyai sebuah tabel Member dari suatu database.okeh kita langsung ke coding ajasoalnya rada ngantuk nih:

• klik pada dbGrid masuk ke event OnMouseMove,ketikan Code berikut: 
• procedure TForm3.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
  Var
  pt:TGridCoord; //point (xy dari dbGrid,,coba tekan ctrl arahkan cursor ke TGridcord di delphi code editor anda,)
  begin
  pt:=dbGrid1.MouseCoord(x,y);
  if pt.Y=0 then //y=0 berarti posisi point 0(paling atas dr dbgrid)
  dbgrid1.Cursor:=crHandPoint
  else
  dbgrid1.Cursor:=crDefault;
  end;
  
• selanjutnya masih pada dbGrid kita masuk ke event OnTitleClick,ketikan code berikut:
  procedure TForm3.DBGrid1TitleClick(Column: TColumn);
  {$J+} //mengaktifkan compiler directive J+
  const PreviousColumnIndex : integer = -1;
  {$J-} //menonaktifkan kembali J-
  begin
  if DBGrid1.DataSource.DataSet is TCustomADODataSet then
  with TCustomADODataSet(DBGrid1.DataSource.DataSet) do
  begin
  try
  DBGrid1.Columns[PreviousColumnIndex].title.Font.Style :=
  DBGrid1.Columns[PreviousColumnIndex].title.Font.Style - [fsBold];
  except
  end; Column.title.Font.Style :=
  Column.title.Font.Style + [fsBold];
  PreviousColumnIndex := Column.Index; if (Pos(Column.Field.FieldName, Sort) = 1)
  and (Pos(' DESC', Sort)= 0) then
  Sort := Column.Field.FieldName + ' DESC'
  else
  Sort := Column.Field.FieldName + ' ASC';
  end;

Wooooiiiiii....... kenapa pada bengong udah segitu doank,gampangkan! untuk lebih mengetahui tentang compiler directive coba liat di Help nya delphi atau maen-maen ke http://delphi.about.com ,untuk optimisasi dbGrid selanjutnya kita akan bahas menampilkan dan mengedit secara popup field yang bertipe Memo..so tunggu aja ya??kalo nanti lupa alamat blog ini langsung aja sekarang berlangganan atau bookmark ke browser anda oke. udah ah ngantuk pingin bobo, untuk rokoknya bisa langsung dikirim ke rumah saya SEMOGA BERMANFAAT! TETEP SEMANGAT NGORONG eh NGODING .

Readmore »»  “Mengurutkan Field saat mengklik Title pada dbGrid (Optimisasi DBGrid I)”

Interopeksi diri akan musibah di negri ini

 “Gempa di Padang jam 17.16, gempa susulan 17.58, esoknya gempa di Jambi jam 8.52. Coba lihat Al-Qur’an!”
 

17.16 (QS. Al Israa’ ayat 16): “Dan jika Kami hendak membinasakan suatu negeri, maka Kami perintahkan kepada orang-orang yang hidup mewah di negeri itu (supaya mentaati Allah) tetapi mereka melakukan kedurhakaan dalam negeri itu, maka sudah sepantasnya berlaku terhadapnya perkataan (ketentuan Kami), kemudian Kami hancurkan negeri itu sehancur-hancurnya.”

17.58 (QS. Al Israa’ ayat 58): “Tak ada suatu negeri pun (yang durhaka penduduknya), melainkan Kami membinasakannya sebelum hari kiamat atau Kami azab (penduduknya) dengan azab yang sangat keras. Yang demikian itu telah tertulis di dalam kitab (Lauh Mahfuz).”

8.52 (QS. Al Anfaal: 52): (Keadaan mereka) serupa dengan keadaan Fir’aun dan pengikut-pengikutnya serta orang-orang sebelumnya. Mereka mengingkari ayat-ayat Allah, maka Allah menyiksa mereka disebabkan disebabkan dosa-dosanya. Sesungguhnya Allah Maha Kuat lagi Amat Keras siksaan-Nya.”

8.52(8=Ayat,52=No Surat)

Setelah melihat gambar dan Potongan-ayat di atas,apakah kita akan tetap berjalan dengan congkak di atas bumi ini?akankah kita masih tidak mensyukuri nikmat dari Allah S.W.T?Akankah kita tetap tidak menyadari akan Kebesaran nya?
Ujian,Cobaan,atau Adzab dari Allah semua bencana ini?bencana yang terus bertubi-tubi semenjak bencana besar di Nangroe Aceh darusallam,Gempa Jogja,Lumpur Lapindo di Sidoarja,hingga sekarang Gempa di Padang dan Jambi?mudah-mudahan saja ini bukanlah adzab melainkan hanya teguran untuk menyadarkan kita akan kehilafan dan dosa-dosa kita.

Readmore »»  “Interopeksi diri akan musibah di negri ini”

Mengedit Data secara Lookup dari dbGrid

Mungkin Pengunjung udah pada sebel dan enek karena akhir-akhir ini Postingan di fajardelphiscript gak ada Tutorial atau Tips and Trick Delphi nya??Im Sory Para Delphier cz saya akhir-akhir ini rada sibuk,jadi malez bikin tips trick delphi

Okeh untuk Tips and Trick Delphi kali ini saya mau share bagaimana Mengedit Data secara Lookup dari dbGrid.ngerti gak masudnya?yang gak ngerti jongkok aja yah?
biar mudeng/ngerti berikut screen shootnya:

keren gak??pake skin tuh..modelnya cantiik lagi,
Form ini dalah screen shoot dari Form Data Member dari dayPerpus 2.0 ..so tunggu yah...

dengan cara ini pengeditan bisa langsung diipilih pada dbGrid..bisasanya sih orang-orang kalo mau ngedit suka nambahin Form baru..halah klo saya males,
untuk isi dari dropdown itu sendiri kita akan me retrieve dari tabel lain...pengen tau gimana caranya???
klik dan terusin bacanya...

Oke,di asumsikan anda mempunyai Tabel Member dan Tabel Kelas.untuk mengambil data dari tabel kelas dan memasukannya ke dbGrid data Member berikut adalah Penjelasannya...:

pada Properties Column di komponent dbGrid ada yang namanya properties PickList yang bertipe Strings.
prinsipnya kita akan memasukan field Kelas dari Tabel kelas ke Column 3 dari dbGrid,,sebelumnya kita buat Procedure PickList dulu pada Klausa Private (terus jar?) terus Codingnya begini nih:


procedure TForm3.Picklist;
var
i:Word;
begin
//memastikan pointer tabel kelas berada di record pertama
dm1.QKelas.First; 
//pengulangan or Looping untuk memasukan record2 dari field kelas ke dbGrid colomn ke 3
for i:=0 to dm1.QKelas.RecordCount-1 do begin
dbgrid1.Columns[3].PickList.add(dm1.QKelas.fieldbyname('Kelas').
AsString);
dm1.QKelas.Next;
end;//end looping
end;
end.

Procedure Picklist kita taruh di Event FormShow ya....udah ah..gampang banget kan?
ya iyalah gampang kalo yang susah saya gak bisa,

terima kasih..Semoga bermanfaat
"TETAP SEMANGAT NGODING YAH!!!"

Readmore »»  “Mengedit Data secara Lookup dari dbGrid”

Beberapa kutipan dari Forum delphi-id

hmmm..dari siang ampe maghrib saya ngerjain project yang hampir jadi,abis maghrib sampai Isha sekedar melepas "puyeng" dari coding

chating2 sama temen..sempet kepikiran juga pingin update blog ah..tpi bikin tutorial gak ada ide..mikir2 jadi inget beberapa hari yang lalu maen2 ke delphi-id nemu2 tulisan2 para empu disana yang menarik dan kocak

.mau tau apa itu???Klik dan terusin bacanya....

Maaf kalo saya tidak mencantumkan siapa dari siapa saya mengutip,he..soalnya lupa...mudah2an bisa membangkitkan semangat kitabelajar delphi,atau paling enggak sekedar cengar-cengir aja kaya kuda

"Programmer Professioanl itu berawal dari belajar try and error, design sendiri (kecuali yang kerja di software house) ... running sendiri sampai terkadang input sendiri untuk memastikan progamnya jalan ..."

[Pertanyaan]

"kenapa yach tiap aq mengGoogle tutorial delphi yg ad contoh aplikasi+sourceny scara penuh kok g ad?
misal aplikasi transaksi penjualan, aplikasi POS
slama ini yang q tmui hanya n bisa didownload tanpa tetekbengek registrasi or bayar cm versi VB ny...
knp yach yang delphi kok g ad?
mohon pencerahanny n kalo ad linkny jg gpp"

[sampe kebaawah tuh jawabannya]
"orang pintar jumlahnya lebih sedikit daripada orang b**o, wajar klo delphi lebih dikit dari vb. gw dulu waktu msh kuliah pake vb juga waktu masih b**o. Laughing"

"wawhahaha bisa ajah. konklusinya orang vb lebih b**o dari orang delphi?
Mr. Green"

"analoginya mungkin gini:

source code diibaratkan istri atau ladang penghasilan yg harus anda protect sebaik2nya. kalo ada orang mau minta lu pasti gak kasih bukan karena lu pelit, tapi bisa dipastikan yg minta adalah orang goblok.

kita bicara soal investasi yg tidak murah, banyak efforts disitu... baik materil & non-materil."

"kembali lagi kepada seberapa berharganya "sesuatu" itu utk diberikan secara cuma-cuma...
source POS VB mungkin berserakan & diberikan cuma2 ya karena ngga' akan bisa di enhance lebih baik. paling2 ya mentok gitu2 aja namanya jg pake VB, orang jg mulai meninggalkannya, mau ngenhance malez... artinya source tsb sudah tidak lagi memiliki arti lagi. di obral aja belum tentu orang mau Laughing"


"Menurut aku, orang Delphi bukannya pelit, tapi Delphi itu sebuah program yang sangat luas implementasinya, dan dengan mudahnya mengunakan UDF ( User Define Function)."

"Jadi menurutku benar untuk forum ini, bila orang bertanya bukan diberi Source Code, tapi sepenggal Codenya, karena dengan demikian orang Indonesia jadi lebih pinter2, lha klo kita hanya dapat mentahan Source Code? kita makin dibuat B**0 dong..!"

"Dengan memberi Sepenggal Code Delphi, memungkinkan kita bisa lebih bervariasi antara programmer 1 dengan programmer lainnya."

"Sebagai Contoh: Aku pernah bekerja di Sebuah Perusahaan Pembuat Program, disana ada 10 orang, tapi anehnya, walau udah diberikan Source Code dan tinggal melanjutkan kerjaan temannya aja harus mendalami alur kerjanya butuh waktu sangat lama! Kenapa? karena cara implementasi program di Delphi sangat luas dan cara penulisan dari masing-masing orang itu berbeda2, dan dari sana, kami klo ada kendala bukan diberikan Source Code tapi justru diberikan alur sepenggal code kayak di Forum ini, nah, implementasinya serahkan pada programmernya!"

pada setuju gak nih??apa lagi sama kutipan ini "orang pintar jumlahnya lebih sedikit daripada orang b**o, wajar klo delphi lebih dikit dari vb. gw dulu waktu msh kuliah pake vb juga waktu masih b**o. Laughing"

silahkan jika mungkin sebagian/seluruh pembaca tidak berkenan dengan tulisan di posting ini..he...caci maki saja diriku (Label na ge "Iseng",he.. Sunda Mode : ON)
untuk selengkapnya anda bisa lihat disini.

Readmore »»  “Beberapa kutipan dari Forum delphi-id”