Datansatz alle Felder kopieren

[needatip]

Hallo,
wie kann ich alle Felder eines Datensatzes kopieren und in einen bereits bestehenden Datensatz kopieren ?
Ich möchte keinen neuen Datensatz anfügen, sondern die Feldinhalte sollen wie gesagt in den bestehenden Datensatz kopiert werden ?

[Union]

Wie wärs denn mit einem Array of variant, in das Du alle Feldinhalte reinschreibst und in den anderen Satz überträgst?

[Sharky]

Hai needatip,

ich stelle ersteinmal die Frage nach dem Sinn der Aktion ;-)

Wenn Du zwei exakt gleiche Datensätze in der Tabelle hast kannst Du diese auch nicht mehr selektiv abfragen da es ja keinen Unterschied gibt. Du hast also zweimal die selben Daten in der Tabelle und kannst doch nichts damit anfangen.

[needatip]

Nein, es sind keine Datensätze mit gleichen Feldinhalten.
Ich möchte lediglich beim Eintrag eines bestehenden Datensatzes erreichen, dass nicht alle Felder erneut eingegeben werden müssen, sondern dass nur nach dem Kopieren der Felder ein paar abgeändert werden müssen.

[Sharky]

Zitat:

Zitat von needatip

Nein, es sind keine Datensätze mit gleichen Feldinhalten.

*g* So war es aber in deiner ursprünglichen Frage gefordert ;-)

Zitat:

Ich möchte lediglich beim Eintrag eines bestehenden Datensatzes erreichen ...

Wir müssen uns ersteinmal einigen was Du, wie meinst.
Ein bestehender Datensatz wird ja in der Tabelle nicht eingetragen. Dieser wurde schon eingetragen.

Gerade beim formulieren einer Frage zum Thema "programmieren" ist es sehr wichtig das Problem so zu beschreiben das es "jeder" verstehen und nachvollziehen kann.

Beschreibe doch mal was aus der Sicht des Anwenders passieren soll. Dann finden wir sicher auch eine Lösung für dich als Entwickler.

[needatip]

Kann ich das so in etwa machen ?

Delphi-Quellcode:

var 
  Felder: array of variant; 
  i : integer; 
  FAnzahl : integer; 
begin 
    FAnzahl := Table1.fields.count -1; 
    for i := 0 to FAnzahl do 
    Felder[i] := Table1.fields[i].value; 
end;

..und wie kriege ich dann die Felder in den bestehenden Datensatz ?

Geht es vielleicht auch mit SQL ?

[needatip]

Also nochmals ganz von vorne.
Ich möchte Daten in eine Tabelle eintragen, die ca. 100 Datenfelder hat.
Ein anderer User trägt vorab nur die wichtigsten Daten in einen neuen Datensatz ein.
Dieser Datensatz wird dann schon mal in die Datenbank geschrieben.
Nach einer gewissen Zeit werden dann weitere Daten gesammelt.
Da nun Datensätze mit ähnlichen Daten vorkommen, sollen die Felder halt eben in den nächsten, aber bereits bestehenden Datensatz kopiert werden. Das soll halt Tipparbeit oder Kopierarbeit sparen !

[Hansa]

Gehen wir mal von Table1 (Dataset1) aus und die hat ein Feld Name. Dieser Name soll in Table2 (Dataset2) rein und zwar von allen Datensätzen. Ist das richtig ?

Also brauche ich zumindest alle Namen aus Table 1 :

Delphi-Quellcode:

Dataset1.close;  
Dataset1.SelectSQL.Text := 'SELECT NAME FROM TABLE1';  // oder * für alle
Dataset1.open;

Somit stehen die Daten bereit und ich gehe sie durch :

Delphi-Quellcode:

Dataset1.First;
while not Dataset1.EOF do begin
  Dataset2.Insert;  // Daten einfügen und  in DB Trigger für AutoID anlegen !
  Dataset2.FieldByName ('Name') := Dataset1.FieldByName ('Name');
... notfalls andere Felder auch noch besetzen
  Dataset1.Next;
end;

[needatip]

Hab ich verstanden. Ich möchte aber die Feldinhalte vom aktuellen Datensatz kopieren, dann zu einem bestimmten Datensatz gehen und dann diese Feldinhalte in diesen Datensatz einfügen.

[Hansa]

Was verstanden ? Sieht eher nach unvollständigem SQL-Wissen aus. Ich würde mich in der Richtung mal etwas schlauer machen. 8) Soll nur ein DS gesucht werden, dann muß WHERE her. Und dann geht es wie gesagt weiter :

Delphi-Quellcode:

Dataset1.close;  
Dataset1.SelectSQL.Text := 'SELECT NAME FROM TABLE1 WHERE ...';  // oder * für alle 
Dataset1.open;

Delphi-Quellcode:

Dataset2.FieldByName ('Name') := Dataset1.FieldByName ('Name');