TAdapterRTF.PrintedCount

Modified on 17/09/2009 12:31 by CPARAS Categorized as Plattform

{BR}
*[KlasseRTFAdapter|TAdapterRTF]
** [KlasseRTFAdapterMethoden|Methoden]
** [KlasseRTFAdapterEigenschaften|Eigenschaften]
{BR}
'''Syntax:'''{BR}
{{{{'''property''' PrintedCount: integer}}}}{BR}
{BR}
'''Beschreibung:'''{BR}
{BR}
Die Eigenschaft PrintedCount gibt nach dem Ausführen eines Serienbriefs die Anzahl der gedruckten Dokumente zurück.

{BR}
'''Beispiel:'''{BR}
{BR}
<code pascal>
procedure openTemplates;
var
  aRTF: TAdapterRTF;
begin
  TableObjektVorlage.setstringparam('OB_ID', self.getparam('OB_ID'));
  TableObjektVorlage.readData;
  
  aRTF := TAdapterRTF.Create;
  try
    aRTF.SourceComp         := 'MenuDocVorlagen';
    aRTF.SourceID           := self.DI_ID;
    aRTF.CO_ID              := self.CO_ID;
    aRTF.DefaultStorageType := 'Objektablage';
    aRTF.AddPrimaryDataSet(TableObjektVorlage, 'Objekt Daten', '', nil);
    aRTF.TemplateListdlg;
    Message_dlg('Gedruckte Dokumente: '+inttostr(aRTF.PrintedCount));
  finally
    aRTF.Free;
  end;
end;
</code>

CP Wiki

Navigation¶

TAdapterRTF.PrintedCount