AufzaehlungRTF
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, eingeschlossenvon
für eine geordnete (numerierte) Liste. aListe - Stringliste, die die einzufügenden Zeilen enthält |
| Rückgabewert |
Der veränderte Richtext |
| Beispiel |
Die Liste muss global deklariert werden:
var
lListe : TStringList;
Muss in diesem Ereignis erzeugt werden:
procedure ReportBeforePrint;
Begin
lListe:=TStringList.Create;
Wird hier befüllt:
procedure DetailBeforePrint;
begin
lListe.Clear;
lListe.Add('Zeile 1');
lListe.Add('Zeile 2');
Richtext1.Richtext:=AufzaehlungRTF(Richtext1.Richtext,'$LISTE$',lListe);
lListe:=TStringList.Free;
end;
// Im Richtext muss dann <ul>$LISTE$</ul> oder <ol>$LISTE$</ol> eingefügt werden.
|
Zurück zu RAP-Funktionen