AufzaehlungRTF: Unterschied zwischen den Versionen

AufzaehlungRTF (Quelltext anzeigen)

180 Bytes hinzugefügt , 8. April 2014

keine Bearbeitungszusammenfassung

2.384

Bearbeitungen

@@ Zeile 16: / Zeile 16: @@
 |-
 |'''Beispiel''' ||
-     procedure DetailBeforePrint;
+     Die Liste muss global deklariert werden:
-     var
+    var
         lListe : TStringList;
+    Muss in diesem Ereignis erzeugt werden:
+    procedure ReportBeforePrint;
+     Begin
+      lListe:=TStringList.Create;
+     Wird hier befüllt:
+     procedure DetailBeforePrint;
       begin
-        lListe:=TStringList.Create;
+        lListe.Clear;
         lListe.Add('Zeile 1');
         lListe.Add('Zeile 2');