Hi guys,
QuickReport (QR) has a function called GetExpression which took 3 params
earlier and now it takes 5. The first three are the same as the old ones but
it's the new ones that are bothering me. Here are the 4th and 5th param. Maybe
you could throw some light and tell me what values should be passed.
Class declaration:
------------------
TQRExprProperty = class(TStringProperty)
public
procedure Edit; override;
end;
Class implementation:
---------------------
procedure TQRExprProperty.Edit;
var
AValue : string;
begin
AValue:=Value;
{ GetExpression now requires 5 params instead of 3 }
if GetExpression( '', AValue, TForm(TComponent(GetComponent(0)).Owner),
{<>< How do I fill these two? ><>}
TWinControl(GetComponent(0)).Parent,
TQREvEnvironment(0)) then
// NIRAV End - 17/07/2001
Value:=AValue
end;
Prototype of the function:
--------------------------
GetExpression(ACaption: String; var Value: String; ADataSetForm:
TCustomForm; AParentControl: TWinControl; ALocalEnvironment: TQREvEnvironment);
--
Sent through GMX FreeMail - http://www.gmx.net
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
