Scroll на форме - Общие вопросы Delphi

MasterofCDM · 24.02.2009, 15:43

Проблема возможно детская, но в поиске не нашел. При разрешении 800x600 низ формы не виден, как сделать скролинг формы, если разрешение низкое?

Bayazet · 24.02.2009, 15:55

Код:

Form1.BorderStyle := bsSizeable;
Form1.AutoScroll := true;

Пепел Феникса · 24.02.2009, 15:59

Bayazet
если Форма больше экрана то твоего метода недостаточно
поэтому нужно устанавливать размер формы в соответствии с экраном

mihali4 · 24.02.2009, 16:03

Совершенно верно. Например, вот так:

Код:

procedure TForm1.FormPaint(Sender: TObject);
begin
if Width>Screen.Width then
Width:=Screen.Width;
if Height>Screen.Height then
Height:=Screen.Height;
end;

Bayazet · 24.02.2009, 16:04

т.е. еще
Form1.AutoSize := true ?

MasterofCDM · 24.02.2009, 16:18

Спасибо большое!!!

24.02.2009, 15:43	#1
MasterofCDM Пользователь Регистрация: 02.07.2008 Сообщений: 94	Scroll на форме Проблема возможно детская, но в поиске не нашел. При разрешении 800x600 низ формы не виден, как сделать скролинг формы, если разрешение низкое?

24.02.2009, 15:55	#2
Bayazet Форумчанин Регистрация: 08.12.2008 Сообщений: 156	Код: `Form1.BorderStyle := bsSizeable; Form1.AutoScroll := true;`

24.02.2009, 15:59	#3
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Bayazet если Форма больше экрана то твоего метода недостаточно поэтому нужно устанавливать размер формы в соответствии с экраном Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

24.02.2009, 16:03	#4
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Совершенно верно. Например, вот так: Код: `procedure TForm1.FormPaint(Sender: TObject); begin if Width>Screen.Width then Width:=Screen.Width; if Height>Screen.Height then Height:=Screen.Height; end;`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Вопрос по scroll-ам	blackstersl	Общие вопросы Delphi	1	28.12.2008 20:43
Контроль Scroll Lock	Altera	Общие вопросы Delphi	14	08.11.2008 16:35
Scroll в DBGrid и StringGrid	Roof	Компоненты Delphi	2	27.07.2008 17:46
Заставить мигать Scroll Lock	snegok74	Общие вопросы Delphi	12	06.06.2008 14:02
scroll в webbrouser	MaslCS	Компоненты Delphi	4	23.01.2008 22:58

24.02.2009, 16:04	#5
Bayazet Форумчанин Регистрация: 08.12.2008 Сообщений: 156	т.е. еще Form1.AutoSize := true ?

24.02.2009, 16:18	#6
MasterofCDM Пользователь Регистрация: 02.07.2008 Сообщений: 94	Спасибо большое!!!