Error on change RangeBegin Properties on run time

rbuser

I try to change properties rangebegin and rangeend of TppDBPipeline
Example Code :

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ppDB, ppDBPipe, StdCtrls, Buttons, ppComm, ppRelatv, ppProd,
ppClass, ppReport;

type
TForm1 = class(TForm)
ppReport1: TppReport;
BitBtn1: TBitBtn;
ppDBPipeline1: TppDBPipeline;
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ppDBPipeline1.RangeBegin := rbCurrentRecord;
end;

end.

it error :
Undeclared identifier 'rbCurrentRecord'

What's happen and how to fix this problem ?

Thank

Bughumnoi, Thailand

--
http://QLiner.com

It is my ambition to say in ten sentences what others say in a whole book. -
Friedrich Nietzsche

nicocizik

Hi,

You need to add ppTypes to your "uses" clause.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com