Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Spalte hinzufügen zu gefülltem TDataSet (https://www.delphipraxis.net/53069-spalte-hinzufuegen-zu-gefuelltem-tdataset.html)

smudo 9. Sep 2005 13:18


Spalte hinzufügen zu gefülltem TDataSet
 
Hallo :hi: ,

wenn ich mittels
Delphi-Quellcode:
DS.Close;
DS.FieldDefs.Add(header,ftVariant);
DS.Open;
die Spaltenanzahl eines TDataSet erhöhe, wird dabei der
Inhalt des DataSet gelöscht.

Welche Variante gibt es, den Inhalt bei Änderung der Spaltenanzahl beizubehalten?

Danke im Voraus

René

edit: close und open vergessen

alzaimar 9. Sep 2005 13:22

Re: Spalte hinzufügen zu gefülltem TDataSet
 
Na:
1. Copy dataset to X
2. Add Field to Dataset
3. Copy X to dataset

smudo 9. Sep 2005 13:55

Re: Spalte hinzufügen zu gefülltem TDataSet
 
Danke, klingt logisch :zwinker:

Nur, wie soll ich das anstellen?

Bernhard Geyer 9. Sep 2005 14:07

Re: Spalte hinzufügen zu gefülltem TDataSet
 
Erstelle deine Abfrage gleich mit diesen Spalten
SQL-Code:
SELECT *, 'A' as MyExtColumn1 FROM MyTable
Für ein nachträgliches Hinzufügen ist die TDataset-Schnittstelle nicht ausgelegt da sie mit Connected Datasets arbeitet.

smudo 9. Sep 2005 14:16

Re: Spalte hinzufügen zu gefülltem TDataSet
 
Zitat:

Zitat von Bernhard Geyer
Erstelle deine Abfrage gleich mit diesen Spalten

:shock: Ich arbeite mit keiner Datenbank - daher auch nicht mit SQL

Zitat:

Zitat von Bernhard Geyer
Für ein nachträgliches Hinzufügen ist die TDataset-Schnittstelle nicht ausgelegt da sie mit Connected Datasets arbeitet.

:cyclops: Ok, deshalb die Sache mit dem Kopieren der Datasets.

Ich mache es mir einfach und benutze, da ich mit TJvMemoryData arbeite,
einfach CopyStructure, SaveToDataSet und LoadFromDataSet.

Danke nochmal

René


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:35 Uhr.

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