TDBGrid, TBookmarkList

[Thanatos81]

Guten Morgen DP!

Ich hab hier ein Projekt mit nem TDBGrid mit MultiSelect := true. Die Benutzer können nun mehrere Berichte markieren und eine Auswertung darüber erhalten oder Massenänderungen vornehmen.

Jetzt ist allerdings der unangenehme Effekt, dass beim GotoBookmark der Sprung im DBGrid sichtbar ist. Und diese Anzeige kostet bei ca. 10.000 Datensätze natürlich Zeit und sieht auch nicht wirklich schick aus.

Ausschalten per DBGrid.DataSource.DataSet.DisableControls oder DBGrid.DataSource := nil ist natürlich auch nicht möglich, da die TBookMarkList ja vom DBGrid gehalten wird.

Gibt es einige Möglichkeit aus DBGrid.SelectedRows.Items[i] Informationen über den Datensatz zu beziehen, ohne ihn zum aktuellen zu machen? Die RecNo würde mir ja schon reichen, oder ein Feldwert....

Danke im Voraus,

[Sourcemaker]

Vielleicht wäre es eine Möglichkeit die Datenbank ein zweites Mal zu öffnen
und die Sprünge in dieser Datenbank vorzunehmen.
Vorraussetzung ist natürlich das die 2. Db etwas mit den Bookmark der 1 Db anzufangen
weiß.

Grüße

Frank

[Thanatos81]

Ich habe es gerade folgendermaßen gelöst: ich setze einfach DBGrid.Visible auf false, dadurch hab ich eine Beschleunigung um ca. 20 Sekunden erreicht.

Danke für deine Antwort Soulmaker, ich hatte erst auch an eine zweite TTable gedacht, da aber das Netzwerk beim Kunden fast dauernd unter Volllast steht, wollte ich die Daten kein zweites Mal abrufen. Aber eventuell wird dort demnächst ein neues Netzwerk installiert, dann wäre das eine Überlegung wert.

[Sourcemaker]

Wenn Du sagst die Bookmarklist geht verloren nachdem Du DisableControls
ausgeführt hast könntest Du die Bookmarklist (Grid.SelectedRows) vorher
sichern.

Gruß

Frank

[Thanatos81]

Das hab ich schon versucht, allerdings muss beim Create einer TBookMarkList ein DBGrid übergeben werden. Und wenn ich mir DBGrid.SelectedRows.Items[i] (ist ein String) anschaue, ist dieser immer leer, selbst wenn alle Datensätze markiert sind...

[Sourcemaker]

Als Alternative:
Bei meiner Db kann ich den RecNo direkt über:

Delphi-Quellcode:

nRecNo := integer(Pointer(DBGrid.SelectedRows.Items[i])^)

ermitteln.

Gruß

Frank

[Thanatos81]

Ui! Das wäre genial, ich probiers mal nach der Mittagspause aus, Danke!

[marsupilami79]

So 'ne Bookmark ist doch eigentlich auch nur 'n String. Sichere das ganze doch in 'nem dynamischen Array oder 'ner TStringList und mach dann DisableControls.

[VizeTE]

Zitat:

Zitat von marsupilami79

So 'ne Bookmark ist doch eigentlich auch nur 'n String. Sichere das ganze doch in 'nem dynamischen Array oder 'ner TStringList und mach dann DisableControls.

Ich habe genau das selbe Problem und habe es wie vorgeschlagen gelöst. Das funktioniert soweit auch. Aber irgendwie kommt mir die Lösung etwas wacklig vor. Irgendwer wird sich ja sicherlich etwas dabei gedachte haben die Bookmark-Liste zu löschen falls die Controls deaktiviert werden.

Kann jemand etwas zu dieser Variante sagen (ist stabil/nicht stabil) oder hat vielleicht jemand einen anderen Lösungsansatz?

Vielen Dank!