Datensatz manuell einfügen!

[Goldesel]

Hallo,

ich habe folgendes Problem: Ich möchte gerne wenn auf Button1 geklickt wird, in zwei Tables etwas einfügen. Einmal alle DBEdits: Das bekomm ich dann auch noch hin über den Befehl post. Doch in die zweite datenbank sollen nur zwei Felder eingefügt werden? Wie kann ich das umsetzen?

Danke schon mal im Vorraus
Jannik

[Ulf346C]

Dein Problem ist mir jetzt nicht so ganz klar...

ich vermute mal, du hast zwei dbEdit-Objete, deren Inhalt in zwei verschiedene Tabellen gespeichert werden soll ?

Ich würde das so machen:

im Objektinspektor der ersten Tabelle eine Ereiiignisbehandlungsroutine auf "AfterPost" ("nach dem speichern") erstellen. In dem Programm kopierst du die beiden Felder aus der ersten Tabelle in die zweite:

Delphi-Quellcode:

procedure TForm1.Table1AfterPost(DataSet: TDataSet);
begin
  table2.edit;
  table2.fieldbyname('Name').asString := table1.fieldbyname('name').asString;
  table2.fieldbyname('Alter').asInteger := table1.fieldbyname('Alter').asInteger;
  table2.post;
end;

[Goldesel]

Ja nicht ganz so wie du das beschrieben hast, aber dein Code bringt mich schon sehr viel weiter. Meine frage ist somit also beantwortet. Danke!!!