Duda con un DBGrid

[santi33a]

Saludos a todos:
Tengo un DBGrid con la propiedad de Options dgMultiSelect en true, esto me permite seleccionar varias lineas con Ctrl y el Mause, ahora quiesiera poner un botón donde alternativamente pudiera marcar o desmarcar todas las lineas del DBGrid.
¿ Alguien sabe como hacer esto por código ?

[jhonny]

Bueno, mira si te sirve la siguiente función:

Código Delphi [-]
procedure SeleccionarTodo(DBGrid :TDBGrid);
var
  Marca :TBookmark;
begin
  with DBGrid, DBGrid.DataSource.DataSet do
  begin
    Marca := GetBookmark;
    try
      First;
      while not Eof do
      begin
        SelectedRows.CurrentRowSelected := True;
        Next;
      end;
      GotoBookmark(Marca);
    finally
      FreeBookmark(Marca);
    end;
  end;
end;

Espero que te sirva .

[santi33a]

ok, voy a probar, pero lo que veo tiene sentido por lo que pienso que funcione, de todas maneras te comento cuando lo pruebe y muchas gracias por responder tan rápido