LazReport heading

[perhen]

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]

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][+][-]

1. procedure TForm1.Button1Click(Sender :TObject);
2. begin
3.   frVariables.Variable['Test1'] := 'This is a test' ;
4.   frReport1.ShowReport;
5. end;
6.  

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]

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

[perhen]

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