Eintrag aus Datenbank löschen

[t0mmy]

Ich liste eine Tabelle in der DBGrid auf.. jetzt makier ich einen eintrag und möchte diesen markierten Eintrag löschen? Kann mir jemand einen Hinweis geben?

[DeddyH]

Am DBGrid hängt im Normalfall ja eine Datasource, an der wiederum ein Dataset hängt. Und dem kannst Du mitteilen, dass der Datensatz, auf dem aktuell der Datensatzzeiger steht, gelöscht werden soll.

[t0mmy]

Nein, hab keine gehabt, aber jetzt hab ich eine hinzugefügt. Wie sag ich dem DataSet nun das er den markierten Eintrag in der DBGrid löschen soll.

[Union]

Häng auch einen DBNavigator an die Datasource oder führe Delete aus (am besten mit einer Abfrage an den Benutzer vorher).

[DeddyH]

Was heißt denn "Löschen" auf Englisch? Delete, oder? Wie könnte es also lauten?

Delphi-Quellcode:

DBGrid.Datasource.Dataset.Delete;

[t0mmy]

Okay, kann ich der Dataset sagen das wenn ich die Werte aus der DBGrid in Edit felder reinschreibe, diese dann auch überspeichern soll?

[DeddyH]

Wie meinen?

[Union]

Dafür solltest Du dann datensensitive Elemente (TDBEdit) verwenden. Bei diesen hast Du ebenfalls eine Eigenschaft DataSource.

[DeddyH]

Japp, damit kann man im Extremfall eine komplette Anwendung "programmieren", ohne auch nur eine einzige Zeile Code selbst schreiben zu müssen.

[Sir Rufo]

Zitat:

Zitat von DeddyH (Beitrag 1124340)

Am DBGrid hängt im Normalfall ja eine Datasource, an der wiederum ein Dataset hängt. Und dem kannst Du mitteilen, dass der Datensatz, auf dem aktuell der Datensatzzeiger steht, gelöscht werden soll.

Zitat:

Zitat von t0mmy (Beitrag 1124343)

Nein, hab keine gehabt, aber jetzt hab ich eine hinzugefügt. Wie sag ich dem DataSet nun das er den markierten Eintrag in der DBGrid löschen soll.

Hmmm, ein TDBGrid ohne TDataSource mit Werten zu füllen ist auch schon eine Kunst :mrgreen:

[xan553]

also meines wissens nach und nach meiner wissenserweiterung in meinem letzten trhread würde folgendes passen:

DBGrid = DBG1
DBTable = Tbl1
Lösch Button = BtnDelDB

die Table mit der DB verbinden, das grid mit dem table verbinden und dann:

Delphi-Quellcode:

procedure TForm1.BtnDelDBClick(Sender: TObject);
begin
  if DBG1.SelectedRows <> nil 
  then
  begin
    Tbl1.Delete;
    Tbl1.Edit;
  end;
end;

oder irre ich mich?

[haentschman]

Hallo...

Delphi-Quellcode:

procedure TForm1.BtnDelDBClick(Sender: TObject);
begin
  if DBG1.SelectedRows <> nil then
  begin
    Tbl1.Delete;
  end;
end;

so ist´s besser. Das DELETE wird mit einem POST abgeschlossen. Das EDIT wird nicht benötigt, es sei denn, daß der nächste Datensatz in den Bearbeitungsmodus versetzt werden soll. Dann gehört aber ein POST noch irgendwohin... :zwinker:

[Union]

Und ganz cool wäre noch Exceptionhandling.

[Sir Rufo]

Un damit auch wirklich das gelöscht wird, was man angezeigt bekommt ... und auch löschen kann:

Delphi-Quellcode:

procedure TForm1.BtnDelDBClick(Sender: TObject);
begin
  if DBG1.SelectedRows <> nil then
    if DBG1.DataSource.DataSet.CanModify then
      DBG1.DataSource.DataSet.Delete;
end;