LazReport heading
lazarus / 16-Databases

----------------------------------------------------------------------
perhen · 2018-03-02 13:39

Hi

In a LazReport pageheader I want a text from an TEdit component
visible on screen. From LazReport tutorial I see

      procedure TForm1.Button1Click(Sender:TObject);
      begin
        frReport1.Values.FindVariable('test').Field :=
QuotedStr('test1');
        frReport1.ShowReport;
     end;

The .lrf file is loaded, I have created the variable 'test' in
category 'myown' in frReport1. 'test' is connected to values [None] in
variables editor. Variable 'test' is placed  in band on canvas
together with a label.

I expected to see 'test1' printed when clikcing Button1, but only the
label are printed.

I have removed the master data band at this stage.

Is there an explanation to the poor result.

----------------------------------------------------------------------
taazz · 2018-03-02 14:26

Start a new application drop an frReport on the form, set its property
StoreInForm to true in the object inspector, open the designer and
drop a report title band, in that band drop a rectangle object and
start its editor, in the memo editor type [Test1], close the editor
and the report designer. Drop a button on the form and double click it
to autocreate  the click event add the code below.
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TForm1.Button1Click(Sender :TObject);begin 
frVariables.Variable['Test1'] := 'This is a test' ; 
frReport1.ShowReport;end;  save and execute your application, press
the button. The first time the code is executed the variable will be
auto inserted, the consequent clicks will only change its value.

----------------------------------------------------------------------
balazsszekely · 2018-03-02 14:42

I also attach a small demo example. Hope it helps.

----------------------------------------------------------------------
perhen · 2018-03-02 18:22

Thank you very much!!
       My problems are solved. Perfect.