← Zum vorherigen Versionsunterschied Zum nächsten Versionsunterschied →

Version vom 2. Juli 2019, 10:08 Uhr

Dokumentenvorlagen

Vorlagengrupenebene

Die Liste

In dieser Maske können neue Datensätze angelegt und bearbeitet werden.
Hier definieren und bearbeiten wir unsere Vorlagengruppen.

Eingabemaske

Dateiebene

Die Liste

In dieser Maske können neue Datensätze angelegt und bearbeitet werden.
Hier definieren und bearbeiten wir unsere Dateien.

Eingabemaske

Makro

//-----------------------------------------------------------------------------
// Unit Name: Beispiel Word Platzhalter ersetzen
// Author:    Jr
// Date:      14-Jul-2019
//-----------------------------------------------------------------------------

syny

function Office_Replace(oDoku:TWordDoku) : String;
begin
    oDoku.Replace('VORNAME'     , oDoku.cPsVorname);
    oDoku.Replace('NAME'        , oDoku.cPsName         );
    oDoku.Replace('NUMMER'      , oDoku.cPsNr           );
    oDoku.Replace('ANREDE'      , oDoku.cPsAnrede       );

    oDoku.Replace('VORNAME'     , oDoku.cPsVorname      );
    oDoku.Replace('ZUSATZ1'     , oDoku.cPsZusatz1      );
    oDoku.Replace('ZUSATZ2'     , oDoku.cPsZusatz2      );
    oDoku.Replace('STRASSE'     , oDoku.cPsStrasse      );
    oDoku.Replace('POSTFACH'    , oDoku.cPsPostfach     );
    oDoku.Replace('PLZ'         , oDoku.cPsPLZ          );
    oDoku.Replace('ORT'         , oDoku.cPsOrt          );
    oDoku.Replace('TELEFON'     , oDoku.cPsTelefon      );
    oDoku.Replace('EMAIL'       , oDoku.cPsEmail        );
    oDoku.Replace('TELEFAX'     , oDoku.cPsFax          );
    oDoku.Replace('INTERNET'    , oDoku.cPsInternet     );
    oDoku.Replace('PSBRIEF'     , oDoku.cPsBriefAnrede  );
    oDoku.Replace('DOKBEZ'      , oDoku.cDokBez         );
    oDoku.Replace('DOKDATELANG' , oDoku.cDokDateLang    );
    oDoku.Replace('DOKDATE'     , oDoku.cDokDate        );
    oDoku.Replace('DOKANSP'     , oDoku.cDokAnsp        );
    oDoku.Replace('DOKSACHBEARB', oDoku.cDokSachbearb   );
    oDoku.Replace('ANSCHRIFT'   , oDoku.cAnschrift      );
    oDoku.Replace('INTKDNR'     , oDoku.cIntKdNr        );
    oDoku.Replace('GBEZ1'       , oDoku.cGBez1          );
    oDoku.Replace('GBEZ2'       , oDoku.cGBez2          );
    oDoku.Replace('GARTNR'      , oDoku.cGBez2          );
    oDoku.Replace('GSERNR'      , oDoku.cGSerNr         );
    oDoku.Replace('GORT'        , oDoku.cGOrt           );
    oDoku.Replace('LFDNR'       , oDoku.cLfdNr          );
    oDoku.Replace('VPLZ'        , oDoku.cVsPLZ          );
    oDoku.Replace('VORT'        , oDoku.cVsOrt          );
    oDoku.Replace('WAAGENART'   , oDoku.cWaagenArt      );
    oDoku.Replace('QSNR'        , oDoku.cQsNr           );
    oDoku.Replace('WAAGENTYP'   , oDoku.cWaagentyp      );
    oDoku.Replace('PRUEFKL'     , oDoku.cPruefKl        );
    oDoku.Replace('PRUEFNR'     , oDoku.cPruefNr        );
    oDoku.Replace('PRUEFDAT'    , oDoku.cPruefDat       );
    oDoku.Replace('G2ORT'       , oDoku.cOrt2           );
    oDoku.Replace('ANLAGENNR'   , oDoku.cAnlagennr      );
    oDoku.Replace('EICHZAEHLER' , oDoku.cEichzaehler    );

    Result := 'OK';
end;

@@ Zeile 26: / Zeile 26: @@
 In dieser Maske können neue Datensätze angelegt und bearbeitet werden.<br/>
-Hier definieren und bearbeiten wir unsere Vorlagengruppen.<br/>
+Hier definieren und bearbeiten wir unsere Dateien.<br/>
 ===Eingabemaske===