search & delete [بایگانی] - برنامه نویس

sajadvahedi

دوشنبه 18 شهریور 1387, 16:11 عصر

سلام به همه دوستان
من 2 سوال دارم؟؟
من می خوام تو برنامم search کنم نه فیلتر اما نی دونم چطوری ؟
سوال دیگم اینه که من می خوام کل رکورد های یک جدولمو پاک کنم . یک کد نوشتم اما خیلی کند کار می کنه.
اگه میشه کمکم کنید......
با تشکر

s.mostafa.rahmani

دوشنبه 18 شهریور 1387, 17:02 عصر

برای سرچ می تونی از دستور Locate استفاده کنی:

Table1.Locate('Name like', Edit1.Text, []);
حذف کلیه رکوردهای یک جدول:
دستور SQL:

Truncate Table Test

delphiprog3000

دوشنبه 18 شهریور 1387, 18:52 عصر

سلام به همه دوستان
من 2 سوال دارم؟؟
من می خوام تو برنامم search کنم نه فیلتر اما نی دونم چطوری ؟
سوال دیگم اینه که من می خوام کل رکورد های یک جدولمو پاک کنم . یک کد نوشتم اما خیلی کند کار می کنه.
اگه میشه کمکم کنید......
با تشکر

لطفا قبل از ایجاد تاپیک جستجو نمایید.

در مورد سوال اول:

http://barnamenevis.org/forum/showthread.php?t=88786
در مورد سوال دوم:

http://barnamenevis.org/forum/showthread.php?t=35219

موفق باشید...............

sajadvahedi

دوشنبه 18 شهریور 1387, 23:20 عصر

با تشکر از دوستان عزیز
بانک من acsess هستش . من جستوجو کردم چیزی که می خواستم نبود وگرنه همون اول جستوجو کردم

Hsimple11

سه شنبه 19 شهریور 1387, 00:45 صبح

بانک من acsess هستش

ACCESS

جستجو کنید.

sajadvahedi

سه شنبه 19 شهریور 1387, 04:40 صبح

دوست عزیز گشتم بعد سحری اما چیزی پیدا نکردم
با تشکر

SYNDROME

سه شنبه 19 شهریور 1387, 05:42 صبح

دوست عزیز گشتم بعد سحری اما چیزی پیدا نکردم
با تشکر
می توانی از دستورات SQL و یا Filter برای جستجو استفاده کنید.
مثال :

ADO.SQL.Text := ' Select * From Tbl_Test Where Field1='+Value;
ADO.Open;

ADO.Filtered := False;
ADO.Filter := ' Field1='+Value1;
ADO.Filtered := True;

برای حذف هم می توانی چنین عمل کنی:

ADO.SQL.Text := ' Delete From Tbl_Test';
ADO.ExecSQL;

موفق باشید

sajadvahedi

سه شنبه 19 شهریور 1387, 23:57 عصر

دوست عزیز Syndrome متشکرم
من کد حذف رو می خواستم که کمکم کردید. اما برای این که نتیجه حذف رو بیبنم باید از برنامه خارج
بشم دوباره اجرا کنم تا نتیجه حذف رو مشاهده کنم .
برای این باید چه کار کنم
با تشکر

s.mostafa.rahmani

چهارشنبه 20 شهریور 1387, 08:04 صبح

اما برای این که نتیجه حذف رو بیبنم باید از برنامه خارج
بشم دوباره اجرا کنم تا نتیجه حذف رو مشاهده کنم .
برای این باید چه کار کنم

کافیه Dataset رو Close و Open کنی. یا به عبارتی خاصیت Active رو False و دوباره True کنی.

delphiprog3000

دوشنبه 25 شهریور 1387, 10:35 صبح

دوست عزیز Syndrome متشکرم
من کد حذف رو می خواستم که کمکم کردید. اما برای این که نتیجه حذف رو بیبنم باید از برنامه خارج
بشم دوباره اجرا کنم تا نتیجه حذف رو مشاهده کنم .
برای این باید چه کار کنم
با تشکر

در ادامه صحبت دوستمون اگر از Adoquery استفاده میکنید.

میتوانید با استفاده از این کد آن را بازخوانی کنید.

Adoquery1.Refresh

یا از این کد:

Adoquery1.Requery();

موفق باشید.............