انتقال لز دیتا گرید به لیست باکس [بایگانی]

star_star

جمعه 19 آبان 1391, 16:51 عصر

سلام ، فکر کنید یه دیتا گرید داریم که چند تا ستون داره
حالا یکی از این ستون ها که توی اون شماره تلفنه رو چطوری میشه به یه لیست باکس انتقال داد ؟

star_star

شنبه 20 آبان 1391, 16:07 عصر

کسی تا حلال اینکارو انجام نداده ؟ کسی نمبتونه کمک کنه ؟

SlowCode

شنبه 20 آبان 1391, 16:34 عصر

سلام
دو راه داری:
1- استفاده از DBList
2- با یه حلقه:

For i=0 to data1.recordset.recordsource
list1.additem data1.recordset.fields(2)
next

با این کد اطلاعات فیلد سوم به لیست باکس اضافه میشن.

star_star

شنبه 20 آبان 1391, 20:51 عصر

سلام
دو راه داری:
1- استفاده از DBList
2- با یه حلقه:

For i=0 to data1.recordset.recordsource
list1.additem data1.recordset.fields(2)
next

با این کد اطلاعات فیلد سوم به لیست باکس اضافه میشن.

آقا این روش شما که کار نمیکنه !!!!!!!!!!!!!!
بذارید واضح تر توضیح بدم ، من یه دیتا گرید دارم که به دیتا بیسم وصله
حالا یه قسمت سرچ براش گذاشتم ، ما میایم مثلا اسم علی رو سرچ میکنیم ، دیتا گرید تمام اسم هایی که علی هستش رو نشون میده و توی یه ستون دیگه شماره های تماسشون رو میاره
حالا من میخوام تمام این شماره ها رو وارد یه لیست باکس کنم !!!

SlowCode

شنبه 20 آبان 1391, 20:55 عصر

ببخشید یه اشتباه کوچولو داشتم، چون سریع نوشتم، بفرما:

For i=0 to data1.recordset.recordCount-1
list1.additem data1.recordset.fields(2)
next

خب این کد هم همین کار رو میکنه، شما میای جستجو رو با recordsource محدود میکنی، بعد با این کد میای اطلاعات یه فیلد خاص رو توی لیست باکس اضافه میکنی. اگه از DbList استفاده کنی نازی به کدنویسی نداری.

star_star

شنبه 20 آبان 1391, 21:04 عصر

ببخشید یه اشتباه کوچولو داشتم، چون سریع نوشتم، بفرما:

For i=0 to data1.recordset.recordCount-1
list1.additem data1.recordset.fields(2)
next

خب این کد هم همین کار رو میکنه، شما میای جستجو رو با recordsource محدود میکنی، بعد با این کد میای اطلاعات یه فیلد خاص رو توی لیست باکس اضافه میکنی. اگه از DbList استفاده کنی نازی به کدنویسی نداری.

آقا منظورت از data1 همون DataGrid هست دیگه ؟
شما اصلا منظور منو متوجه نشدید !!! من از data grid و Adodc استفاده میکنم

SlowCode

شنبه 20 آبان 1391, 22:00 عصر

آقا منظورت از data1 همون DataGrid هست دیگه ؟ نخیر
خب عزیز من فرقی نداره که کافیه Data1 رو به Adodc1 تغییر بدی. من برای مثال از کنترل دیتا استفاده کردم.
شما اصلا برای دیتاگرید نیاز نیست کدی بنویسید. با این کد مستقیما با کنترل دیتا کار میکنی.

star_star

شنبه 20 آبان 1391, 22:28 عصر

بله درسته اما کد یه مشکلی داره اونم اینه که فقط میاد یه فیلدو وارد لیست باکس میکنه !!!!
عکس ضمیمه کردم ، همه شماره ها مثله هم هستن
94745

SlowCode

شنبه 20 آبان 1391, 22:42 عصر

بله مشکل از من بود، چون کد رو عجله ای مینویسم.
شما باید خودتون بدونید دیگه:لبخندساده: بعد از خوندن هر رکورد باید رکورد رو به بعدی منتقل کنیم. یعنی بعد از اضافه کردن به لیست کد زیر رو بنویس، قبل از Next

Adodc1.Recordset.MoveNext

somitlb

سه شنبه 12 شهریور 1398, 08:36 صبح

سلام دوستان کسی میدونه چطوری در یک دیتا گرید یک لیست بیاوریم ینی ستون اول دیتا گرید ویو وقتی اینتر کردم لیست باز شه

saeedzx

سه شنبه 12 شهریور 1398, 20:10 عصر

دوست عزیز
p=text1.text
For i=0 to data1.recordset.recordCount-1
text1.text=i
list1.additem p
next i

از این روش استفاده کن اول فیلد رو وارد تکست می کنه بعد به لیست اضافه می کنه