مشکل با ado query

[soft-c]

سلام.
من یک مشکل جدید و جالبی با ado query پیدا کردم :
وقتی دستورات را می نویسم و اجرا می کنم پیغام :
cannot prform .....on a closed database
را می دهد .
ولی قبلا اینطوری نبود
حتی در فرم های قبلی هم این مشکل وجود ندارد
این هم کد ها :

ADOQuery1.Close ;
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('select * from nameh where (az='''+edit1.Text +''')');
ADOQuery1.ExecSQL ;
تشکر.

[Delphi7_love]

ADOQuery1.Close ;
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('select * from nameh where (az='''+edit1.Text +''')');
ADOQuery1.ExecSQL ;
.

دوست عزیز خط آخر اشتباه است و باید به این شکل بنویسی


ADOQuery1.open;

[mehdimdp]

میتونی کد رو به صورت زیر هم بنویسی:


ADOQuery1.active:=false;
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('select * from nameh where (az='''+edit1.Text +''')');
ADOQuery1.active:=true;

[Delphi7_love]

پس مشکل از یه جای دیگس ، من این کد رو چک کردم و مشکلی نداره . از نظر کد خیالت راحت مشکلی نیست .قسمت های دیگه مثل connection و ... رو بررسی کن

کد زیر رو از داخل برنامه ای که تست کردم کپی کردم و درسته

ADOQuery1.Close ;
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('select * from nameh where(az='''+edit1.Text +''')');
ADOQuery1.open ;

[soft-c]

پس مشکل از یه جای دیگس ، من این کد رو چک کردم و مشکلی نداره . از نظر کد خیالت راحت مشکلی نیست .قسمت های دیگه مثل connection و ... رو بررسی کن

کد زیر رو از داخل برنامه ای که تست کردم کپی کردم و درسته

ADOQuery1.Close ;
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('select * from nameh where(az='''+edit1.Text +''')');
ADOQuery1.open ;
تشکر
این کد ها را در فرم های دیگه نوشته بودم و جواب می داد ولی در این فرم جواب نمیداد !!!!!!:اشتباه:

[Delphi7_love]

کاری نداره که ، اگه واقعا اینطوره فرمت رو عوض کن ، یه کپی پیسته دیگه