Mehrere Datensätze löschen

[Seppel]

Hi ich möchte nicht immer einzeln und mühsam die Datensätze löschen sondern alle auf einmal.
Ich verwende ein Listview und da gibt es ja Checkboxen, daher könnte man das ja hiermit recht einfach lösen.

Bislang musste man es anklicken, also die ID und dann auf löschen und gelöscht ist es.


Hier der aktuelle Code.

Delphi-Quellcode:

begin
    dbMain.Hostname:=edServer.Text;
  dbMain.User:=edLogin.Text;
  dbMain.Password:=edPasswort.Text;
  dbMain.Database:=edDB.Text;
   dbMain.Connected:=True;

  try

    qrMain.SQL.Text:='DELETE FROM adressbuch WHERE id='''+edID.Text+''';';
    qrMain.ExecSql;
    finally
        dbMain.Connected:=False;
        Button6.Click;
        Button7.Click;
        end;

end;

Es ist ja momentan so, dass wenn man auf die ID im Listview klickt, dass der Inahlt, also alles zugehörige zur ID in Edit felder geladen wird, das muss ja dann abgeschaltet werden und mit checkboxes gemacht werden, nur momentan weiß´ich echt nicht wie ich das anstellen soll.
Bestimmt mit ner schleife, wenn ihr mir helft wäre das echt gut.
Ich probiere auch ma was. Das Problem ist erst mal dass die ID aus dem Listview ausgelesen wird und nicht aus dem Edit, da ja sonst immer nur eins gelöscht werden kann.

mfg
Seppel