DeleteSQL

[Luckner]

Hinter "DataArtikelStanzen.IBDatabaseArtikelStanzen" verbirgt sich ein Dataset. Komisch, ich habe es schon so einigemale benutzt ohne Probleme. Auch ohne dem "where ...". Habe auch für ARTIKEL_ID eine 3 gesetzt, wie in der Tabelle. QuotedStr ist falsch an dieser Stelle (war nur ein Versuch).Immer wieder der selber Fehler.

Hier noch ein Beispiel:

Delphi-Quellcode:

  DataModuleAlternativMaterial.MatZuKunden_Grid.Close;
  DataModuleAlternativMaterial.MatZuKunden_Grid.DeleteSQL.Clear;
  DataModuleAlternativMaterial.MatZuKunden_Grid.DeleteSQL.Text := 'DELETE FROM MATZUKUNDEN WHERE MATERIALID LIKE ' + IntToStr(selectmaterial);
  DataModuleAlternativMaterial.MatZuKunden_Grid.Open;

und es funktioniert.

Delphi-Quellcode:

  DatamodulePlannung.DataModule5.IBDataSetGridPlannung.Close;
  DatamodulePlannung.DataModule5.IBDataSetGridPlannung.DeleteSQL.Clear;
  DatamodulePlannung.DataModule5.IBDataSetGridPlannung.DeleteSQL.Text := 'delete from PLANUNG';
  DatamodulePlannung.DataModule5.IBDataSetGridPlannung.Open;
  DatamodulePlannung.DataModule5.IBDataSetGridPlannung.Delete;

auch das funktioniert.