چگونه با ADOQuery جستجو کنم؟

با سلام خدمت دوستان: من یه مشکلی با این 5 خط کد دارم:
که دستور از لحاظ منطقی اجرا میشه اما اگر در دو رکورد آخر عنصر کلید وجود داشته باشد این دستور مار نمی کند . لطفا اگر از دوستان کسی راهی بهتر بلد هستن راهنمایی کنند (جستجو فقط با دستور SQL)

ADOQuery1.Active:=False //Close
ADOQuery1.SQL.Clear
ADOQuery1.SQL.Add('Select*fromtbl_studentwherestud ent_name=:PFIND')
ADOQuery1.Parameters.ParamByName('PFIND').Value:=E dit1.Text
ADOQuery1.Active:=True //Open

با سلام . اگه مي شه دقيق تر بنويس كه مي خواي چي كار كني چون من منظورتو متوجه نشدم و لي واسه خالي نبودن عريضه يه چيزي مي نويسم .

; ADOQuery1.Active:=False
; '' =: ADOQuery1.SQL
; (' ADOQuery1.SQL.text := (' Select * from tbl_student where student_name := PFIND
ADOQuery1.Active:=True

لطفا" کد هاتونو داخل تگ code بگذارید

نقل قول:

---

نوشته شده توسط Hadi_0261 [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

با سلام . اگه مي شه دقيق تر بنويس كه مي خواي چي كار كني چون من منظورتو متوجه نشدم و لي واسه خالي نبودن عريضه يه چيزي مي نويسم .

; ADOQuery1.Active:=False
; '' =: ADOQuery1.SQL
; (' ADOQuery1.SQL.text := (' Select * from tbl_student where student_name := PFIND

ADOQuery1.Active:=True

---

سلام : ازکمکت ممنونم . اما خط دوم تکه کد شما اشتباه است ، چون SQL از نوع WideString است .

منظور من هم این است که چرا با این جستجو دو فیلد آخر جستجو نمی شوند

اگه ميشه مثالتو بزار تا جوابتو بنويسم . با تشكر

سطر سوم را اينگونه اصلاح كنيد

کد:

---

ADOQuery1.Active:=False
ADOQuery1.SQl.Clear;
ADOQuery.SQL.TEXT := (' Select * from tbl_student where student_name =: PFIND ') ;
ADOQuery1.Active:=True

---

ADOQuery1.close ;
ADOQuery1.SQL.clear ;
ADOQuery1.SQL.TEXT:='Select * From Table_1 WHERE Fild_1=''%'+Edit1.text+'%'' ' ;
ADOQuery1.Open ;

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


e:=MaskEdit3.Text+'%';
with DATAMODULE109.moshakhasat do
begin
Active:=false;
SQL.Clear;
SQL.Add('select * from moshakhasat');
SQL.Add('where name like '#39+e+#39'');
ExecSQL;
Open;
Active:=true;
end;