Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];
ВнизПроблема с размерами ToolbarBurron и не только... Найти похожие ветки
← →
eSKey (2002-04-22 17:10) [0]Мне нужно в моей проге сделать такую возможность, чтобы она могла сворачиваться до размеров по высоте = тулбара+caption+statusbar и по ширине так, чтобы вмещать все кнопки на тулбаре. я делаю в MainForm.FormCreate следующее:
begin
//определяем системные габариты
yCaption:=getsystemmetrics(SM_CYCAPTION);
yFrame:= getsystemmetrics(SM_CYFRAME);
yFrame:=yFrame*2;
minYsize:=yFrame+yCaption+MyToolBar.ButtonHeight+MyStatusBar.Height;
minXsize:=MyToolBar.ButtonCount*MyToolBar.ButtonWidth
+getsystemmetrics(SM_CXFRAME)*2;
Потом где надо делаю height:=minYsize и width:=minXsize.
Это все замечательно пашет на том же разрешении, какое стоит у меня при написании (800х600). А на других компах, с более высоким разрешением, высота получается меньше - "съедается" несколько пикселов снизу кнопок, ширина вообще меньше раза в полтора.
Еще хуже с Grid"ом - для него у меня оба скроллбара включены. И опять же - они отбражаются на моем компе, и просто исчезают на других... :(
Помогите, плз!
← →
Malder (2002-04-22 17:22) [1]Вопрос у тебя путанный, пожалуйста, разъясни поподробнее.
Если тебе нужно узнать разрешение экрана, то используй Screen.Width и Screen.Height
← →
eSKey (2002-04-22 17:44) [2]
> Malder
Понимаешь, по идее мне должно быть фиолетово на разрешение экрана - ведь как я понимаю, getsystemmetrics возвращает нужные мне размеры именно для текущего разрешения во время выполнения. Я подозреваю, что дельфи оптимизирует там чего не надо, и заменяет вызов функции на константу :(
← →
Андрей Сенченко (2002-04-22 17:58) [3]В инспекторе объектов:
Form1.Scaled := false
возможно решит проблемы
← →
eSKey (2002-04-22 18:29) [4]
> Андрей Сенченко
Жаль сейчас проверить не могу :( Т.е. сам проект загрузил, но на другом компе, поэтому не могу судить о сохранении/искажении размеров. Однако при загрузке формы в дизайн моде наблюдал тоже съедение нижней границы - самим тулбаром. Выставил MyToolBar.AutoSize:=True (было фальс), он размер подогнал. Может от этого зависит?
С Grid"ом - Scrollbars стоит ssBoth, также Anchors:=[akLeft,akTop,akRight,akBottom] - при этом видно, что нижняя и правая границы уехали куда-то за форму (дома этого не было!). Выставил Align:=alClient - похоже стало нормально. Дома попробую, завтра напишу. А пока идеи приветствуются!
Спасибо.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c