Исчезающая боковая панель в Delphi.

Manfred · 15.10.2008, 10:49

Уважаемые знатоки Delphi, не подскажет ли кто - как реализовать сабж?
Хочу разместить там кнопки, переключатели и т.п., но при этом не тратилось пространство проги

Спасибо.

hack · 15.10.2008, 23:30

Смотри в компонентах.

demonical · 16.11.2008, 22:55

Да и самому можно написать. Мож, несколько и кривее выйдет, зато своё, проверенное будет.
Хотя бы добавить на форму панель (TPanel), размещать её при создании формы-"носителя" (onCreate) в, скажем правой части этой формы (вручную задав координаты Top по желанию и Left как, скажем, ширину формы минус некое число - это будет видимая часть панели). Высоту панели, соответственно, там же отрегулировать.
Обрабатывать событие наведения указателя мыши на видимую часть панели, как изменение левой координаты на (ширина формы - ширина панели). При уходе мыша с панели запускать таймер, через пару секунд меняющий координаты на обратные.
Ну а дальше, соответственно, улучшать, вводя плавность раскрытия панели (тож по таймеру можно), визуально обогатить панель.
Главное - желание. ;)

pua · 21.03.2009, 20:00

Тоже так делал. В принципе получилось неплохо.

Valdemar007 · 26.03.2009, 13:26

А версия какая делфи?

ERO1 · 23.04.2009, 07:00

Delphi 7, WinXPsp3

timber_wolf · 27.04.2009, 09:58

Знакомец у меня один написал такую - спрошу у него - если разрешит выложить, то ссылку кину

AsukaLangley · 23.06.2009, 15:32

Тоже интересует данный вопрос. Есть у кого пример или ссылка?

ultimate · 24.06.2009, 14:13

вообще должно получится чтото типа такого
_http://slil.ru/27786074

KovalenkoS · 25.06.2009, 13:14

tms component pack рулит!

nixstill · 14.01.2010, 11:45

Цитата:

Сообщение от ultimate


	вообще должно получится чтото типа такого _http://slil.ru/27786074

Если не затруднит, выложите снова. Тоже очень хочется взглянуть

ultimate · 15.01.2010, 22:59

Цитата:

Сообщение от nixstill


	Если не затруднит, выложите снова. Тоже очень хочется взглянуть

не затруднит
_http://slil.ru/28494179

Vasuha · 21.01.2010, 11:34

Недавно понадобилась такая вещь, реализовал вот так.
http://slil.ru/28523786
Правда с TMS.... они красивей, но принцип такой...

15.10.2008, 10:49	#1
Manfred Новичок Пол: Регистрация: 28.05.2008 Сообщений: 12 Репутация: 17	Исчезающая боковая панель в Delphi. Уважаемые знатоки Delphi, не подскажет ли кто - как реализовать сабж? Хочу разместить там кнопки, переключатели и т.п., но при этом не тратилось пространство проги Спасибо.

15.10.2008, 23:30	#2
hack Старожил Пол: Регистрация: 27.05.2005 Адрес: Тверь (Первомайка) Сообщений: 1,929 Репутация: 3260	Re: Исчезающая боковая панель в Delphi. Смотри в компонентах. __________________ У победы много отцов, поражение всегда сирота.

16.11.2008, 22:55	#3
demonical Неактивный пользователь Регистрация: 15.11.2008 Сообщений: 9 Репутация: 1	Re: Исчезающая боковая панель в Delphi. Да и самому можно написать. Мож, несколько и кривее выйдет, зато своё, проверенное будет. Хотя бы добавить на форму панель (TPanel), размещать её при создании формы-"носителя" (onCreate) в, скажем правой части этой формы (вручную задав координаты Top по желанию и Left как, скажем, ширину формы минус некое число - это будет видимая часть панели). Высоту панели, соответственно, там же отрегулировать. Обрабатывать событие наведения указателя мыши на видимую часть панели, как изменение левой координаты на (ширина формы - ширина панели). При уходе мыша с панели запускать таймер, через пару секунд меняющий координаты на обратные. Ну а дальше, соответственно, улучшать, вводя плавность раскрытия панели (тож по таймеру можно), визуально обогатить панель. Главное - желание. ;)

21.03.2009, 20:00	#4
pua Новичок Пол: Регистрация: 21.03.2009 Сообщений: 10 Репутация: 13	Re: Исчезающая боковая панель в Delphi. Тоже так делал. В принципе получилось неплохо.

26.03.2009, 13:26	#5
Valdemar007 Неактивный пользователь Регистрация: 26.03.2009 Сообщений: 8 Репутация: 1	Re: Исчезающая боковая панель в Delphi. А версия какая делфи?

23.04.2009, 07:00	#6
ERO1 Неактивный пользователь Пол: Регистрация: 22.04.2009 Сообщений: 16 Репутация: 2	Re: Исчезающая боковая панель в Delphi. Delphi 7, WinXPsp3

27.04.2009, 09:58	#7
timber_wolf Неактивный пользователь Пол: Регистрация: 13.04.2009 Сообщений: 14 Репутация: 6	Re: Исчезающая боковая панель в Delphi. Знакомец у меня один написал такую - спрошу у него - если разрешит выложить, то ссылку кину

23.06.2009, 15:32	#8
AsukaLangley Неактивный пользователь Регистрация: 23.06.2009 Сообщений: 1 Репутация: 0	Re: Исчезающая боковая панель в Delphi. Тоже интересует данный вопрос. Есть у кого пример или ссылка?

24.06.2009, 14:13	#9
ultimate Пользователь Пол: Регистрация: 31.01.2007 Сообщений: 118 Репутация: 65	Re: Исчезающая боковая панель в Delphi. вообще должно получится чтото типа такого _http://slil.ru/27786074

25.06.2009, 13:14	#10
KovalenkoS Неактивный пользователь Регистрация: 25.06.2009 Сообщений: 5 Репутация: 0	Re: Исчезающая боковая панель в Delphi. tms component pack рулит!

21.01.2010, 11:34	#13
Vasuha Постоялец Пол: Регистрация: 13.03.2008 Адрес: Минск Сообщений: 257 Репутация: 231	Re: Исчезающая боковая панель в Delphi. Недавно понадобилась такая вещь, реализовал вот так. http://slil.ru/28523786 Правда с TMS.... они красивей, но принцип такой... __________________

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Боковая панель в Windows Vista	vovan62	Windows Vista	31	17.07.2010 13:42
Исчезающая картинка	Artispro	Delphi	17	17.12.2008 18:29
Боковая панель при сохранении файлов - пропала, как вернуть	Rupinskiy	Microsoft Windows	6	09.07.2008 18:29
боковая панель windows	kerzh	Архив	12	23.02.2008 12:03