Excluir uma linha selecionada em StringGrid

Delphi

24/06/2003

Oi Colegas,
Após ter incluído vários items em uma StringGrid, quero deletar uma linha que será escolhida aleatóriamente.
Qual a melhor forma.


Oziasl

Oziasl

Curtidas 0

Respostas

Edmar Zatarin

Edmar Zatarin

24/06/2003

Colega,

Tenta isso e ve se resolve:

//verifica se há algo no grid
if (sgGrid.RowCount <= 2) or (trim(sgGrid.cells[0,sgGrid.row]) = ´´) then
Exit;

//puxando a linha de baixo
for i := sgGrid.row to sgGrid.rowcount do
begin
//puxando a linha
sgGrid.cells[0,i] := sgGrid.cells[0,i+1];
sgGrid.cells[1,i] := sgGrid.cells[1,i+1];
sgGrid.cells[2,i] := sgGrid.cells[2,i+1];
sgGrid.cells[3,i] := sgGrid.cells[3,i+1];
sgGrid.cells[4,i] := sgGrid.cells[4,i+1];
end;

//eliminando linha
sgGrid.rowcount := sgGrid.rowcount - 1;


GOSTEI 0
POSTAR