Ver Mensaje Individual
  #1  
Antiguo 31-03-2015
p1p3 p1p3 is offline
Registrado
NULL
 
Registrado: jul 2013
Posts: 9
Reputación: 0
p1p3 Va por buen camino
Como eliminar una o varias filas de un TAdvStringGrid

Saludos a todos los participantes del foro.

Por favor me pueden ayudar informándome como eliminar una o varias filas en un AdvStrigGrid, he encontrado respuestas en este foro y he tratado de implementarlo en mi código sin resultado alguno.

bueno, lo que hago es generar una o varias filas con sus respectivos checks.
Código Delphi [-]
GridProcedimientos.AddRow;
 for  i := 1 to GridProcedimientos.RowCount -1 do
    begin
      GridProcedimientos.AddCheckBox(0,i,False, True);
      GridProcedimientos.ReadOnly[1,i]:=True;
      GridProcedimientos.ReadOnly[5,i]:=True;
    end;
Hasta aquí todo bien...Cuando selecciono varios check y los quiero eliminar me elimina un solo o todos los registros, el código esta así:
Código Delphi [-]
for i:=1 to GridProcedimientos.RowCount do
 begin
    if GridProcedimientos.GetCheckBoxState(0,i,state)then
    begin
       if state then
           GridProcedimientos.RemoveSelectedRows;//esta linea solo elimina uno por uno
   end;
 end;
Tambien lo he hecho con esta linea
Código Delphi [-]
GridProcedimientos.RemoveRows(GridProcedimientos.Row, GridProcedimientos.RowCount);//esta elimina todas las filas

Agradezco el tiempo que le dedican a mi pregunta.

Última edición por nlsgarcia fecha: 01-04-2015 a las 01:46:27. Razón: Sintaxis Delphi
Responder Con Cita