Сделать "Wizard"

← →
VVladimir (2007-03-23 15:11) [0]

Здравствуйте, подскажите какой компонент использовать, чтоб сделать окно "мастера". Т.е. окошко с двумя кнопочками Next и Back, нажатие которых переводит пользователя на следующий шаг(на следующую страницу)

← →
Аноним (2007-03-23 15:14) [1]

PageControl с TabVisible = False

← →
Gadenysh (2007-03-23 15:14) [2]

у Кэнту почитай "D7 для профессионалов"

← →
Steep © (2007-03-23 15:15) [3]

Блин воспользуйся Многостраничным компонентом!
Просто скрой вкладки переключения!
А кнопочки далее и назад думаю добавиш???

← →
VVladimir (2007-03-23 15:25) [4]

Спассибо. Отличное решение.

← →
VVladimir (2007-03-23 15:33) [5]

Еще вопрос! А что делать с кнопками переключения страниц? Не могу их скрыть. Может это вовсе и не такое уж отличное решение как вначале показалось?

← →
eXPell © (2007-03-23 15:46) [6]

А так?
form1.TabSheet2.TabVisible:=true; form1.TabSheet1.TabVisible:=false;

← →
Knight © (2007-03-23 15:47) [7]

> [1] Аноним (23.03.07 15:14)
> PageControl с TabVisible = False

А в 6-ом такого нет...

← →
Knight © (2007-03-23 15:49) [8]

> [6] eXPell © (23.03.07 15:46)
> А так?
> form1.TabSheet2.TabVisible:=true;
> form1.TabSheet1.TabVisible:=false;

С таким-же успехом можно юзать панели растянутые до слиента..

← →
VVladimir (2007-03-23 15:55) [9]

PageControl действительно удобное решение, но... НО что делать снопкой переключения страниц? Она смотрится совершенно лишней. Свойства скрытия кнопок я не нашел! И похоже его и нет!
Решение с панелями тоже какое-то некрасивое, поскольку не удобно. Так на каком же компоненте делают "Wizard"?

← →
Knight © (2007-03-23 16:00) [10]

Думаю компонент TNotebook из набора Win 3.1 будет гораздо удобнее...

← →
Knight © (2007-03-23 16:11) [11]

Если ещё TNotebook не посмотрел, то зря.. вот как-раз на нём и делают :)

← →
VVladimir (2007-03-23 16:12) [12]

Спасибо Knight!

Думаю, что действительно, TNotebook решает все. А то PageControl,Pagecontrol... :)

← →
Аноним (2007-03-23 16:20) [13]

> Свойства скрытия кнопок я не нашел!

У самого TabSheet"а нету чтоли в седьмой? Да не может быть такого

проверь
у меня так устроено:

constructor TFmCustomWizard.Create(AOwner: TComponent);
var
I: Integer;
begin
inherited Create(AOwner);
for I:=0 to PageControl.PageCount - 1 do
PageControl.Pages[I].TabVisible:=False;

← →
Аноним (2007-03-23 16:21) [14]

> TNotebook

не используй его. Он безнадежно устарел

← →
sniknik © (2007-03-23 16:21) [15]

VVladimir (23.03.07 16:12) [12]
включи схемы в вин XP если не включены, положи манифест на форму, скомпили и посмотри разницу TNotebook-а с Pagecontrol-ом...

а работать с ним при TabVisible = false одинаково... т.е. если не видно разницы в усилиях/написании и видна в при работе программы то .... (?)

← →
Knight © (2007-03-23 16:36) [16]

Точно... сорри, что ввёл в заблуждение :)

← →
VVladimir (2007-03-23 17:49) [17]

Тьфу ты, меняю мнение за час три раза! Спасибо Sniknik! Конечно однозначный выбор за PageControl!

← →
Gadenysh (2007-03-23 19:41) [18]

НЕ используй TabVisible := true для переключения страниц - выставляй ActivePage у PageControl - a. А у всех страниц TabVisible д.б. false - тогда пропадут и закладки.

Удачи

← →
Gadenysh (2007-03-23 19:44) [19]

а вообще в [2] это все написано

http://delphiworld.narod.ru/base/master_dlg.html

← →
ASoft (2007-03-24 10:09) [21]

> VVladimir (23.03.07 15:11)

Frames

> Тьфу ты, меняю мнение за час три раза! Спасибо Sniknik!
> Конечно однозначный выбор за PageControl!

Но он, ведь, при манифесте тоже ужасно выглядит (не могу сейчас посмотреть TNotebook с манифестом), хотя это поправимо.

При использовании PageControl"а выставляй OwnerDraw = true, чтобы он не белел и у TabSheet"ов убирай CS_VREDRAW и CS_HREDRAW в SetClassLong,GetClassLong, тобы не мерцало при изменении размера.

CreatePropertySheetPage + PropertySheet

Сделать "Wizard" Найти похожие ветки