Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi quickreport zeilenumbruch :( (https://www.delphipraxis.net/61531-quickreport-zeilenumbruch.html)

polondo 22. Jan 2006 17:40


quickreport zeilenumbruch :(
 
hi,

wie ist es möglich zu ermitteln wann auf einem QrMemo ein Zeilenumbruch gemacht wurde? Der Hintergrund ist folgender: Ich habe in meinem Report verschiedene
Spalten (QrMemos) parallel zueinander laufen, die mit Daten gefüllt werden. Nun kann es passieren das die Spalte NAME, bedingt durch die Länge des Textes einen Zeilenumbruch macht. Für mich bedeutet das nun das ich diesen Zeilenumbruch auch für alle anderen QrMemos machen muss, so dass ich saubere Zeilen
hinbekomme.

Nur wie finde ich heraus wann so ein Zeilenumbruch gemacht wurde?!?!?

mfg R.

Jelly 22. Jan 2006 17:42

Re: quickreport zeilenumbruch :(
 
Hab schon lange nicht mehr mit Quickreport gerbeitet und auch gar nicht mehr installiert, aber warum nimmst Du für deinen Zweck QrMemos. Erstelle doch ein Band und lege ein TDataset als Datenquelle darunter.

chaosben 22. Jan 2006 19:20

Re: quickreport zeilenumbruch :(
 
Problem verstanden.
Was hältst du davon, alle anderen Memo-Zeilen mit dem Format-Befehl zu formatieren, das heißt, sie auf die gleiche Länge zu bringen wie deine maßgebliche Zeile?

Format-Befehl:
Zitat:

s -> String. Das Argument muss ein Zeichen, ein String oder ein PChar-Wert sein. Der String bzw. das Zeichen wird anstelle des Formatbezeichners eingefügt. Wenn im Format-String ein Genauigkeitsbezeichner angegeben ist, bestimmt er die maximale Länge des resultierenden Strings. Ist das Argument ein String, der diese Maximallänge überschreitet, wird der String abgeschnitten.
Achtung: Um das Auffüllen mit Leerzeichen zu erzwingen muss du den Wert für "precision" auch noch angeben.
Beispiel:
Delphi-Quellcode:
var
  NamensZeile : String;
  FormatString : String;
  IrgendEineZeile : String;
  LenName : Integer;
begin
  LenName:=Length(NamensZeile);
  FormatString:='%'+IntToStr(LenName){Wichtig!}+'.'+IntToStr(LenName){Wichtig!}+'s';
  IrgendEineZeile:=Format(FormatString,[IrgendEineZeile]);
end;

polondo 23. Jan 2006 11:27

Re: quickreport zeilenumbruch :(
 
danke schonmal für die Antworten!!! Ich probier mal aus ob das klappt.

Ich hätte da noch eine Frage bezüglich der letzten Seite im Quickreport. Wie kann man die ermitteln?
Ich möchte nämlich das ein bestimmter Text nur auf die letzte Seite im Report kommt. Hatte schon mit OnEndpage was probiert nur scheint das wohl nicht die Lösung zu sein. Hilfreich wäre wenn es sowas wie LastPage geben würde. Weiß da einer Rat?

Danke schonmal

omata 23. Jan 2006 15:50

Re: quickreport zeilenumbruch :(
 
Liste der Anhänge anzeigen (Anzahl: 1)
Moin,

dafür ist eigentlich das Summary-Band da.

Ich habe dir mal ein Beispiel angehängt, in dem die Gesamtseitenzahl berechnet wird.

Vielleicht hilft dir das ja weiter...

MfG
Thorsten

polondo 24. Jan 2006 06:30

Re: quickreport zeilenumbruch :(
 
Dank Dir das kann ich gut gebrauchen!

mfg
R.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:47 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