2 sqlstr's gleichzeitig ausführen

[hoika]

Hallo,

Delphi-Quellcode:

  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
 
  sqlstr1 := 'INSERT INTO Zubehoer (Zubehoerbezeichnung) VALUES ("' + ed_zubehoer.text + '")';
 
  sqlstr2 := 'INSERT INTO Kombinationen (K_ZID, K_AID, K_Preis) VALUES (' + inttostr(ZubehoerIndex) + ', ' + inttostr(AutoIndex) +   ', ' + ed_Preis.Text + ')';

  ADOQuery1.SQL.Add(sqlstr1);
  ADOQuery1.ExecSQL;

  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add(sqlstr2);
  ADOQuery1.ExecSQL;

Heiko