ورود

نسخه کامل مشاهده نسخه کامل : کدی برای حذف کاملات تکراری


anf-b
10-02-2009, 11:30
سلام به دوستان عزیز برنامه نویس
والله بنده یک برنامه کوچولو با دلفی میخوام بنویسم که یک قسمت داره که بهش شماره موبایل ها رو اضافه میکنیم!
مثلا 500 تا شماره موبایل هست!

09120000000
09120001234
09120004321
09120001234

و....

حالا میخوام این برنامه بگرده و شماره موبایل هایی که تکراری هستند رو از لیست حدف کنه! و یکیشون رو بگذاره!
یا لا اقل اعلام کنه که چه شماره هایی تکراری هستند!

ممنون میشم راهنماییم کنید
ممنون
F A R H A D
10-02-2009, 11:56
سلام. برای نگهداری اطلاعات از دیتابیس استفاده می کنید؟ اگر پاسخ مثبته که فیلد شماره ها رو کلید بذارید وگر نه بگید از چه کنترل یا ابزاری برای ذخیره شماره ها استفاده میکنید
anf-b
10-02-2009, 23:21
دوست عزیز من همه ی شماره ها رو در یک فایل txt ذخیره کردم ! و میخوام با یک کار ساده به یک ListBox ایمپورت کنم!
F A R H A D
10-02-2009, 23:43
با کد زیر فایل رو در listBox لود کنید:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
بعد با روشهای مختلف میتونید عناصر تکراری رو مشخص کنید و حذف کنید
anf-b
12-02-2009, 00:53
ممنون
دوست عزیز من اینو بلد بودم!
فقط دنبال راهی میگردم تا عناصر تکراری رو مشخص کنم
ممنون میشم کمکم کنی
as13851365
12-02-2009, 09:57
کدزیر داده های تکراری را حذف می کنه حالا شما می تونید به جای حذف کردن داده های تکراری را در یک جای دیگه نمایش بدید :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
anf-b
12-02-2009, 12:00
حالا شما می تونید به جای حذف کردن داده های تکراری را در یک جای دیگه نمایش بدید

ممنون میشم یک مقدار توضیح بدید
ممنون
F A R H A D
12-02-2009, 21:01
تشکر از دوست عزیزم as13851365 . شما باید خط اول کد بالا(تعریف تابع) رو به صورت زیر تغییر بدید:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
و بعد با کدی مانند کد زیر و استفاده از 2 listbox به نتیجه دلخواه برسید:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
موفق باشید
anf-b
13-02-2009, 16:25
آقا من نمیدونم این تابع رو کجا بنویسم؟

function removeduplicateitem(srclist,destlist:tstringlist): tstringlist;
ممنون
افسون پری
14-02-2009, 23:42
چطور از هر tabsheet به tabsheet دیگه میپرند در کد نویسی
F A R H A D
16-02-2009, 10:15
آقا من نمیدونم این تابع رو کجا بنویسم؟

ممنون

بعد از نوشته زیر:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
وبعد تعریف تابع رو اضافه کنید و یا تمام کد تابع رو بعد از خط زیر بنویسید:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
F A R H A D
16-02-2009, 10:19
چطور از هر tabsheet به tabsheet دیگه میپرند در کد نویسی

سلام دوست عزیز. خوش آمدید
لطفا سوالاتتون رو در جاهای مرتبط با موضوع تاپیک مطرح کنید و یا تاپیک جدید ایجاد کنید
موفق باشید
anf-b
18-02-2009, 00:16
آقا ممنون ولی باز این ارور رو داد:


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
anf-b
19-02-2009, 14:46
ممنون میشم کمکم کنید
F A R H A D
19-02-2009, 18:41
آقا ممنون ولی باز این ارور رو داد:


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

احتمالا هر دو کاری رو که گفتم انجام دادید. فقط کار دوم رو انجام بدید
anf-b
20-02-2009, 11:41
آقا من این سورس رو save کردم و اینجا میزارم تا یک نگاه بهش بندازی!
ممنونت میشم


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
F A R H A D
20-02-2009, 12:44
شما که اصلا بدنه تابع رو ننوشته بودی! اصلاحش کردم، از لینک زیر دانلود کنید:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
anf-b
20-02-2009, 13:38
واقعا ممنون
ان شاالله اگه بازم سوال داشتم مزاحمت میشم
ممنون