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; end;
end;
Tambien lo he hecho con esta linea
Código Delphi
[-]
GridProcedimientos.RemoveRows(GridProcedimientos.Row, GridProcedimientos.RowCount);
Agradezco el tiempo que le dedican a mi pregunta.