ورود

View Full Version : حذف ردیف های تکراری از ListBox


rrazavi
چهارشنبه 30 آبان 1386, 15:13 عصر
با سلام
من یکسری فایل را از یک مسیر خاص می خوانم که در آنها فایل تکراری هم وجود دارد ودر یک لیست باکس اضافه می کنم چگونه می توان کنترل نمود که ردیف تکراری وارد نشود.
باتشکر.
SYNDROME
چهارشنبه 30 آبان 1386, 19:09 عصر
با سلام
من یکسری فایل را از یک مسیر خاص می خوانم که در آنها فایل تکراری هم وجود دارد ودر یک لیست باکس اضافه می کنم چگونه می توان کنترل نمود که ردیف تکراری وارد نشود.
باتشکر.
خوب یکی از روشها این است که قبل از Add کردن اطلاعات باید کل ListBox را پیمایش کنید و ببینید قبلا این مقدار اضافه شده است یه نه.
روش دیگر استفاده از متغییر است که هر مقداری را در ListBox اضافه می کنی با یک ساختار خاص در متغییر نیز بریزی.مثلا


S := '[SYNDROME][Black]';

حالا زمانی که مقدار را می هید در ListBox اضافه کنید مقدار فوق را با دو "[]" چک کنید تا ببینید وجود دارد یا نه مثلا


IF Pos('[SYNDROME]',S) > 0 Then
Add To ListBox

موفق باشید
Hamid_PaK
چهارشنبه 30 آبان 1386, 20:06 عصر
از روال IndexOf آیتمهای لیست باکس می توانید شماره آیتم موجود را بیابید اگر شماره آن منفی باشد پس آیتم مورد نظر یافت نشده است.

یا حق ...