<?xml version="1.0" encoding="ISO-8859-1"?>
<?xml-stylesheet type="text/xsl" media="screen" href="/~d/styles/rss2full.xsl"?><?xml-stylesheet type="text/css" media="screen" href="http://feed.kioss.com/~d/styles/itemcontent.css"?><!DOCTYPE rss PUBLIC "-//Netscape Communications//DTD RSS 0.91//EN" "http://my.netscape.com/publish/formats/rss-0.91.dtd">
<rss xmlns:feedburner="http://rssnamespace.org/feedburner/ext/1.0" version="0.91">

<channel>
<title>Delphi Indonesia Forums</title>
<link>http://delphi-id.org/dpr/PNphpBB2.html</link>
<description>Forum Topics</description>
<atom10:link xmlns:atom10="http://www.w3.org/2005/Atom" rel="self" href="http://feed.kioss.com/delphi" type="application/rss+xml" /><item>
<title>Virtual Office Delphi-ID (30)</title>
<link>http://feed.kioss.com/~r/delphi/~3/8YoHb7SEYt0/PNphpBB2-viewtopic-t-6654.pas</link>
<description>sepertina agak kurang setuju dengan @DE apa saya nya yang blm sampe ilmu na hee.. bukan kan MVC, MVP ato Modular itu ujung2na akan ke Framework juga yach ???? ada contoh dari milis tetangga hee.. klo ini termasuk apa yach : 
http://log.web.id/video/ecf_demo.html
MVC, MVP, Modular itu masuk golongan pattern, bukan framework. Kalo APV beda lagi :mrgreen:
nb: maap @DE klo ada salah2 kata hee.. :d</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6654.pas</feedburner:origLink></item>

<item>
<title>select &amp; filter record di dbgride (10)</title>
<link>http://feed.kioss.com/~r/delphi/~3/DoYYsWDM4yg/PNphpBB2-viewtopic-t-6649.pas</link>
<description>
1.sql text nya:
pilih all dari tabel Debitur + 'Dimana Debitur samadengan    'QuotedStr(ComboBox1.Text)+'Dan Debitur  smadengan'QuotedStr(ComboBox2.Text)
kenapa di SQL TEXT nya ada kondisi tersebut? bukannya itu ntar ditaro di filter?
(kondisi tersebut tidak diperlukan deh kayanya).
2. filter tbl :
filter diisi'Debitur samadengan 'QuotedStr(ComboBox1.Text)+ 'Dan  Debitur = 'QuotedStr(ComboBox2.Text)
kok DAN? bukannya ATAU? (sda jg).
saya ga tau ComboBox1 dan ComboBox2 itu apa, tapi kalo pengondisiannya seperti itu berarti ada kemungkinan...
Debitur = 'abc' dan Debitur = 'jkl'; ga terpenuhi kan, jadi datanya blank.
apa memang diharapkan harus...
ComboBox1 dan ComboBox2 nilainya sama?
klo memang begitu, ya memang datanya kosong yang memenuhi kondisi tersebut. (cukup kerjakan yg soal 1).
CMIIW.</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6649.pas</feedburner:origLink></item>

<item>
<title>Kopi Darat v2 (beta version) - rilis 5-juli-2009 (231)</title>
<link>http://feed.kioss.com/~r/delphi/~3/s3nahA2ZjBQ/PNphpBB2-viewtopic-t-6627.pas</link>
<description>oic.
:mrgreen:</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6627.pas</feedburner:origLink></item>

<item>
<title>Order Jaket Susulan (6)</title>
<link>http://feed.kioss.com/~r/delphi/~3/PCEwow8lCgI/PNphpBB2-viewtopic-t-6658.pas</link>
<description>ikutan......setuju</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6658.pas</feedburner:origLink></item>

<item>
<title>Jaket status (onDelivery Process) (67)</title>
<link>http://feed.kioss.com/~r/delphi/~3/8LgPI3uGrNs/PNphpBB2-viewtopic-t-6650.pas</link>
<description>punyaku dah nyampai tp aku belum nerima apalagi mencobanya xixixixixi.....krn aku masih diluar kota n datangnya jaket yang kutunggu telah datang itu dapat kabar dari orang rumah kwakwakwakwak.....</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6650.pas</feedburner:origLink></item>

<item>
<title>urang bandung urang kumpul Kopi Darat v2 (Bandung version) (101)</title>
<link>http://feed.kioss.com/~r/delphi/~3/cjTMx8Pw_yI/PNphpBB2-viewtopic-t-6633.pas</link>
<description>hadir ....</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6633.pas</feedburner:origLink></item>

