Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Problem mit Ravereport und Customconnection (https://www.delphipraxis.net/91334-problem-mit-ravereport-und-customconnection.html)

Piberg 3. Mai 2007 15:36


Problem mit Ravereport und Customconnection
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo zusammen!

Bei meniem ertsem Gehversuch mit Rave Reports versuche ich Inhalt eines StringGrids
mittels Customconnection zu drucken. Ich habe schon vieles aus anderen Threads lesen
können, was mir erstmal grundsätzliche Vorstellung von diesem Tool gebracht hat.

Mein problem sieht folgendermassen aus:
im StringGrid steht folgender Inhalt:

Position Vorname Nachname
-------------------------------
Pos_1 Name_1 Nachname_1
Pos_2 Name_2 Nachname_2
Pos_3 Name_3 Nachname_3

Beim Erstellen des Reports im Preview sehe ich dann 3 Seiten
jeweils mit nur einer Zeile pro Seite.
Ich habe bestimmt etwas übersehen, denn ich kann mir nicht erklären,
worum dies so zustande kommt.

hier sind meine Ereignisroutinen(*.rav und den Entwurf habe ich vorsichtshalber nochmal angehängt :stupid: ):
Delphi-Quellcode:
//###########################################################################
procedure TForm1.RvCustomConnection1GetCols(Connection: TRvCustomConnection);
begin
  with Connection do begin
     WriteField('Position', dtString, 10, '', '');
     WriteField('Vorname', dtString, 10, '', '');
     WriteField('Nachname', dtString, 10, '', '');
  end;
end;

//###########################################################################
procedure TForm1.RvCustomConnection1GetRow(Connection: TRvCustomConnection);

begin
  with Connection do begin

     Connection.WriteStrData(MyGRD.Cells[0,RaveZeile], '');
     Connection.WriteStrData(MyGRD.Cells[1,RaveZeile], '');
     Connection.WriteStrData(MyGRD.Cells[2,RaveZeile], '');

  end;
end;
//###########################################################################
procedure TForm1.RvCustomConnection1Next(Connection: TRvCustomConnection);
begin
  inc(RaveZeile);
end;

//###########################################################################
procedure TForm1.RvCustomConnection1Open(Connection: TRvCustomConnection);
begin
  RaveZeile:=1;
  connection.DataRows:=MyGRD.RowCount;
end;
Kann mir jemand helfen?
MfG. Alex

merlin17 3. Mai 2007 15:55

Re: Problem mit Ravereport und Customconnection
 
Alex,

du darfst das DataBand nur eine Zeile groß definieren :warn: Die Region ist der Bereich, in welchem das Databand "wiederholt" wird...
ich habe Deine app dahingehend geändert, dass das DataBand nur noch eine Höhe von 0,300 hat und dann sind alle drei Datensätze
korrekt in Listenform da.

Wenn Du je Datensatz eine Seite haben willst, musst Du die DataText-Komponenten direkt auf die Seite werfen und mit der DataCycle-comonent
arbeiten, war aber hier ja nicht die Frage <g>


Weiterhin viel Spaß mit Rave Reports :cheers:


:-) thomas, TeamNevrona

Piberg 3. Mai 2007 16:02

Re: Problem mit Ravereport und Customconnection
 
Tatsächlich!!! Super!!!

Danke Dir für die Schnelle Antwort!!!
MfG. Alex

merlin17 3. Mai 2007 16:05

Re: Problem mit Ravereport und Customconnection
 
gern' geschehen
Zitat:

Tatsächlich!!!
hat hier evtl. jemand nicht geglaubt, dass dies er Grund sein könnte :coder2:
es heisst der "ungläubige Thomas" und nicht der "ungläubige Alex" <g>



:-) thomas, TeamNevrona


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