.rav - Datei im Quer- oder Hochformat ? (RaveReport)

[Andreas Schilling]

R_BelEgLogo := Name der TRVProject-komponente

Delphi-Quellcode:

procedure auslesen;
  var PageR : TRavePage;
      Rep : TRaveReport;
begin
    R_BelEgLogo.ProjectFile := "Pfad und Name des Ravereport";
    R_BelegLogo.Active := true; 
     
    R_BelegLogo.SelectReport('Name der Reportkomponente', true);
    Rep := R_BelegLogo.ProjMan.findravecomponent('Name der Reportkomponente', nil) as TRaveReport;
    PageR := R_BelegLogo.ProjMan.findravecomponent('Name der Page Komponete', Rep) as TRavePage;
    if  PageR.orientation = podefault // polandscape  poportrait
    then showmessage('podefault');
end;