PDA

View Full Version : کمبو باکس



s_mm99
سه شنبه 04 مرداد 1384, 13:26 عصر
می خوام یه کمبو باکس داشته باشم که بشه به هر کدو م از ایتم های داخل اون یه شماره داد مثلا اولی 7 باشه بعدی 21 و مثل این نه اینکه از 0 شروع بشه وبه ترتیب جلو بره

m-khorsandi
سه شنبه 04 مرداد 1384, 14:40 عصر
درود

و میخواین که اون اعداد قابل مشاهده باشند؟

amirrf
سه شنبه 04 مرداد 1384, 15:39 عصر
می توانید از ویژگی Objects مربوط به TComboBox.Items برای نگهداشتن یک مقدار مرتبط با هر آیتم بهره بگیرید.

s_mm99
چهارشنبه 05 مرداد 1384, 08:59 صبح
نمی خوام اون اعداد نمایش داده بشه مو ضو ع اینه که این کمبو از یه جدول پر میشه که هر فیلد جدول یه کد داره که من می خوام کد این فیلدا به ایندکس یا شماره هر ایتم کمبو اختصاص داده بشه وخود فیلد توضیح اون کد در کمبو نمایش داده بشه
2- با ابجکت نمیشه ابجکت یه ویژگیه که بازگشتیش یه ابجکته در صورتی که من می خوام ایندکس آیتما رو خودم مشخص کنم ونیاز به یه ویژگی ای دارم که ایندکس رو برگردونه

shahroozj
چهارشنبه 05 مرداد 1384, 10:01 صبح
فکر کنم این مشکلتان را حل کنه :



cbTest.Items.AddObject('TestStr',TObject(YourNum)) ;

m-khorsandi
چهارشنبه 05 مرداد 1384, 10:52 صبح
(ایندکس Item ها شبیه به شماره ردیف هست). شما اون اعداد رو که نمیخواین نشون بدین پس چه دلیلی داره که حتما ItemIndex تغییر کنه ؟شما با استفاده از Object ها میتونید همون کاری که میخواهید رو شبیه سازی کنید.

s_mm99
چهارشنبه 05 مرداد 1384, 11:12 صبح
ببین من وقتی محتوی کمبو را در جدول مربوطه ذخیره میکنم درواقع کد اونو که همون شماره ردیف باشه ذخیره میکنم وموقع بازیابی ایندوتاجدول رو جوین میکنم حلا لزومشو متوجه شدین این ابجکت رو دقیقا نمی فهمم

m-khorsandi
چهارشنبه 05 مرداد 1384, 12:16 عصر
یعنی Item های Combo رو از جدول میخونی؟ اگه جواب مثبت هست که از دستوری که Shahroozj نوشته استفاده کن و به جای YourNum کد مربوط به اون Item رو که در جدول هست رو قرار بده.

s_mm99
چهارشنبه 05 مرداد 1384, 13:08 عصر
خوب حلا که ایتما رو اضافه کردم چطور میتونم وقتی یکیشون انتخلب شد به اون شماره ای بهش دادم دسترسی پیدا کنم ببخشید

m-khorsandi
چهارشنبه 05 مرداد 1384, 14:04 عصر
اضافه کردن:


ComboBox1.Items.AddObject('a', TObject(1));
ComboBox1.Items.AddObject('b', TObject(2));
ComboBox1.Items.AddObject('c', TObject(3));
ComboBox1.Items.AddObject('d', TObject(4));



خواندن:


procedure TForm1.ComboBox1Change(Sender: TObject);
begin
Caption := IntToStr(integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]));
end;

s_mm99
شنبه 08 مرداد 1384, 07:54 صبح
خیلی متشکرم من یه سوال دیگه درمورد dsn دارم اگه ممکنه به اون جواب بدین

amir_22
دوشنبه 22 اسفند 1384, 09:07 صبح
چطور میتوان کمبو باکس دلفی 7 را محدود فقط به در یافت عدد یا حرف کرد

m-khorsandi
دوشنبه 22 اسفند 1384, 10:19 صبح
http://www.barnamenevis.org/forum/showthread.php?t=29736