Autor Beitrag
saxe66
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 104



BeitragVerfasst: Mo 07.07.03 13:16 
Ich will folgendes Problem lösen.
Auf einem Form habe ich mittels zweier DBGrids zwei Tabellen angezeigt.
Nun will ich eine Art Drag and Drop realisieren, indem Felder der gewählten Tabelle in die andere Tabelle eingefügt werden, wobei die Feldnamen unterschiedlich sind.
Hat jemand schonmal sowas programmiert und wenn ja, könnte ich eine kleine Hilfe bekommen ?

Vielen Dank, Jens
BeniSchindler
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 82

Win 2k / suse9.1
D7 Prof / Kylix 3
BeitragVerfasst: Mo 07.07.03 13:27 
Holla,

das habe ich bisher schon öfters gemacht. Dafür muss man einfach ein bisschen mehr schreiben aber es ist doch eigentlich verdammt simpel.
Die einfachste Variante ist folgende:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
// insert data from Query1 into Query2
Query2.insert;
Query2.FieldByName('AA').AsString := Query1.FieldByName('AB').AsString;
Query2.FieldByName('BA').AsString := Query1.FieldByName('BB').AsString;
Query2.FieldByName('CA').AsString := Query1.FieldByName('CB').AsString;
//etc.
Query2.post;


Du kannst dir aber auch eine Insert-SQL-Query bauen lassen. Aber soweit ich weiss, kommst du um die Schreibarbeit nicht rum.

mfg

_________________
Result := 42; Application.ProcessMessages;