7.1.2. Client side

You can find all source files of this example in the \FastReport3\Demos\ClientServer\Client\Simple folder.

This is an example of using the TfrxReportClient component and transferring report variables to the server.

Before starting this program, launch the server application described above ( topic 7.1.1.)

Press the "Show Report" button and type "1.fr3" in the "Report Name" field when running this example so that the program would execute the code below:

frxServerConnection1.Host := Host.Text;

frxServerConnection1.Port := StrToInt(Port.Text);

frxServerConnection1.Login := Login.Text;

frxServerConnection1.Password := Password.Text;

frxReportClient1.LoadFromFile(RepName.Text);

if Length(Param1Value.Text) > 0 thenwith frxReportClient1.Variables.Add do

beginName := Param1.Text;

Value := Param1Value.Text;

end;

if Length(Param2Value.Text) > 0 thenwith frxReportClient1.Variables.Add do

beginName := Param2.Text;

Value := Param2Value.Text;

end;

if frxReportClient1.PrepareReport thenfrxReportClient1.ShowPreparedReport;

Memo1.Lines.AddStrings(frxReportClient1.Errors);

After successful report request, you see the preview of the result.

| < previous page |  | main page | next page > |