Eliminando items de un Grid

[Neftali [Germán.Estévez]]

Debería bastar con añadir al princippio de la función EliminarLinea las siguientes líneas:

Código Delphi [-]
  if (ARow = 0) or (Grid.RowCount = 1) then
    Exit;

Evitas que lo llamen con la línea 0 como parámetro 0 con otro valor pero cuando sólo queda 1.