Datensatz mit Mausklick löschen

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Hallo NG,

ich habe ne Tabelle und möchte nun auf einen Mausdoppelklick einen Datensatz löschen. Problem dabei ist nun:

Ich habe zwar in dem DBGRID ein MausEreignis, nicht aber in der Tabelle. Wie kann ich also auf einen Klick mit der rechten Maustaste (in eine beliebige Zelle) den Datensatz, der gerade angewählt wurde, löschen ?

Gruss

Markus

smiegel · Verfasst: So 09.02.03 10:01

Hallo,

die Tabelle wird im Grid (das Grid stellt die Daten nur da) über die Eigenschaft DataSource.DataSet referenziert. Den aktuellen Datensatz kannst Du dann folgendermaßen löschen:

markieren

Quelltext

1:
2:
3:
4:
5:

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
  if (MessageDlg('Datensatz wirklich löschen?, mtConfirmation, [mbYes, mbNo], 0)=mrYes) then
    with TDBGrid(Sender) do DataSource.DataSet.Delete;
end;

_________________
Gruß Smiegel
Ich weiß, daß ich nichts weiß, aber ich weiß mehr als die, die nicht wissen, daß sie nichts wissen. (Sokrates)

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Hallo Smiegel,

vielen Dank, das klappt.

Gruss

Markus

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme