مشكل با حذف كل محتويات جدول

[mansour1860]

با سلام
من توي برنامم از adoquery , datasource , adoconnection استفاده ميكنم
توي برنامم يه قسمت رو گذاشتم واسه چاپ فاكتور. حالا ميخوام بعد از چاپ كردن هر فاكتور با زدن يه دكمه كل محتويات جدول پاك بشه و جدول خالي بشه و بشه يه فاكتور جديد نوشت
لطفاً دوستان كمك كنيد
در ضمن من تازه كارم و خواهش ميكنم راهنمايي هاتون زياد پيچيده نباشه
ممنون

[mohsen24000]

delete * from tbl

[delphi3285]

برای حذف همه رکورد های یک جدول بانک اطلاعاتی دستور sql زیر رو به کار ببرید.

delete from tablenameبجای table name نام جدول رو بذار.
راهنمایی:
با فرض اینکه adoquery1 و Adoconnection1 اشیا اتصال به ado باشند. در این صورت کد زیر رو می تونید برای اجرای دستورات sql در دلفی به کار ببرید:
adoquery1.sql.clear;
adoquery1.sql.add ('delete * from tablename');
adoquery1.execsql;

[Felony]

برای چاپ فاکتور جدول ساختید ؟!
یعنی فقط برای اینکه بتونید گزارشتون رو متصل کنید یک جدول ساختید و اطلاعات رو توش میریزید و بعد از چاپ پاک میکنید ؟!

:گیج:

[mansour1860]

مرسي از همه دوستان خصوصاٌ جناب delphi3285
با كد پايين جدول رو پاك ميكنه ولي اگه بخوام دوباره چيزي به جدول اضاف كنم پيغام زير مياد

adoquery1.sql.clear;
adoquery1.sql.add ('delete * from tablename');
adoquery1.execsql;

پيغامش اينه:

http://up98.org/upload/server1/02/a/4pnhyekjbxlzpvvqt1n.jpg

[delphi3285]

کل کد این قسمت رو بفرست.

[mansour1860]

اينا رو توي يه كامند گذاشتم
factor.QRLabel4.Caption:=sedit27.Text;
main.ADOQuery2.close;
main.ADOQuery2.SQL.Text:='select * from factor';
main.ADOQuery2.Open;
factor.QuickRep2.Preview

[delphi3285]

به جای 4 خط اول اگر این دستورات رو بذاری باز هم خطا میده؟
adoquery1.sql.clear;
adoquery1.sql.add ('select * from factor');
adoquery1.execsql;

[Felony]

جدولتون فیلد کلید اصلی داره ؟

[mansour1860]

به جای 4 خط اول اگر این دستورات رو بذاری باز هم خطا میده؟
adoquery1.sql.clear;
adoquery1.sql.add ('select * from factor');
adoquery1.execsql;



اينا رو نوشتم ولي فقط كوئري رو پاك كرد نه جدول

[mansour1860]

جدولتون فیلد کلید اصلی داره ؟

نه فيلد كليد نداره

[Felony]

خسته نباشی , این مورد رو به عنوان اولین گزینه مهم تو طراحی یک جدول یادت نگه دار , جدولی که که فیلد کلید اصلی نداشته باشه براش ۱۰۰۰ تا مشکل غیر معمول موقع برنامه نویسی پیش میاد , به جدولت یک فیلد کلید اصلی اضافه کن .

[mansour1860]

ممنون از همه دوستان كه كمك كردن
مشكلم حل شد
اشتباهم اين بود كه توي كدهام دو تا كوئري با هم فعال ميشد

[ahmadi613]

باسلام
دوست عزيز من با table ويا با adotable هر دو از فرمول زير استفاده مي كنم بسيار راحت اما توجه داشته باشيدپس از كمپايل برنامه ات از برنامه بيرون برويد واز فايل exe ات استفاده كن جواب خواهي گرفت موفق باشي
begin
if table1.FieldByName('fam').AsString<>'' then begin
table1.Active:=false;
table1.Close;
table1.EmptyTable;
activecontrol:=edit1;
table1.Open;

end;