Fastreport druckt Stringliste nicht

[Hansa]

Moin,

habe hier einen Fastreport und will damit eine Stringliste drucken. Relevanter Sourcecode :

Delphi-Quellcode:

procedure TfrmFrDruck.btnDruckenClick(Sender: TObject);
begin
  Memo1.Lines := slZeilen;
  StringDS.RangeEnd := reCount;
  StringDS.RangeEndCount := slZeilen.Count;
  frDruck.ShowReport;
end;

procedure TfrmFrDruck.StringDSGetValue(const VarName: string;
  var Value: Variant);
begin
//  if CompareText(VarName, 'element') = 0 then
  Value := slZeilen[StringDS.RecNo];
end;

Das ist mehr oder weniger aus der Demo PrintStringlist abgekupfert. StringDS ist dabei ein TfrxUserDataset. slZeilen ist die Stringliste und die zeigt mir ein Memo auch gefüllt an. Das GetValue soll ja wohl die Werte übergeben, aber da landet das Programm nie und dementsprechend ist der Report leer. Wo ist da ein Fehler oder wo muss noch was eingestellt werden ?

Und dann noch das CompareText. Wozu das ? Wo kommt 'element her' ? Wo reCount herkommt ist auch nicht klar. Sorry, aber die Fastreport-Demos sind unter aller Sau. Da erzählt man jedem Anfänger, dass der Quelltext zu kommentieren ist. Die Herrschaften von Fastreport haben das aber nicht mal in ihren Demos nötig.

[borncrush]

Hallo,

na als erstes ändert sich ja dein "[StringDS.RecNo]" ja nie. Wodurch auch?

Die Methode StringDSGetValue ruft nur festkodierte Parameter auf.

Beispiel, im Report hat ein Textfeld den Inhalt "[TestParam]". So würde dann folgender Methodenaufruf aussehen:

Delphi-Quellcode:

if CompareText(VarName, 'TestParam') = 0 then
  Value := slZeilen[2]; //fester Aufruf zum ItemIndex

Um eine dynamische Anzahl von Zeilen im Report darzustellen, wäre die Arbeit mit einem Dataset einfacher und tendenziell wartbarer.

EDIT: Ach es gibt ja wirklich eine druckbares StingSet.
Hast Du auch im Report den DataSet im MasterData auch auf das StringDS gesetzt?

[Hansa]

'Das da kann man kaum lesen. ' Das betrifft jetzt borncrush.

[Lemmy]

Hi Hansa,

Zitat von Hansa:

Und dann noch das CompareText. Wozu das ? Wo kommt 'element her' ?

Element ist der Name der Variable, die irgend wo im Report einem TfrxMemo zugewiesen ist. Wenn das nicht der Fall ist (sprich es gibt keine Variable), dann wird auch nix gedruckt...

Zitat von Hansa:

Wo reCount herkommt ist auch nicht klar.

Aber Hansa Nennt sich benannte Konstante.... Vielleicht ist es auch ein Enum... Jedenfalls eine Einstellung von FastReport. Kannst Du auch beim TfrxUserDataset direkt im Objektinspektor einstellen...

Zitat von Hansa:

Sorry, aber die Fastreport-Demos sind unter aller Sau. Da erzählt man jedem Anfänger, dass der Quelltext zu kommentieren ist. Die Herrschaften von Fastreport haben das aber nicht mal in ihren Demos nötig.

Sicher, die kennen ihren Code auch so - ohne Doku... Sprich: oft genug im Forum fragen, Supportcase eröffnen, irgend wann werden die hoffentlich auch ihre Doku verbessern...

[Hansa]

StringDS dem Report als Dataset zuzuweisen nützt nichts. Und das mit der RecNo ist vorerst irrelevant. Denn das StringDSGetvalue wird ja erst gar nicht erreicht. Vorerst also auch egal, was da drinsteht.

Zitat von Lemmy:

Element ist der Name der Variable, die irgend wo im Report einem TfrxMemo zugewiesen ist. Wenn das nicht der Fall ist (sprich es gibt keine Variable), dann wird auch nix gedruckt...

Welche Variable muss denn dem TfrxMemo zugewíesen werden ? Auf dem Report selbst liegt ein Masterdata-Band und da drauf ein TfrxMemoView. Welche Variable muss ich jetzt was und wo zuweisen ?

[Lemmy]

Hansa, ist das ein Demoprojekt? Dann stell es doch mal rein.

Normal solltest Du eine Variable definieren (im Reportdesigner: Report - Variables) und dann im frxMemo diese Variable einfach zuweisen (doppelklick rein und dann halt über den Editor auswählen, so wie Du ein Datenfeld auswählst - diesmal halt nur eine Variable)

[Hansa]

Keine Demo, eher Test. Trotzdem Zwischenfazit : mit D7 und dem vielgeschmähten Quickreport wäre das das da schon längst fertig. Und der vielgerühmte Fastreport ist alles andere als gut. Schlecht zu durchblicken, miese Demos, mittelmässige und halbfertige Dokumentation.

[Lemmy]

Zitat von Hansa:

Trotzdem Zwischenfazit : mit D7 und dem vielgeschmähten Quickreport wäre das das da schon längst fertig.

das mag bei dem "Report" sein. Schon mal Steuermarkierungen für Kouvertiermaschinen mit Quickreport ausgedruckt?

Anbei die Korrektur:

1. Du musst das UserDataset in den Report aufnehmen und dem Masterband zuweisen (wie ein "normales" Dataset)
2. Du willst ein Feld drucken, also das im UserDataset definieren und keine sieben Felder
3. alle Methoden des UserDataset implementieren: CheckEOF, Prior, ....
4. Dem FrxMemo das Feld zuweisen...

und dann klappts auch mit dem drucken...