Foros Club Delphi - selección múltiple en dbgrid

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - selección múltiple en dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=9180)

selección múltiple en dbgrid

Hola tengo un grid en que se muestran las filas de una tabla,y lo que quiero hacer es que el usuario pinche en varias filas a la vez y una vez que estean seleccionadas todas se realice una opción con cada una de las filas que tengo seleccionadas, como puedo hacer?

pero no es lo mismo que preguntaste aquí ???? :confused:

Debes incluír la opción dgMultiSelect en la propiedad Options, despues para averiguar cuáles son las filas seleccionadas, tienes que usar los SelectedRows.

Ejemplo extraído de la ayuda de Delphi 5:

Código:

procedure TForm1.Button1Click(Sender: TObject);

var

  i, j: Integer;

  s: string;

begin

  if DBGrid1.SelectedRows.Count>0 then

    with DBGrid1.DataSource.DataSet do

      for i:=0 to DBGrid1.SelectedRows.Count-1 do

      begin

        GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));

        for j := 0 to FieldCount-1 do

        begin



          if (j>0) then s:=s+', ';

          s:=s+Fields[j].AsString;

        end;

        Listbox1.Items.Add(s);

        s:= '';

      end;

end;

Saludos!