Forum: Programmieren allgemein
Delphi
by KodeZwerg,
14. Jun 2018
Soweit hab ichs nicht getestet, Ziel für mich war es eine Zeile wegzubekommen ohne Helfer. Wie man sieht überschreibe ich lediglich alles und lösch das letzte.
Forum: Programmieren allgemein
Delphi
by KodeZwerg,
14. Jun 2018
So klappts ohne Helfer
procedure DeleteSGRow(MyGrid: TStringGrid; iRow: Integer);
var
i: Integer;
begin
for i := iRow to MyGrid.RowCount - 2 do // kopiere alles unterhalb iRow
MyGrid.Rows.Assign(MyGrid.Rows); // nach oberhalb von iRow
MyGrid.RowCount := MyGrid.RowCount - 1; // entferne letzten Eintrag
end;
Beispiel-Aufruf DeleteSGRow(MyStringGrid, MyStringGrid.Row); für...