Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#8

Re: Datansatz alle Felder kopieren

  Alt 2. Nov 2005, 20:31
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;
Gruß
Hansa
  Mit Zitat antworten Zitat