AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Quickreport und ForceNewPage

Quickreport und ForceNewPage

Ein Thema von mato · begonnen am 24. Nov 2004 · letzter Beitrag vom 24. Nov 2004
Antwort Antwort
Benutzerbild von mato
mato

Registriert seit: 24. Nov 2004
Ort: Lutherstadt Eisleben
19 Beiträge
 
Delphi 6 Professional
 
#1

Quickreport und ForceNewPage

  Alt 24. Nov 2004, 17:13
Hallo erstmal !

Ich weiss nicht ob ich hier richtig bin, ich versuche es einfach mal.
Fummle schon eine ganze Weile an einem Progrämmchen rum, bin soweit auch ganz gut klar gekommen, doch jetzt ist ende. Brauche einen kleinen Denkanstoss, komme einfach nicht mehr klar.
Ich möchte mit Hilfe von Quickreport Daten aufs Papier bringen, geht auch, aber nicht so wie ich das gerne hätte.
Habe einen Report mit einem Detail- und zwei Subdetailbändern erstellt. Ein Subdetail ist leer, in jenes möchte ich zur Laufzeit Labels einfügen, klappt auch noch.
Da ich vorher jedoch nicht weiss wieviel Labels es werden (datenabhängig) und es in der Regel passiert das mehr als eine Seite im Report benötigt werden, habe ich es mit ForceNewPage versucht. Funktioniert aber nicht richtig.
Stelle ich ForceNewPage des zweiten Subdetailbandes auf true dann haut er mir alles auf die zweite Seite, auf false gibt es logischerweise nur eine Seite und er schreibt über das Seitenende hinweg.
Wie bekomme ich es hin das er die erste Seite voll schreibt und auf der zweiten weitermacht (falls nötig).
Ich hoffe mir kann jemand helfen, die Beiträge im Forum haben mir nicht wirklich geholfen. Danke schon im voraus.

Hier noch der Code in dem ich die Labels erzeuge:
Delphi-Quellcode:
 for i := 1 to 500 do
   begin
    LLabel := TQRLabel.Create(reportform.artikel.AddPrintable(TQRLabel));
    LLabel.Parent := reportform.artikel;
    LLabel.Size.Units := pixels;
    with LLabel do
     begin
      caption := 'Testlabel'+inttostr(posi);
      left := 0;
      top := posi;
      posi := posi + reportform.artikel.FontSize +2;
     end;{with}  
   end;{for}  
 
reportform.QuickRep1.Preview;
mato
Er dachte..., ' Schlimmer kanns nicht mehr kommen !!!' Und es kam schlimmer...
  Mit Zitat antworten Zitat
Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#2

Re: Quickreport und ForceNewPage

  Alt 24. Nov 2004, 17:23
Hallo mato,

herzlich willkommen im Delphi-PRAXIS Forum.

Du solltest nicht 500 Label erzeugen, sondern Zeile für Zeile arbeiten und zwar mit dem OnNeedData Event. Suche mal hier im Forum danach, das sollte dir weiterhelfen.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat
Benutzerbild von mato
mato

Registriert seit: 24. Nov 2004
Ort: Lutherstadt Eisleben
19 Beiträge
 
Delphi 6 Professional
 
#3

Re: Quickreport und ForceNewPage

  Alt 24. Nov 2004, 17:26
hallo

Danke erstmal. Schau gleich mal nach.

mato
Er dachte..., ' Schlimmer kanns nicht mehr kommen !!!' Und es kam schlimmer...
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:54 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz