Activate

Top  Previous  Next

Activate přepne aktivní list reportu

 

procedure OnShowReport( Sender : TReportProperty );

begin

 SheetList[1].Activate;                                

end;