Wie funktioniert qrStringsBand ? Habe mich an die Hilfe gehalten :
Zitat:
1. Wenn Sie in keine datensensitiven Steuerelemente benötigen, erstellen Sie Ihren Report mit dem Steuerelement TQuickAbstractRep anstelle des Steuerelements TQuickRep. Das Steuerelement TQuickAbstractRep verwendet keine datensensitiven Steuerelemente. Daher wird die Größe der ausführbaren Datei erheblich reduziert.
2. Fügen Sie Ihrem Report ein TQRStringsBand-Steuerelement hinzu. Dieser Abschnitt besitzt die Eigenschaft Items, die eine integrierte Stringliste darstellt.
3. Fügen Sie dem Abschnitt ein TQRExpr-Steuerelement hinzu. Setzen Sie die Eigenschaften folgendermaßen:
Autosize auf False
AutoStretch auf True
Expression auf den Namen des Abschnitts (z.B. "QRStringsBand1")
Width auf die Breite des Abschnitts (kann zur Laufzeit festgelegt werden)
4. Bevor Sie die Methode Print oder Preview aufrufen, laden Sie die Textdatei in die Eigenschaft Items von TQRStringsBand:
QRStringsBand1.Items.LoadFromFile(SomeFileName)
5. Rufen Sie die Methode Preview oder Print auf.
Der Testcode sieht so aus :
Delphi-Quellcode:
QRStringsBand.Items.LoadFromFile('Unit1.DFM');
qr.Preview;
und liefert pro Zeile auch eine Ausgabe. Diese ist aber immer "true". Also in diesem Fall 129 Zeilen mit dem Wort "true".
Was fehlt da noch ? Ohne qrExpr wird nichts gedruckt. Da wird der Fehler liegen. Als Ausdruck ist dabei angegeben : QRStringsBand.