Zum Hauptinhalt springen

PrtFormClose

Mit diesem Befehl wird ein mit ``PrtFormOpen() geöffnetes PrintForm-Objekt wieder geschlossen. Der von PrtFormOpen() zurückgegebene Deskriptor wird in (obj) übergeben.

Beispiel:

// Temporären Druckjob öffnen (PrintDocument DinA4, leer)
tJob # PrtJobOpen(_PrtDocDinA4, '', _PrtJobOpenWrite | _PrtJobOpenTemp);

// PrintForm öffnen
tForm # PrtFormOpen(_PrtTypePrintForm, 'Liste.Adresse');

// Erste Seite ankündigen
tPage # tJob->PrtJobWrite(_PrtJobPageStart);

// füge PrintForm hinzu
tPage->PrtAdd(tForm);

// Letzte Seite geschrieben
tJob->PrtJobWrite(_PrtJobPageEnd);

// PrintForm schließen
tForm->PrtFormClose();

// Druckjob schließen und Preview anzeigen
tErr # tJob->PrtJobClose(_PrtJobPreview);