<![CDATA[Alphabet in QuickReport drucken.....Problem!]]>Hallo!

Ich würde gerne in meinem QuickReport ein Alphabet ausdrucken, also einzelne Bänder.

Das Alphabet wird durch eine for-Schleife erzeugt.

Wie schaffe ich es, dass pro Band ein Buchstabe benutzt wird.

Kann ja als Dataset nicht meine Schleife angeben.....:-)

Für eine kurze Hilfe wäre ich dankbar.

Gruß

Maik

]]>https://www.c-plusplus.net/forum/topic/138541/alphabet-in-quickreport-drucken-problemRSS for NodeSun, 02 Aug 2026 15:48:03 GMTMon, 27 Feb 2006 12:39:42 GMT60<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Mon, 27 Feb 2006 12:39:42 GMT]]>Hallo!

Ich würde gerne in meinem QuickReport ein Alphabet ausdrucken, also einzelne Bänder.

Das Alphabet wird durch eine for-Schleife erzeugt.

Wie schaffe ich es, dass pro Band ein Buchstabe benutzt wird.

Kann ja als Dataset nicht meine Schleife angeben.....:-)

Für eine kurze Hilfe wäre ich dankbar.

Gruß

Maik

]]>https://www.c-plusplus.net/forum/post/1004062https://www.c-plusplus.net/forum/post/1004062Mon, 27 Feb 2006 12:39:42 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 00:00:56 GMT]]>Man kann mit dem QuickReport auch ohne Dataset drucken.
Dafür ist das OnNeedData Ereignis zuständig.
Setzte einfach in deinen Band ein QRLabel und weisse im OnNeedData den Caption
den gewünschten Wert zu.

Beispiel:

void __fastcall TForm1::QuickRep1NeedData(TObject *Sender, bool &MoreData)
{
  static int Row = 1; 
  AnsiString myString = "abcdefghijklmnopqrstuvwxyz";
  if (Row <= 26)
    MoreData = true;
  else
    MoreData = false;

  if (MoreData) {
    QRLabel1->Caption = myString[Row];
    Row++;
  }
  else
   Row = 1;
}
]]>https://www.c-plusplus.net/forum/post/1004763https://www.c-plusplus.net/forum/post/1004763Tue, 28 Feb 2006 00:00:56 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 08:43:49 GMT]]>Danke für die rasche Antwort, so funktionierts eigentlich auch schon ganz gut. Wollte aber eigentlich 4 Buchstaben pro Zeile haben.

Leider häng ich hier schon wieder.

Schöne Grüße

Maik

]]>https://www.c-plusplus.net/forum/post/1004841https://www.c-plusplus.net/forum/post/1004841Tue, 28 Feb 2006 08:43:49 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 11:36:53 GMT]]>Hallo!

Ich habe nun versucht die Schleife zu ergänzen, leider ist das Ergebnis immer, dass dann 4 x derselbe Buchstabe pro Reihe vorkommt.

Ich möchte ja aber 4 Buchstaben des Alphabets pro Zeile, also in Zeile 1
A,B,C,D in Zeile 2 E,F,G,H usw.

Kann mir da jemand weiterhelfen? ich komm sonst hier nicht weiter.

Gruß

Maik

]]>https://www.c-plusplus.net/forum/post/1004943https://www.c-plusplus.net/forum/post/1004943Tue, 28 Feb 2006 11:36:53 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 11:43:25 GMT]]>Du musst hier ansetzen:

if (MoreData) {
    QRLabel1->Caption = myString[Row];
    Row++;
  }

Anstatt nur einen Buchstaben auszugeben, musst du halt gleich vier ausgeben und Row um vier erhöhen.

P.S. Wenn du Beispielcode posten würdest, könnte man dir bestimmt besser helfen.

]]>https://www.c-plusplus.net/forum/post/1004948https://www.c-plusplus.net/forum/post/1004948Tue, 28 Feb 2006 11:43:25 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 12:30:55 GMT]]>Ich hatte es so versucht:

