Contoh lebih jelasnya begini, saya mau membuat treeview manufacture = procedure TForm1.FormCreate(Sender: TObject); var teks1, teks2, teks3,teks4,teks5 : string ; begin teks1 := 'Kode' ; teks2 := 'Nama Barang' ; teks3 := 'TV' ; teks4 := 'Mono' ; teks5 := 'Warna' ; TreeView1.Items.Clear ; troot := TreeView1.Items.Add(nil,teks1+teks2) ; // tree rootnya adalah menampilkan kode dan nama barangnya
// tetapi hasilnya nanti pasti akan begini = kodenamabarang ..... // nah yang saya inginkan adalah = kode nama barang // Contoh = 01 Televisi 000100 Radio tfgs := TreeView1.Items.AddChild(troot,teks3) ; tasy1 := TreeView1.Items.AddChild(tfgs,teks4) ; tasy1 := TreeView1.Items.AddChild(tfgs,teks5) ; end; end. terima kasih atas pencerahannya .... ------------------------ Yahoo! Groups Sponsor ---------------------~--> Upgrade to 128-Bit SSL Security! http://us.click.yahoo.com/p7cEmB/s7qGAA/yigFAA/i7folB/TM ---------------------------------------------------------------------~-> Berlangganan: [EMAIL PROTECTED] Stop Berlangganan: [EMAIL PROTECTED] Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