<item>
<title>tolong dong gimana cara manggil SP??? (1)</title>
<link>http://feed.kioss.com/~r/delphi/~3/mV1X6uw0OUU/PNphpBB2-viewtopic-t-6661.pas</link>
<description>cara lain ya pake zQuery..
call bla bla bla..</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6661.pas</feedburner:origLink></item>

<item>
<title>membaca 2 database berbeda (1)</title>
<link>http://feed.kioss.com/~r/delphi/~3/GKfVvgpCPmM/PNphpBB2-viewtopic-t-6660.pas</link>
<description>cara efektifnya sih kurang tau, tapi klo cara gradakannya kurang lebih gini kali,
komponen Tabel / Query data PELANGGAN di DOBEL KLIK.
ntar muncul dialog (toolwin ) kecil.
di dialog tersebut KLIK KANAN, trus klik New field...
muncul dialog New Field.
isi kan datanya seperti berikut
Field properties
Name : no_telp // (bebas asal jangan konflik)
Component:     // (biarkan otomatis)
Type : String  // (aja kali ya, disesuaikan)
Size : 18      // (ato secukupnya)
Field type
pilih Lookup, jangan Data ato Calculated
Lookup definition
Key Fields:    // nama field ID Pelanggan di tabel PELANGGAN
Dataset:       // isikan komponen Query / Tabel-nya data TELP_PELANGGAN
Lookup Keys:   // nama field ID Pelanggan di tabel TELP_PELANGGAN
Result Field:  // nama field no.telp di tabel TELP_PELANGGAN
KLIK OK deh...
nah, sekarang no.telp pelanggan udah nyatu di data pelanggan, tinggal ditampilin di grid deh...
CMIIW.</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6660.pas</feedburner:origLink></item>

<item>
<title>jaket - update biaya pengiriman (21)</title>
<link>http://feed.kioss.com/~r/delphi/~3/RZYv7e9Txs8/PNphpBB2-viewtopic-t-6651.pas</link>
<description>@yayaretina
Boss...daku udah transfer  dana sebesar 20.000 di rek bank mandiri via ATM  BNI tgl 03/07/2009 jam 17:39, daku minta maaf atas keterlambatannya.
terimakasih...</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6651.pas</feedburner:origLink></item>

<item>
<title>Video Capture (14)</title>
<link>http://feed.kioss.com/~r/delphi/~3/2IeNi2SaIJ8/PNphpBB2-viewtopic-t-1251.pas</link>
<description>hai, ada yang pernah mencoba kamera CMUcam tidak. bagaimana caranya untuk menampilkan video di delphi.</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-1251.pas</feedburner:origLink></item>

<item>
<title>Tanya Query SQL (9)</title>
<link>http://feed.kioss.com/~r/delphi/~3/PImkpX08ZCE/PNphpBB2-viewtopic-t-6492.pas</link>
<description>lagi search2 seputar Tanya SQL, eh nemu ini...
ternyata sebelumnya udah ada jg yawh...
(siapa tau ada yg nyasar ke sini... ^_^), so, sekalian deh...
pembahasan lanjutan di sini,
http://delphi-id.org/dpr/index.php?name=PNphpBB2&amp;file=viewtopic&amp;t=6637&amp;start=0&amp;postdays=0&amp;postorder=asc&amp;highlight=
pemecahan yg rada rinci sebelah sini,
http://manztiara.wordpress.com/2009/06/30/crosstab-or-whatever-that-said-at-mysql/</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6492.pas</feedburner:origLink></item>

