Arsip: ItemIndex di TComboBox

more 18 years ago
Random
Alur program yang saya buat :
OnShow :
- Jalanin procedure lock form (supaya ga bisa diedit)
- Jalanin procedure Isi form (editbox, combobox, dan semua yang perlu diisi dll)
-> TComboBox1.Text := (ambil nama kota dari table)
Kalo diklik button Edit
- Jalanin procedure Unlock form
- Setfocus ke sebuah editbox
- Add items ke setiap combobox (supaya dalam mode edit, user bisa milih lagi)
Nah masalahnya kalo cuma kayak alur di atas, otomatis pas mode Edit... pilihan combobox-nya itu ke-'reset'. Jadi sebelum user bisa save lagi, harus milih ulang dari combobox. Padahal seharusnya ga seperti itu kan.
Perintah yang saya tahu buat bikin isi combobox di-select adalah :
TComboBox1.ItemIndex := x;
Misalkan comboboxnya itu berguna buat milih/tampilin nama kota. Nah pas dalam mode tampil-nya itu... gimana caranya saya ambil index dari (atau mungkin tepatnya, mengaitkan index dengan) nama kota yang sedang tampil, supaya pas mode Edit-nya itu bisa langsung saya set ItemIndex-nya ?
....Kecuali kalau ada cara men-select isi combobox tanpa memakai index melainkan memakai string... (adakah ?)
Ada saran ?

more 18 years ago
ichan29
memang bisa pake string kan dicomboBox, coba aja pake combobox1.text
misalnya: a yg mau diisi, a:= combobox.text;
mudah2an itu yg dimaksud

more 18 years ago
DelphiExpert
saran @ichan29 bisa digunakan dengan syarat Style:= csDropDown;
guna mengetahui index suatu item (string) gunakan:
Index:= ComboBox1.Items.IndexOf('DataString');

more 18 years ago
ImanD
@Random
coba baca thread ini
http://pascal-id.org/dpr/PNphpBB2-viewtopic-t-1851-highlight-tcombobox.pas
http://pascal-id.org/dpr/PNphpBB2-viewtopic-t-998-highlight-tcombobox.pas
kayaknya pemecahannya seperti ni az deh, semoga bener maksudnya, xixixiixix

more 18 years ago
Random
Udah ketemu pemecahannya (setelah ngebaca reply DE)..
Pas mode tampil kan saya ngisi combobox-nya kayak gini :
cbocity.Text := dtmEmployee.query[qryno].FieldValues['city_name']; -> misalkan hasilnya Jakarta
-> pada saat ini kan isi combobox-nya jadi cuma satu doang. Enabled di-false
Pada mode edit ditambahin perintah :
city := trim(cboCity.Text);
IsiPilihan; -> mulai dari query sampe cboCity.Items.Add...
-> pada saat ini kan yang saya bilang ke-'reset' itu... padahal Jakarta-nya seharusnya ke-select/ke-highlight dong... (karena kita udah tau isinya)
cboCity.ItemIndex := cboCity.Items.IndexOf(city);
-> ini yang saya tanya....
Thanks buat semuanya ^_^

more 18 years ago
Random
Sekarang saya baru sadar sesuatu. Masalah kayaknya baru timbul setelah saya mainin property Style-nya. Dulu selalu pake csDropDown. Dan dulu kalo misalkan di mode editnya, teks cboCity adalah Jakarta, maka ketika saya klik button Edit, Jakarta-nya itu udah langsung ke-select.
Sekarang saya bikin pas mode edit itu Style-nya pake csDropDownList (trus kalo abis disave dibalikin lagi ke csDropDown). Nah, pas klik button Edit itulah tiba-tiba Jakarta-nya ga ke-select lagi. Inilah sebab munculnya pertanyaan di atas.

more 18 years ago
DelphiExpert
hehehe... untunglah udah sadar... habis main dimana mas? jangan2 di bawah pohon beringin ya?
nyebut mas... nyebuuut... but-but... :mrgreen:
--kidding-- & congrat :)

more 18 years ago
ImanD
OOT:
huahhahahahhahah, biasanya CH yg banyak lucunya{katanya sih} sekarang DE lucu juga. kita dirikan SRIMULAT v.delphi-id....
huahhahahahhahah

more 18 years ago
45H0K
boleh juga tuh Srimulat versi delphi
:mrgreen: :mrgreen: :mrgreen: :mrgreen: :mrgreen: :mrgreen: :mrgreen: :mrgreen:
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- copy dan sambung karakter
by astika in Tip n Trik Pemrograman more 14 years ago - Gimana klik kanan di Cell dbGrid muncul menu PopUp ?
by joudie in Tip n Trik Pemrograman more 16 years ago - Gimana bikin Marquee di form??
by ibiz in Enginering more 18 years ago - nasib kaos delphi
by simba in OOT more 18 years ago - Garbage collector
by delphinewbie in Tip n Trik Pemrograman more 16 years ago - Mohon Pertimbangan dan sarannya
by supermuam in Bedah Kasus more 16 years ago - Terbilang Di Fast Report
by zones in Reporting more 17 years ago - Variabel unit yg berbeda
by junanbbn in Lain-lain more 13 years ago - Mengambil Huruf Arab Dan mengermbalikannya Ke Edit Text..??
by juan81 in Hal umum tentang Pascal Indonesia more 17 years ago - hasil SELECT ga muncul semua
by ekseumaineur in MySQL more 19 years ago