Создание меню

Страница 1 из 1

Модератор форума: stalker, Ekz

Форум » Все о Delphi » Начинающим » Создание меню (Меню)

Создание меню

жека

Дата: Вторник, 27.01.2009, 00:15 | Сообщение # 1

Ранг 3

Группа: Проверенные

Сообщений: 26

Награды: 0

Репутация: 1

Статус: Offline

Как сделать меню настроек пример на картинке

Прикрепления: 4123779.jpg(54Kb)

Admin

Дата: Вторник, 27.01.2009, 10:55 | Сообщение # 2

Ранг 10

Группа: Пользователи

Сообщений: 1268

Награды: 16

Репутация: 2

Статус: Offline

Слева где выбирается раздел это что-то вроде ListBox. А сами настройки (справа) расположены во вкладках в PageControl. Сами (незнаю как назвать их) по которым кликаеш и переключаешся по вкладках убираются. Программно переключаеш их и все.

Не оказываю помощь через личные сообщения и ICQ

GaNDyPaC

Дата: Вторник, 27.01.2009, 20:02 | Сообщение # 3

Ранг 4

Группа: Проверенные

Сообщений: 86

Награды: 0

Репутация: 1

Статус: Offline

А чё qip написан на DELPHe,а ICQ?

DELPHI USER

Admin

Дата: Вторник, 27.01.2009, 20:27 | Сообщение # 4

Ранг 10

Группа: Пользователи

Сообщений: 1268

Награды: 16

Репутация: 2

Статус: Offline

почему? и в си такиеже компоненты.

Не оказываю помощь через личные сообщения и ICQ

GaNDyPaC

Дата: Среда, 28.01.2009, 00:07 | Сообщение # 5

Ранг 4

Группа: Проверенные

Сообщений: 86

Награды: 0

Репутация: 1

Статус: Offline

Гы кульно.. smile

DELPHI USER

жека

Дата: Среда, 28.01.2009, 02:33 | Сообщение # 6

Ранг 3

Группа: Проверенные

Сообщений: 26

Награды: 0

Репутация: 1

Статус: Offline

Quote (Admin)

PageControl. Сами (незнаю как назвать их) по которым кликаеш и переключаешся по вкладках убираются. Программно переключаеш их и все.

Как мне поменять имена TabSheet и сделать выбор из лист бокса?

Сообщение отредактировал жека - Среда, 28.01.2009, 02:55

MegaMen

Дата: Среда, 28.01.2009, 03:01 | Сообщение # 7

Ранг 5

Группа: Проверенные

Сообщений: 47

Награды: 0

Репутация: 5

Статус: Offline

Quote (жека)

сделать выбор из лист бокса

PageControl1.TabIndex := ListBox1.ItemIndex

Quote (жека)

Как мне поменять имена TabSheet

TabSheet свойство Caption в Object Inspector

Чтобы добиться цели, надо прежде всего её добиваться.

Admin

Дата: Среда, 28.01.2009, 10:58 | Сообщение # 8

Ранг 10

Группа: Пользователи

Сообщений: 1268

Награды: 16

Репутация: 2

Статус: Offline

У PageControl поставь свойство Style = tsButtons чтобы не было видно рамки.
У всех TabSheet ставиш свойство TabVisible = false. Вкладки исчезнут. А переходить придется по ним так:

Code

PageControl1.ActivePageIndex := ListBox1.ItemIndex;

Код который привел MegaMen работает, но только с видимыми вкладками

Не оказываю помощь через личные сообщения и ICQ

MegaMen

Дата: Четверг, 29.01.2009, 00:43 | Сообщение # 9

Ранг 5

Группа: Проверенные

Сообщений: 47

Награды: 0

Репутация: 5

Статус: Offline

Quote (Admin)

но только с видимыми вкладками

да, оно самое happy

Добавлено (28.01.2009, 21:43)
---------------------------------------------

Quote (GaNDyPaC)

а ICQ

если он ничем не запакован и не зашифрован, то PEiD тебе в помощь.. Программа выдает чем запакован/на чем откомпилирован нужный тебе проект и др. ... QIP я проверил, Borland Delphi 6-7. ICQ на компе не держу и нафиг не нужно.. так что если хочешь и делать будет нефиг, icq.com и качай на здоровье..

Чтобы добиться цели, надо прежде всего её добиваться.

Форум » Все о Delphi » Начинающим » Создание меню (Меню)

Страница 1 из 1