Parameter end user without AutosearchDialog
Hello,
I am using Delphi XE8 and RB 16.03 Enterprise.
I am using enduser report with a manually edited table SQL (select * from
xxtable where (:initDate<=tranDate) and (tranDate<=:endDate)) and two date
parameters :initdate and :enddate
The report is working very good from end user explorer!
But, now I am invoking from delphi source with TppReport and setting the
parameters like this:
for I:=Low(fldNames) To High(fldNames) Do
Begin
if copy(fldNames[I],1,1)=':' then
Begin
st:=Copy(fldNames[I],2,Length(fldNames[I]));
lParameter:= ppReport.Parameters[st];
lParameter.Value:=fldValues[I];
End
Else
ppReport.CreateAutoSearchCriteria(ppReport.DataPipeline.Name,
fldNames[I],
condition[I],
fldValues[I],
False);
End;
ppReport.ShowAutoSearchDialog:=OkParam;
The problem is, than AutoSearchdialog is diplayed.
I need to send de paramaters without display any dialog or window and to
print directly to device
Thanks
I am using Delphi XE8 and RB 16.03 Enterprise.
I am using enduser report with a manually edited table SQL (select * from
xxtable where (:initDate<=tranDate) and (tranDate<=:endDate)) and two date
parameters :initdate and :enddate
The report is working very good from end user explorer!
But, now I am invoking from delphi source with TppReport and setting the
parameters like this:
for I:=Low(fldNames) To High(fldNames) Do
Begin
if copy(fldNames[I],1,1)=':' then
Begin
st:=Copy(fldNames[I],2,Length(fldNames[I]));
lParameter:= ppReport.Parameters[st];
lParameter.Value:=fldValues[I];
End
Else
ppReport.CreateAutoSearchCriteria(ppReport.DataPipeline.Name,
fldNames[I],
condition[I],
fldValues[I],
False);
End;
ppReport.ShowAutoSearchDialog:=OkParam;
The problem is, than AutoSearchdialog is diplayed.
I need to send de paramaters without display any dialog or window and to
print directly to device
Thanks
This discussion has been closed.
Comments
Each parameter contains its own AutoSearchSettings. Disabling these by
setting the AutoSearchSettings.Enabled property to False should give you
the effect you are after.
Moving forward we hope you will consider upgrading to the latest version
of ReportBuilder (17.03 with subscription) to obtain numerous new
features, enhancements and bug fixes since RB 16.
http://www.digital-metaphors.com/rbWiki/General/What's_New/RB_17
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com