Hallo,

hab eine Absolute DB mit nur ca.21.000 Datensätzen.Hab eine einfache Abfrage im frxUserDataset gemacht mit:Select ID, DEU, Preis from Dat
Das geht auch alles.Aber 21.000 Datensätze in der Vorschau mit Fastreports dauert ca. 10 min. 453 Seiten.

Daten zur ABS DB sind:

Page Size: 8112

Page count in Extent:128

Max Connections: 10

Crypto Algorithm: Rijndael 256
+ Passwort

Geht dies auch schneller?

Also bei mir wird ein Dummy-Report (4 Spalten) mit einem FrxuserDataset mit 21000 Records in ca. 0.01 Sekunden angezeigt.
Sind Bilder dabei?
Wie lange dauert die Query?
Wie verbindest Du die ADS-Query mit dem TfrxUserDataset?

Es sind keine Bilder und keine Blobfelder dabei.
Im Report habe ein Häckchen TfrxUserDataset.Dort wird direkt die Abfrage automatisch angezeigt.

Im frxUserDataset Objektinspektor mit:Select ID, DEU, Preis from Dat

Das war es schon.
ID=Autoid
Preis=Float
DEU=String

Ich bin vermutlich dumm wie Brot, aber ein TfrxUserDataset hat -zumindest bei mir- nix zum Anlegen einer Query. Da kann man einen 'OnGetValue' und ein 'OnCheckEof' Event setzen.

markieren

Delphi-Quellcode:

procedure TForm14.frxUserDataSetCheckEOF(Sender: TObject; var Eof: Boolean);
begin
  eof := frxUserDataSet.RecNo=21000;
end;

procedure TForm14.frxUserDataSetGetValue(const VarName: string;
  var Value: Variant);
begin
  value := intToStr(frxUserDataSet.RecNo)+':'+VarToStr(VarName);
end;

Man kann da noch 'OnNext' und 'OnPrior' setzen, aber ich brauch das hier für die Demo nicht. 'RecNo' zählt von alleine durch.

Hab mal ein Bildchen drangehangen.Bei mir im Objektinspektor kannste da was tun...

Ja. In 'Fields' trägt man die Feldnamen ein. Im Event 'OnGetValue' wird für jeden Record der Feldname übergeben und man muss 'Value' setzen. Stechickaufmschlauch?