<item>
<title>menampilkan data tabel ke caption komponen Panel (6)</title>
<link>http://feed.kioss.com/~r/delphi/~3/cM5fakLzrTE/PNphpBB2-viewtopic-t-6606.pas</link>
<description>hmm, hmm, hmm...
ada2 saja yawh... ^_^
komponen ListBox nya wajib dihapus apa ga?
klo ga wajib dihapus, ListBoxnya di-set Visible=False ajah.
trus sesuaikan dengan kode berikut.
unit Unit1; // bisa beda nama unit nya
interface
uses // isi uses juga bisa beda
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Menus;
type
XPanel = class(TPanel); // tambahan
TForm1 = class(TForm)
MainMenu1: TMainMenu;
DataGuru1: TMenuItem;
Panel1: TPanel;
ListBox1: TListBox;
// dan lain2...
procedure FormCreate(Sender: TObject);
procedure DataGuru1Click(Sender: TObject);
// dan lain2...
private
{ Private declarations }
protected // tambahan
procedure TeksPanelChange(Sender: TObject); // tambahan
public
{ Public declarations }
end;
var
Form1: TForm1;  
marginKiri, marginAtas: byte; // tambahan
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
// ...
XPanel(Panel1).Canvas.OnChange := TeksPanelChange; // tambahan
marginKiri := 3; // tambahan, angka 3 tinggal disesuaikan ama kebutuhan
marginAtas := 3; // tambahan, angka 3 tinggal disesuaikan ama kebutuhan
end;
procedure TForm1.TeksPanelChange(Sender: TObject);
var k: integer; 
begin
XPanel(Panel1).Canvas.OnChange := nil;
for k := 0 to ListBox1.Items.Count-1 do begin
XPanel(Panel1).Canvas.TextOut(marginKiri,
marginAtas+k*XPanel(Panel1).Canvas.TextHeight('SiKuper85 ^_^'),
ListBox1.Items.Strings);
end;
XPanel(Panel1).Canvas.OnChange := TeksPanelChange;
end;
procedure TForm1.DataGuru1Click(Sender: TObject);
begin
// ...
// disini perintah ngisi ListBox dengan data NIP yg dari tabel.
Panel1.Refresh; // tambahan
end;
// ...
end.
(semoga ga da yg salah ketik, aamiin...)
(wah2, bahaya klo ngasih nama variabel pake huruf i, ^_^)
perhatikan yg ada tanda // tambahan nya.
CMIIW banged.</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6606.pas</feedburner:origLink></item>

<item>
<title>Invalid 'authkey' : when login.. (2)</title>
<link>http://feed.kioss.com/~r/delphi/~3/3vDg9sMnU2o/PNphpBB2-viewtopic-t-6659.pas</link>
<description>@Luri: thx bosss.. utk cache di kompu udah di clear, tp utk proxy blum.. mungkin itu kayaknya, tp klo expired itu apanya ya.. 
insya allah cache di hati tidak, tp klo iya pun itulah manusia, tempat semua kesalahan dan kekurangan, kesempurnaan hanya milik ALLAH..</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6659.pas</feedburner:origLink></item>

<item>
<title>Modify Delphi Standard Component (5)</title>
<link>http://feed.kioss.com/~r/delphi/~3/_zHw_3Z2gXo/PNphpBB2-viewtopic-t-3841.pas</link>
<description>
Ada yg pernah coba gak, modify Delphi Standard COmponent....
ato ada artikel yg bagus buat dibaca mengenai hal tsb...
tujuan modifikasi komponen standar delphi untuk apa dulu, seluas apakah lingkup modifikasi nya? Pelajari pula efek dari modifikasi terhadap aplikasi yang dibangun..
ada beberapa cara melakukan modifikasi, cara tsb antara lain:
- Memodifikasi kode sumber komponen standar (jika tersedia) ... be carefull dengan yang ini.. do unless you know what you're doing!
- Membuat kelas turunan.. (common way)
- Membuat interposer class
- Menggunakan class helper (D2005 and up)
nah, kunci dah tersedia, silahkan di-googling dan di dalami (artikel yang deket2 juga ada kok)... :-)</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-3841.pas</feedburner:origLink></item>

<item>
<title>[Sharing] Apa yang dilakukan klo lagi ga mood ngoding? (29)</title>
<link>http://feed.kioss.com/~r/delphi/~3/f8kW6BgQQJE/PNphpBB2-viewtopic-t-6652.pas</link>
<description>&#xD;@pp1979 :
tidur-tiduran ato godain istri sambil bilang secolek 2000, 2 kali colek 3000, 10 kali colek dapat diskon 5000 Laughing
wakakakkaaaa begitu baca comment di atas gue jadi Mood ngoding kkekekeke</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6652.pas</feedburner:origLink></item>

<item>
<title>look up form biar auto update (5)</title>
<link>http://feed.kioss.com/~r/delphi/~3/8K2INnOPAG8/PNphpBB2-viewtopic-t-6656.pas</link>
<description>
masalah terjadi, ketika semua sudah terpilih dan aku mulai ubah
pilihan dari tingkat atas (misal prop), opsi dibawahnya tidak mau berubah.
kenapa ya?
hmm, opsi dibawahnya tidak mau berubah? emang mau berubah jadi apa yawh...
klo ganti prop, berarti yg dibawahnya mesti kosong kan? ya tinggal dikosongkan aja, ketika OnChange-nya propinsi.
komponennya pake dbLookupComboBox seperti yg dibilang sama mr. haidarfaz kan.
oh ya. database yang dipake adalah mysql.
dan select saya letakkan di event on show.
dmn kriteria select didasarkan pada isian tedit
di form isian alamat.
kriteria select didasarkan alamat...?</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6656.pas</feedburner:origLink></item>

