![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сделать "Wizard" [D7, XP]
VVladimir © (2007-03-23 15:11:00)Здравствуйте, подскажите какой компонент использовать, чтоб сделать окно "мастера". Т.е. окошко с двумя кнопочками Next и Back, нажатие которых переводит пользователя на следующий шаг(на следующую страницу)
begin...end (2007-03-24 16:13:00) [1]CreatePropertySheetPage + PropertySheet
GrayFace (2007-03-24 10:34:00) [2]> Тьфу ты, меняю мнение за час три раза! Спасибо Sniknik!
> Конечно однозначный выбор за PageControl!
Но он, ведь, при манифесте тоже ужасно выглядит (не могу сейчас посмотреть TNotebook с манифестом), хотя это поправимо.
При использовании PageControl'а выставляй OwnerDraw = true, чтобы он не белел и у TabSheet'ов убирай CS_VREDRAW и CS_HREDRAW в SetClassLong,GetClassLong, тобы не мерцало при изменении размера.
ASoft (2007-03-24 10:09:00) [3]
> VVladimir (23.03.07 15:11)
Frames
easy (2007-03-23 20:38:00) [4]http://delphiworld.narod.ru/base/master_dlg.html
Gadenysh (2007-03-23 19:44:00) [5]а вообще в [2] это все написано
Gadenysh (2007-03-23 19:41:00) [6]НЕ используй TabVisible := true для переключения страниц - выставляй ActivePage у PageControl - a. А у всех страниц TabVisible д.б. false - тогда пропадут и закладки.
Удачи
VVladimir (2007-03-23 17:49:00) [7]Тьфу ты, меняю мнение за час три раза! Спасибо Sniknik! Конечно однозначный выбор за PageControl!
Knight (2007-03-23 16:36:00) [8]Точно... сорри, что ввёл в заблуждение :)
sniknik (2007-03-23 16:21:00) [9]VVladimir (23.03.07 16:12) [12]
включи схемы в вин XP если не включены, положи манифест на форму, скомпили и посмотри разницу TNotebook-а с Pagecontrol-ом...
а работать с ним при TabVisible = false одинаково... т.е. если не видно разницы в усилиях/написании и видна в при работе программы то .... (?)
Аноним (2007-03-23 16:21:00) [10]
> TNotebook
не используй его. Он безнадежно устарел
Аноним (2007-03-23 16:20:00) [11]
> Свойства скрытия кнопок я не нашел!
У самого 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;
VVladimir (2007-03-23 16:12:00) [12]Спасибо Knight!
Думаю, что действительно, TNotebook решает все. А то PageControl,Pagecontrol... :)
Knight (2007-03-23 16:11:00) [13]Если ещё TNotebook не посмотрел, то зря.. вот как-раз на нём и делают :)
Knight (2007-03-23 16:00:00) [14]Думаю компонент TNotebook из набора Win 3.1 будет гораздо удобнее...
VVladimir (2007-03-23 15:55:00) [15]PageControl действительно удобное решение, но... НО что делать снопкой переключения страниц? Она смотрится совершенно лишней. Свойства скрытия кнопок я не нашел! И похоже его и нет!
Решение с панелями тоже какое-то некрасивое, поскольку не удобно. Так на каком же компоненте делают "Wizard"?
Knight (2007-03-23 15:49:00) [16]> [6] eXPell © (23.03.07 15:46)
> А так?
> form1.TabSheet2.TabVisible:=true;
> form1.TabSheet1.TabVisible:=false;
С таким-же успехом можно юзать панели растянутые до слиента..
Knight (2007-03-23 15:47:00) [17]> [1] Аноним (23.03.07 15:14)
> PageControl с TabVisible = False
А в 6-ом такого нет...
eXPell (2007-03-23 15:46:00) [18]А так?
form1.TabSheet2.TabVisible:=true;
form1.TabSheet1.TabVisible:=false;
VVladimir (2007-03-23 15:33:00) [19]Еще вопрос! А что делать с кнопками переключения страниц? Не могу их скрыть. Может это вовсе и не такое уж отличное решение как вначале показалось?
VVladimir (2007-03-23 15:25:00) [20]Спассибо. Отличное решение.