دلفی در قلب من
یک شنبه 01 دی 1387, 13:31 عصر
با سلام
می خواهم از برخی ستونهای جدولم د رصورتی که دارای شرط زیر باشند گزارشی چاپ کنم اما تنها از ستون هایی را چاپ میکند که دارای شرط اول باشند و شرط دوم را چک نمی کند
ADOQuery1.SQL.Clear;
aDOQuery1.SQL.Add('select * from motalebat where ( (vosooli>=:pr and vosooli<:po) or (vosooli_in>=:pr and vosooli_in<:po)) ')
ADOQuery1.Parameters.ParamByName('pr').Value:=strt oint(ComboBox3.Text)
ADOQuery1.Parameters.ParamByName('po').Value:=strt oint(edit23.Text)
ADOQuery1.Open
ADOQuery1.ExecuteOptions
if (ADOQuery1.RecordCount<>0) then
begin
QuickRep1.Prepare
QuickRep1.Preview
end
در صورتی که خود دستور sql را در بانک بخوبی اجرا می کند و پاسخ های درست می دهد البته با اعداد ثابت در برنامه نتیجه درست را نشان می دهد
می خواهم از برخی ستونهای جدولم د رصورتی که دارای شرط زیر باشند گزارشی چاپ کنم اما تنها از ستون هایی را چاپ میکند که دارای شرط اول باشند و شرط دوم را چک نمی کند
ADOQuery1.SQL.Clear;
aDOQuery1.SQL.Add('select * from motalebat where ( (vosooli>=:pr and vosooli<:po) or (vosooli_in>=:pr and vosooli_in<:po)) ')
ADOQuery1.Parameters.ParamByName('pr').Value:=strt oint(ComboBox3.Text)
ADOQuery1.Parameters.ParamByName('po').Value:=strt oint(edit23.Text)
ADOQuery1.Open
ADOQuery1.ExecuteOptions
if (ADOQuery1.RecordCount<>0) then
begin
QuickRep1.Prepare
QuickRep1.Preview
end
در صورتی که خود دستور sql را در بانک بخوبی اجرا می کند و پاسخ های درست می دهد البته با اعداد ثابت در برنامه نتیجه درست را نشان می دهد