игнорируется pgMargins

helly

пишу следующий код :

repFile = ExtractFilePath(Application->ExeName) + "templates\\policy.frf";
frRep->LoadFromFile(repFile);
frRep->Pages->Pages[0]->UseMargins = 1;
frRep->Pages->Pages[0]->pgMargins.Top =
frRep->Pages->Pages[0]->pgMargins.Top + 18;

/*.....*/
if ( frRep->PrepareReport() )
frRep->PrintPreparedReport("",1,false,(TfrPrintPages)0);


никакого смещения вниз при печати не происходит. В чем может быть причина?