procedure OnRowMove(Sender: TObject; FromPos, ToPos: Integer; var Accept: Boolean)
Назначение
Cрабатывает, когда пользователь переместил строку на новую позицию. Позволяет отменитиь перемещение.
Описание
В параметрах данного события присутствует параметр Accept, который позволяет отменить перемещение строки.
Пример
// запрещаем перемещать первую строку в самый конец
procedure Form1_TableGrid1_OnRowMove (Sender: TObject; FromPos, ToPos: Integer; var Accept: Boolean);
begin
if (FromPos=0) and (ToPos = Form1.TableGrid1.RowCount-1) then
begin
Accept := False;
ShowMessage('Нельзя первую строку перемещать в конец.');
end;
end;