void __fastcall Tf_alphabetaufkleber_drucken::QuickRep1NeedData(
      TObject *Sender, bool &MoreData)
{

  static int Row = 1;
  AnsiString myString = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
  if (Row <= 26)
    MoreData = true;
  else
    MoreData = false;

  if (MoreData) {

        QRLabel1->Caption = myString[Row];
    Row++;
        QRLabel2->Caption = myString[Row];
    Row++;
        QRLabel3->Caption = myString[Row];
    Row++;
        QRLabel4->Caption = myString[Row];
    Row++;

  }
  else
   Row = 1;

Leider bricht er sofort mit einem Fehler ab.

Auch andere Versuche sind gescheitert, weil er immer nur 2 Buchstaben geschrieben hat und dann in die nächste Zeile gesprungen ist.

Für eine kurze Antwort wär ich dankbar

Gruß

Maik 😞 😞 😞

]]>https://www.c-plusplus.net/forum/post/1004985https://www.c-plusplus.net/forum/post/1004985Tue, 28 Feb 2006 12:30:55 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 12:37:35 GMT]]>Die Fehlermeldung wäre jetzt auch hilfreich zu wissen.
Ein Fehler in dem Beispielcode ist, das die Arraygrenze überschritten wird, d.h. du greifst auf myString[27] zu.

]]>https://www.c-plusplus.net/forum/post/1004994https://www.c-plusplus.net/forum/post/1004994Tue, 28 Feb 2006 12:37:35 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 12:43:36 GMT]]>Die Fehlermeldung lautet:

ThrowIfOutOfRange(idx); // Should Range-checking be optional to avoid overhead ??

Wie kann ich das überschreiten verhindern?

Gruß

Maik

]]>https://www.c-plusplus.net/forum/post/1005001https://www.c-plusplus.net/forum/post/1005001Tue, 28 Feb 2006 12:43:36 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 12:48:20 GMT]]>Z. B. so:

if (Row <= 26)
   QRLabel2->Caption = myString[Row];

oder so:

AnsiString myString = "ABCDEFGHIJKLMNOPQRSTUVWXYZ  ";

...

]]>https://www.c-plusplus.net/forum/post/1005004https://www.c-plusplus.net/forum/post/1005004Tue, 28 Feb 2006 12:48:20 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 14:47:07 GMT]]>@Fincki

Jetzt sind wir wieder am Anfang:

if (Row <= 26) 
   QRLabel2->Caption = myString[Row];

Dieser Code kommt bei mir bereits vor!

Noch mal, was ich möchte:

Pro Zeile 4 Buchstaben des Alphabets, solang bis das Alphabet durch ist!

Schöne Grüße

Maik

]]>https://www.c-plusplus.net/forum/post/1005106https://www.c-plusplus.net/forum/post/1005106Tue, 28 Feb 2006 14:47:07 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 14:58:44 GMT]]>solange du 26 Buchstaben durch 4 teilen willst gibt das immer eine Überschreitung,
also versuch einfach mal Finkis Tipp und mach an myString noch 2 Leerzeichen dran

und denk dran: du willst was von uns, nicht wir von dir 😉

]]>https://www.c-plusplus.net/forum/post/1005120https://www.c-plusplus.net/forum/post/1005120Tue, 28 Feb 2006 14:58:44 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 15:02:10 GMT]]>Ich hatte den Beitrag von Finki nicht richtig gelesen,

aber so funktionierts.

Vielen Dank.

Wollte nicht unhöflich sein.

Gruß

Maik

]]>https://www.c-plusplus.net/forum/post/1005125https://www.c-plusplus.net/forum/post/1005125Tue, 28 Feb 2006 15:02:10 GMT<![CDATA[Reply to Alphabet in QuickReport drucken.....Problem! on Tue, 28 Feb 2006 15:33:01 GMT]]>void __fastcall TForm1::QuickRep1NeedData(TObject *Sender, bool &MoreData) { static int al = 0; TQRLabel *label[4]={QRLabel1,QRLabel2,QRLabel3,QRLabel4}; int i; for(i=0;i<4;i++) { if(al+i<26) label[i]->Caption=char(65+al+i); else label[i]->Caption =EmptyStr; } al+=i; if(al<26) MoreData=true; else MoreData=true; } ]]>https://www.c-plusplus.net/forum/post/1005166https://www.c-plusplus.net/forum/post/1005166Tue, 28 Feb 2006 15:33:01 GMT