Buscar por:

Quickreport propriedade forcenewpage

Código

1.Caso se queira que o relatório apresente cada cliente separadamente atribua a propriedade ForceNewPage da banda Detail para true;

2.Para o caso de só imprimir um cliente quando ele tiver efetuado uma compra, coloca-se o seguinte código no evento BeforePrint da banda Detail}

PrintBand:=DetailTable.RecordCount>0; { 3.Para ativar impressão do formulário a um evento OnClick, coloca-se a seguinte codificação:}

QRMDForm.Print; { 4.Para se inicializar campos antes da apresentaçãodo formulário, coloca-se a codificação no evento ONStartPage do Formulário, Por exemplo:}

procedure TDoseaciForm.DoseaciFormStartPage(Sender: TQuickRep);

5. begin

QRLabel4.Caption:=nome_serv;

MasterTable.filter:='Id='+InttoStr(id_serv);

MasterTable.filtered:=true;

QRLabel18.Caption:=Form23.Edit2.text;

QRLabel18.Left:=doseaciForm.width div 2- QRLabel18.width div 2;

try

QRMemo1.Lines.LoadFromFile('prelat.txt');

QRImage1.Picture.loadfromfile(simbolo);

finally

end;

end; { 6.Para ativar o formulário a um evento OnClick, coloca-se a seguinte codificação:}

QRMDForm.Preview;