Quickreport: Daten (nicht aus DB) in einem Band ausgeben?

[daywalker-dj-k]

hallo,
ich lese einige Daten aus einer db aus und gebe diese auf einem band nacheinander aus. nun möchte ich mit diese daten auch verarbeiten und das ergebnis dieser Verarbeitung ebenfalls in diesem band ausgeben. wie kann ich das realisieren? oder kann man nur die daten aus der db ausgeben?

danke
gruß
tkliewe

[BluesKid]

Moin moin

Vieleicht kannst du dein Problem etwas genauer beschreiben.

Generell kann man die QuickReport Komponenten auch direkt ansprechen.

 QRLabel1.caption := 'Hallo Welt' schönen Gruß

Sam

[daywalker-dj-k]

hallo,
das ganze ist nicht so einfach in worte zu fassen:

mal ein beispiel:

ich lese aus einer db einen wert aus, der entweder "a" oder "b" lauten kann. nun soll ein label in dem bank bei "a" den text "hallo" ausgeben, bei "b" soll "hallihallo" ausgegeben werden. ich möchte also mit den daten aus der db arbeiten.

gruß
tkliewe

[BluesKid]

Moin moin

geht ist relativ simpel.

Was du brauchst ist das Ereignis BeforePrint eines QRBands oder eines QRLabels. Da kannst du ja dann mittels ner if Anweisung den Inhalt des DB-Feldes Festellen und dann entsprechend den Text in einem Label änder oder was auch immer passieren soll.

Beispiel (hier mit nem QRBand auf dem ein QRLabel ist):

Delphi-Quellcode:

procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
  if ADOTable1.fieldbyname('AB').text = 'a' then QRLabel1.caption := 'Hallo'
  else QRLabel1.caption := 'HalliHallo';
end;

schönen Gruß

Sam

[daywalker-dj-k]

hallo,
vielen dank. werd es direkt mal testen.
gruß
tkliewe