Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: Mehrere Datensätze löschen

    Delphi
    by DeddyH, 16. Nov 2007
  Die ID ist die Beschriftung des ListItems? Dann ist das ja einfach.procedure TForm1.Button1Click(Sender: TObject);
  var i: integer;
  s: string;
  first: Boolean;
  SQL: string;
  begin
  s := '';
  first := true;
  for i := 0 to ListView1.Items.Count - 1 do
  if ListView1.Items.Checked then
• Forum: Datenbanken

  Re: Mehrere Datensätze löschen

    Delphi
    by DeddyH, 16. Nov 2007
  Ein Beispiel:procedure TForm1.Button1Click(Sender: TObject);
  var i: integer;
  s: string;
  first: Boolean;
  SQL: string;
  begin
  s := '';
  first := true;
  for i := 0 to ListView1.Items.Count - 1 do
  if ListView1.Items.Checked then
• Forum: Datenbanken

  Re: Mehrere Datensätze löschen

    Delphi
    by DeddyH, 16. Nov 2007
  Nur ein Denkansatz: zunächst in einer Schleife die ListView.Items durchgehen und auf Checked prüfen. Wenn Checked, dann eine Stringvariable setzen bzw. ergänzen. Nun im SQL das Gleichheitszeichen durch IN ersetzen und den zusammengesetzten String mit den kommaseparierten IDs in Klammern dahinterstellen, so dass das etwa so aussieht:DELETE FROM adressbuch WHERE ID IN (1,2,5,8,789);