Перейти к содержанию
Fire Monkey от А до Я
  • 0

Максимальный размер для компонентов


Шамсуддин

Вопрос

Как можно задать максимальный размер для компонентов с заданным align? Например, у меня есть Listbox, у него задан align=top и мне нужно, чтобы при достижения определенной ширины, он перестал расширяться.

Ссылка на комментарий

Рекомендуемые сообщения

  • 0
29 минут назад, ZuBy сказал:

использовать Anchors вместо Align, и в OnResize следить за размером

Во-во!. Лучше не придумаешь. Никакого дополнительного выравнителях как в QT и т.п. фраемворках.

Ссылка на комментарий
  • 0

wamaco, но тогда его вообще не возможно будет изменить. Мне нужно чтобы при достижении определенного значения ListBox перестал расширятся, а так сужаться он может хоть до 0.

ZuBy, попробую этот способ. Я уже однажды делал так, но не срабатывало, наверное, потому что у меня был задан Align. 

Изменено пользователем Шамсуддин
Ссылка на комментарий
  • 1
30 минут назад, Шамсуддин сказал:

не срабатывало, наверное потому, что у меня был задан Align. 

Алигн не помеха Маржину. 

procedure TForm1.FormResize(Sender: TObject);
begin
  if (Form1.ClientWidth > 500) then
    Memo1.Margins.Right := Form1.ClientWidth-500
  else
    Memo1.Margins.Right := 0
end;

 

Изменено пользователем POV
Ссылка на комментарий
  • 0
3 часа назад, Шамсуддин сказал:

wamaco, но тогда его вообще не возможно будет изменить. Мне нужно чтобы при достижении определенного значения ListBox перестал расширятся, а так сужаться он может хоть до 0.

ZuBy, попробую этот способ. Я уже однажды делал так, но не срабатывало, наверное потому, что у меня был задан Align. 

сужаться будет, расширяться только до указанного значения!

Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...