Format Ribuan di MySQL

SELECT REPLACE(REPLACE(REPLACE(FORMAT(pendapatan, 2), ".", "@"), ",", "."), "@", ",") as pendapatan FROM tgaji_rinci

Gambar hasil query di atas

Komponen ZQuery Jadi-jadian di Delphi

var Qf:TZQuery;
begin
  try
    Qf:=TZQuery.Create(nil);
    Qf.Connection:=ZConnection1;

    Qf.Close;
    Qf.SQL.Text:='';
    Qf.ExecSQL;
  except

    // do nothing
  end;
end;

Kabogoh Selingkuh

"jodoh mah geus aya anu ngatur,nyantai we ah kabogoh rek selingkuh oge bebas jeung uing mah.
NU PENTING MAH NEGARA GEUS MERDEKA!!! "
https://www.facebook.com/profile.php?id=100000141919120

String replace (menggati teks) di delphi

Dapet ilmu baru nih dari oboz tempat gw kerja (+ kuliah gratis klo menurut gw ^__^ ) tentang string replace (ganti kata). Klo gw sih pake ni koding buat ngeganti pesan/message ucapan slamat ulang tahun ke anggota/member otomatis dari software administrasi gw. (buat para master, , , suuuttt, kasih masukannya ya ^____^ )

Skenarionya gini guys, misal gw punya format smsnya

"Selamat ulang tahun <nama> yang ke <umur>.

Balabalabala balabalabala balalalbalblalbala..." (jadi laper dah gw, inget tadi sarapan cuman sama bala-bala ajja. heu)

Posting Pertama

Bagi gw, ga ada alesan lain yang ada di otak buat bikin blog ni selain "...boga..." (basa sunda: punya).

"Boga" facebook ? Boga.

"Boga" friendster ? Boga.

"Boga" twitter ? Boga.