Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Performance TpFIBDataset (https://www.delphipraxis.net/122867-performance-tpfibdataset.html)

exilant 27. Okt 2008 09:14

Re: Performance TpFIBDataset
 
Zitat:

Zitat von nachti1505
Mein letzter Verdacht bezieht sich nun auf meine FIB-Version. Bin immer noch TRIAL-User. Ist es vllt.möglich, dass Devrace die TRIAL von der Performance her beschränkt hat???

Die Trial entspricht der Vollversion. Du musst den Fehler woanders suchen. Die grundlegenden Mechanismen von FIB, UIB und IBX sind sich sehr ähnlich. Der Grund für Deine extrem unterschiedlichen Mess-Ergebnisse ist nicht in den Komponenten zu suchen. Hast Du vielleicht eine eigene Klasse von TpFibDataset abgeleitet und wenn ja, was tut die? Was macht die Datenbankkiste sonst noch so? Wie hoch ist die CPU Auslastung? Was ist das überhaupt für eine Kiste? Fragen über Fragen...

nachti1505 27. Okt 2008 09:52

Re: Performance TpFIBDataset
 
Nachdem Hansa ja die Ursache auf NICHT-MEHR-VORHANDENE Grids oder Fehler meinerseits schiebt, nochmal ein Versuch zur Problembehebung / -lokalisierung!

1.) Neue VCL-Anwendung
2.) pFIBDatabase, pFIBTransaction, pFIBDataset auf Formular gesetzt und verbunden
3.) in pFIBDataset SQL-Anweisung generiert (SELECT name1, name2, name3, strasse, ort, .... FROM adresse)
4.) Button auf Formular gesetzt und im OnClick:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
    debug: cardinal;
begin
  debug := GetTickCount;
  pFIBDataset1.Active := true;
  while NOT pFIBDataset.EOF do begin
    for i := 1 to 10 do
      pFIBDataset1.Fields[i].AsString;

    pFIBDataset1.Next;
  end;
  pFIBDataset1.Active := false;
  ShowMessage(IntToStr(GetTickCount - Debug));
end;
5.) Ergebnis: bei ca. 3k Datensätze knappe 3500ms

Ergo keine Besserung, trotz ORIGINAL-Kompos (nichts abgeleitet) und selbst OHNE irgendwelche Grids.

Selbiger Testlauf mit JvUIB oder IBX brachte die gewohnten niedrigen Laufzeiten...

Ob ich mich mal an Devrace wende? Oder hat von euch noch einer eine Idee...

BTW: Werde das heute nachmittag noch in einer VirtualMachine probieren *gruebel*

exilant 27. Okt 2008 12:26

Re: Performance TpFIBDataset
 
Zitat:

Zitat von nachti1505
Nachdem Hansa ja die Ursache auf NICHT-MEHR-VORHANDENE Grids oder Fehler meinerseits schiebt, nochmal ein Versuch zur Problembehebung / -lokalisierung!

1.) Neue VCL-Anwendung
2.) pFIBDatabase, pFIBTransaction, pFIBDataset auf Formular gesetzt und verbunden
3.) in pFIBDataset SQL-Anweisung generiert (SELECT name1, name2, name3, strasse, ort, .... FROM adresse)
4.) Button auf Formular gesetzt und im OnClick:
Delphi-Quellcode:
// Delphicode
5.) Ergebnis: bei ca. 3k Datensätze knappe 3500ms

Exakt gleicher obiger Test ergibt bei mir bei 4873 Records eine Laufzeit < 1 Sec.
Bei Dir satte 3,5 Sek. Immerhin ist das Faktor 10 schneller als Deine letzte Angabe (35.000 ms) aber immer noch nicht schnell.
Vermutlich hast Du einfach eine schwächere Maschine. Setze mal das "Unidirektional" Property im TpFibdatset auf "True". Dann
verhält sich das Dataset quasi wie ein tpFibQuery. Bei mir ist die Schleife dann Faktor 3 schneller. Bringt in diesem Fall aber "nur" objektiv was, da die Schleife auch vorher schon sehr schnell durchlaufen wurde und es somit subjektiv keinen Unterschied macht ( bei mir).


Nachtrag:

Der gleiche Test in einer VM (VMWare Workstation 5.5.6) verdeutlicht den erheblichen Unterschied:

Unidirektional False: 3,7 Sek.
Unidirektional True: < 1 Sek.

Ich tippe also mal darauf, das tpFibdataset tatsächlich eher lahm ist. Bei dem was das Teil leistet allerdings auch nicht weiter verwunderlich. Erinnert mich an das "ttable" Syndrom.

Das heisst im Klartext: tpFibDataset nur benutzten, wenn eine "Live"-Datenmenge benötigt wird. Bei mir ist das praktisch nie der Fall. Ich arbeite nicht mit datengebundenen Komponenten. Weiterhin braucht kein Mensch ein lebendes Dataset mit 3500 Records/Rows
Ich würde über das Design der Anwendung nachdenken.

nachti1505 28. Okt 2008 12:41

Re: Performance TpFIBDataset
 
:oops: :wall:

Hmmm.... letzter Testlauf

6k Datensätze - Zeit 400ms..... also weit < 1s

Habe damals für die DB das CharSet UTF8 verwendet. Nachdem nun alles auf WIN1251 zurückgestellt wurde, ist auch die Performance wieder da.....

Vielen, vielen Dank an Deddyh, exilant und auch an Hansa...

Hansa 28. Okt 2008 18:36

Re: Performance TpFIBDataset
 
Zitat:

Zitat von nachti1505
6k Datensätze - Zeit 400ms..... also weit < 1s

trotzdem zu lange, oder sind Blobs oder andere größere Datanstrukturen vorhanden ?

Zitat:

Zitat von nachti1505
Habe damals für die DB das CharSet UTF8 verwendet. Nachdem nun alles auf WIN1251 zurückgestellt wurde, ist auch die Performance wieder da....

Sofern sich das wirklich reproduzieren lässt, dann melde das Devrace. Oder sogar dem Firebird-Projekt. Besser wäre es allerdings, die DB füt Testzwecke hier zur Verfügung zu stellen.

exilant 29. Okt 2008 08:27

Re: Performance TpFIBDataset
 
Zitat:

Zitat von Hansa
Zitat:

Zitat von nachti1505
6k Datensätze - Zeit 400ms..... also weit < 1s

trotzdem zu lange, oder sind Blobs oder andere größere Datanstrukturen vorhanden ?

Wieso lange? Das sind 6.000 Records in weinger als einer halben Sekunde. Wie schnell sollte es denn Deiner Meinung nach sein?


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:36 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz