Einzelnen Beitrag anzeigen

Benutzerbild von wicht
wicht

Registriert seit: 15. Jan 2006
Ort: Das schöne Enger nahe Bielefeld
809 Beiträge
 
Delphi XE Professional
 
#4

Re: Mehrere Datensätze löschen

  Alt 16. Nov 2007, 14:21
Ungetestet hingeklatscht:

Delphi-Quellcode:
var
  i: integer;
  s: string;
begin
  s := 'delete from table where id in (';
  for i := 0 to listview.items.count - 1 do
    if listview.items[i].checked then
      if i = listview.items.count - 1
        s := s + inttostr(i)
      else
        s := s + inttostr(i) + ',';
  s := s + ')';
  
  // s sollte hier deine lösch-Abfrage sein.
end;
http://streamwriter.org

"I make hits. Not the public. I tell the DJ’s what to play. Understand?"
  Mit Zitat antworten Zitat