|
Для справки Rows[0] является типом TStrings и содержит построчно значения колонок первой строки. Менять их местами путем Rows[0].Move никакого нет смысла (оно и не даст). Правильнее делать так:
//первый вариант
begin
// Последний элемент все же имеет индекс RowCount-1
SG.Rows[n]:=sg.Rows[sg.RowCount-1]; // n - номер удаляемого ряда
SG.Rowcount:=Sg.Rowcount-1
end;
Здесь ряд замещается последним. А если надо сдвинуть выше все записи то придется это делать вручную таким же образом:
//второй вариант
for i:=n to SG.RowCount-2 do SG.Rows[i]:=sg.Rows[i+1];
SG.Rowcount:=Sg.Rowcount-1
// n - номер удаляемого ряда
__________________
sapienti sat.
|