Daten aus der Detailtabelle löschen

[shmia]

Du solltest das so machen, wie ich im Betrag #3 gezeigt habe; mit einer eigenen Methode.
Ausserdem solltest du eine eigene Query nur zu dem Zweck des Löschens vorhalten:
Dein Problem ist, dass du die Query TdbQuery1 einerseits zum Anzeigen und andererseits zum Löschen verwenden willst.

Delphi-Quellcode:

// Lösche in Tabelle Logs alle Datensätze die den gccode haben
procedure TForm1.DeleteLogs(const gccode:string);
begin
  QueryDelLogs.SQL.Text := 'delete from logs where gccode='+QuotedStr(gccode);
  QueryDelLogs.ExecSQL;
end;

[schlecki]

Zitat von shmia:

Delphi-Quellcode:

// Lösche in Tabelle Logs alle Datensätze die den gccode haben
procedure TForm1.DeleteLogs(const gccode:string);
begin
  QueryDelLogs.SQL.Text := 'delete from logs where gccode='+QuotedStr(gccode);
  QueryDelLogs.ExecSQL;
end;

Dann aber bitte gleich mit Parametern

Delphi-Quellcode:

// Lösche in Tabelle Logs alle Datensätze die den gccode haben
procedure TForm1.DeleteLogs(const gccode:string);
begin
  QueryDelLogs.SQL.Text := 'delete from logs where gccode = :gccode';
  QueryDelLogs.ParamByName('gccode').AsString := gccode;
  QueryDelLogs.ExecSQL;
end;

Das hat den Vorteil, dass SQL-Injection direkt erledigt ist, außerdem muss man sich um keinster Weise um Datum-Formatierungskram kümmern, weil man direkt den Parameter.AsDateTime setzen kann
Außerdem ergeben sich bei einigen DBMS auch Performance-Vorteile, wenn das Statement nur oft genug ausgeführt wird

[BBoy]

Danke für den neuen code, der ist wohl besser. Aber der Fehler kommt immer noch.

Wenn ich diese Anweisung: delete from logs where GCCode='GC1XZ2Q'
direkt in den sql editor der DB eingebe kommt ebenfalls eine Fehlermeldung in der die Anweisung wiederholt wird. mehr nicht.

Ich habe eine Datenbank mit 3 Tabellen, Tour, Logs und Wpts
Das Query ist mit der DB und der Datasource verbunden.

Diese Anweisung wird ordnungsgemäß ausgeführt: select GCCode from logs

Warum dann die Fehlermeldung bei Delete?

[Jumpy]

Zitat von BBoy:

Wenn ich diese Anweisung: delete from logs where GCCode='GC1XZ2Q'
direkt in den sql editor der DB eingebe kommt ebenfalls eine Fehlermeldung in der die Anweisung wiederholt wird. mehr nicht.

Benutzt du den QutodedSttring dabei oder wie das heißt? Falls nicht musst du auch

='delete from logs where GCCode=''GC1XZ2Q'''

schreiben oder halt noch besser mit Parametern arbeiten.

[DeddyH]

Welche Fehlermeldung kommt denn überhaupt? Dass der Datensatz nicht gelöscht werden kann? In dem Fall musst Du zuerst die abhängigen Detaildaten löschen.

[BBoy]

Zitat von Jumpy:

Zitat von BBoy:

Wenn ich diese Anweisung: delete from logs where GCCode='GC1XZ2Q'
direkt in den sql editor der DB eingebe kommt ebenfalls eine Fehlermeldung in der die Anweisung wiederholt wird. mehr nicht.

Benutzt du den QutodedSttring dabei oder wie das heißt? Falls nicht musst du auch
='delete from logs where GCCode=''GC1XZ2Q'''
schreiben oder halt noch besser mit Parametern arbeiten.

Das gebe ich so direkt als SQL anweisung in der Datenbank ein, da kann man die ' direkt machen.

Zitat:

Welche Fehlermeldung kommt denn überhaupt? Dass der Datensatz nicht gelöscht werden kann? In dem Fall musst Du zuerst die abhängigen Detaildaten löschen.

Es kommt ein Fenster "FEHLER: delete from logs where GCCode='GC1XZ2Q'" aber kein Hinweis was für ein Fehler.

Hier meine DB Struktur:
1 Datenbank mit 3 Tabellen:
(1) DataSource1 > TourTable = Mastertable
(2) DataSource2 > LogTable = Detailtable > MasterSource=DataSource1 MasterFields GcCode
(3) DataSource3 > WPtsTable = Detailtable > MasterSource=DataSource1 MasterFields GcCode

Die Datenbank ist Aktiv und alle Tabellen ebenfalls.
Wenn ich in TourTable einen Datensatz in einem DBGrid auswähle werden automatisch alle entsprechenden Datensätze in den beiden Detailtables selektiert.
Und eben genau dann möchte ich im Mastertable den Datensatz löschen mit den dazugehörigen Datensätzen in beiden Detailtables. Klar versuche ich erst die DEtailtables zu löschen und erst dann den Datensatz im Mastertable.

[Jumpy]

[QUOTE=BBoy;1104414]
Das gebe ich so direkt als SQL anweisung in der Datenbank ein, da kann man die ' direkt machen.
[QUOTE]

D.h. also: "Select * From logs where GCCode='GC1XZ2Q'" funktioniert?

Vllt. ist was mit den Rechten?

[BBoy]

ok komischerweise funktioniert das nun alles.

Danke für eure Hilfe.

Gibt es eine möglichkeit im code zu prüfen ob das löschen erfolgreich war nachdem ich TdbQuery1.ExecSQL; ausgeführt habe?