Добрый день,
Используйте TGridLayout. У него вы только указываете размер элемента (ItemWidth, ItemHeight). Далее этот компонент автоматчиески все дочерние контролы выстраивает в сетку с размером ячейки ItemWidth x ItemHeight
procedure TForm2.MoveRect(Rect: TRectangle);
begin
TAnimator.AnimateIntWait(Rect, 'Position.Y', 0);
TAnimator.AnimateInt(Rect, 'Position.Y', 152);
end;
Так вас не устроит?
Такая опция добавлена для пользователей. Поддерживаются два типа удалений:
Скрытие. Скрытие от пользователей вашего сообщений с возможностью восстановление. Скрытое сообщение доступно на просмотр модераторам и администраторам
Удаление. Полное удаление сообщение без возможности восстановить.