AufzaehlungRTF

Aus Schild-NRW Wiki
Zur Navigation springen Zur Suche springen

RAP-Funktion "AufzaehlungRTF"

Beschreibung
   function AufzaehlungRTF(aRichtext: String; const Label: String;aListe: TStrings): String;
   fügt eine Aufzählung (ungeordnete Liste) in einen RTF-Text ein.
Parameter
   aRichtext   - Der Richtext, in den die Aufzählung eingefügt werden soll
   aLabel      - Positionsmarke, an der die Aufzählung eingefügt werden soll, eingeschlossen
von
    ..
für eine ungeordnete Liste bzw.
    ..
                 für eine geordnete (numerierte) Liste.
   aListe      - Stringliste, die die einzufügenden Zeilen enthält
Rückgabewert
   Der veränderte Richtext
Beispiel
   procedure DetailBeforePrint;
    var
      lListe : TStringList;
    begin
      lListe:=TStringList.Create;
      lListe.Add('Zeile 1');
      lListe.Add('Zeile 2');
      Richtext1.Richtext:=AufzaehlungRTF(Richtext1.Richtext,'$LISTE$',lListe);
      lListe.Free
    end;
*** Im Richtext muss dann
    $LISTE$
oder
    $LISTE$
eingefügt werden.***


Zurück zu RAP-Funktionen