<item>
<title>"Raja Sakti" game online ala Indonesia - 100% Delp (30)</title>
<link>http://feed.kioss.com/~r/delphi/~3/oR7BxIfXyTM/PNphpBB2-viewtopic-t-3898.pas</link>
<description>Hai, om Frank Albert Pangajow, aku waktu SMP pernah beli dan belajar Pascal programming dari bukunya om. :D
Salam kenal :D</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-3898.pas</feedburner:origLink></item>

<item>
<title>rent a coder (4)</title>
<link>http://feed.kioss.com/~r/delphi/~3/BhnvTa5wfNo/PNphpBB2-viewtopic-t-6655.pas</link>
<description>hhmmm....... kayaknya sih...........</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6655.pas</feedburner:origLink></item>

<item>
<title>The Future of Delphi looks brighter than ever before! (11)</title>
<link>http://feed.kioss.com/~r/delphi/~3/ODWXi_uMpRQ/PNphpBB2-viewtopic-t-6657.pas</link>
<description>setubuuuuuuuuhhhhhhh......
memang harus seperti itu.. (apanya yang seperti itu..) :mrgreen:
embarcadero sebentar lagi akan melirik DI untuk mengembangkan project2nya dikawasan Asia Tenggara..
betul begitu @Manz ???
:D</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6657.pas</feedburner:origLink></item>

<item>
<title>Mengirim Sms Lewat Internet Dengan Delphi (8)</title>
<link>http://feed.kioss.com/~r/delphi/~3/twPW7gPPYIs/PNphpBB2-viewtopic-t-6612.pas</link>
<description>contoh Website nya mana ? tanyakan aja ke mereka apa menyediakan semacam API ?</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6612.pas</feedburner:origLink></item>

<item>
<title>Memisahkan file *.exe dengan database MS.Access (15)</title>
<link>http://feed.kioss.com/~r/delphi/~3/TP0FBN8XQqQ/PNphpBB2-viewtopic-t-6644.pas</link>
<description>access masih valuable. kalo gak, masak microsoft masih ngembangin access, sampe gene memang saya kadang bingung sama mic, bukannya db gratisan yang lebih bagus banyak? kok acces masih di kembangin :D &lt;-- maklum gaptek
saya masih gunakan access untuk app yang ga butuh jaringan, untuk pengolahan sementara lah. soale enak kopi paste dari excel / word dan gak perlu setting macem2
tapi herannya, ternyata yang fanatik ma access ada juga. contohnya bambomedia, app nya masih ada yang dkembangin pake access, heran juga. haree gene masih pake access.</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6644.pas</feedburner:origLink></item>

<item>
<title>Code Snippet : ayo bantu ngumpulin... (9)</title>
<link>http://feed.kioss.com/~r/delphi/~3/rZ5jas1aW3M/PNphpBB2-viewtopic-t-405.pas</link>
<description>aq dah gabung juga tuh.........
weleh......... aq jadi bingung nanti mau masuk mana...... dah kebanyakan forum yang aq ikutin sih..... lama jadi terbagi deh........ wakakakakakaka 
nandi ae rek. gimana kabar pt iwaneko nya? kok gak pernah online? websitenya apa neh? he he he</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-405.pas</feedburner:origLink></item>

<item>
<title>[Sharing] Apa yang dilakukan klo lagi ga mood ngoding? (9)</title>
<link>http://feed.kioss.com/~r/delphi/~3/UGQ9eNbTi8s/PNphpBB2-viewtopic-t-6653.pas</link>
<description>Klo buka facebook masuk dalam daftar enggak? wakakakakaakak:-)</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6653.pas</feedburner:origLink></item>

<item>
<title>Update Design Jaket Delphi (All about Jaket Delphi-Id v 1.0) (84)</title>
<link>http://feed.kioss.com/~r/delphi/~3/2yQnwKf0GQo/PNphpBB2-viewtopic-t-6550.pas</link>
<description>Alhamdulillah Jaket sudah keterima dengan baik dan rapih....
Thanks untuk panitia pembuatan jaket delphi-id.org
:) :)
Sukses ya....</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6550.pas</feedburner:origLink></item>

<item>
<title>combo box (11)</title>
<link>http://feed.kioss.com/~r/delphi/~3/5kvaHbXJw-I/PNphpBB2-viewtopic-t-6638.pas</link>
<description>pertanyyan @prie digabung di select &amp; filter record di dbgride</description><feedburner:origLink>http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-6638.pas</feedburner:origLink></item>

</channel>
</rss>
