Форум: "Начинающим";
Текущий архив: 2011.03.27;
Скачать: [xml.tar.bz2];
Внизcase + pagecontrol, ordinal type required Найти похожие ветки
← →
Тимоха111 (2010-12-27 16:52) [0]есть pagecontrol, и несколько вкладок к нему, оператором case хочу сделать простое условие
case PageControl1.ActivePage of
tsWelcome:
lbl1.caption := "welcome";
tsStep1:
lbl1.caption := "step1";
end;
Компилятор ругается мол, тип должен быть не такой.case PageControl1.ActivePageIndex of
0:
..
1:
такая конструкция меня не устраивает, хочу обращаться непосредственно к табу, не зная индекса
Как решить?
← →
Palladin © (2010-12-27 16:53) [1]if
← →
Тимоха111 (2010-12-27 16:54) [2]можно сделать и так
if PageControl1.ActivePage = tsWelcome then
begin
...
end;
if PageControl1.ActivePage = tsStep1 then
begin
...
end;
Но хотелось бы через case, так менее громозко :)
← →
Тимоха111 (2010-12-27 16:55) [3]Palladin, без if никак?
← →
Сергей М. © (2010-12-27 16:59) [4]
> Тимоха111
Варианты выбора, фигурирующие в case-блоке, должны иметь ordinal-тип и быть известными уже на этапе компиляции.
← →
Anatoly Podgoretsky © (2010-12-27 17:04) [5]> Тимоха111 (27.12.2010 16:54:02) [2]
Ленивым нет места в программирование.
← →
Дмитрий С © (2010-12-27 17:14) [6]PageControl1.ActivePageIndex
но лучше через иф
← →
RWolf © (2010-12-27 17:15) [7]
> Anatoly Podgoretsky © (27.12.10 17:04) [5]
это не лень, а чувство прекрасного.
> Тимоха111 (27.12.10 16:54) [2]
Можно присвоить каждой странице своё значение свойства Tag, и подставить это свойство в case.
← →
Leonid Troyanovsky © (2010-12-27 23:08) [8]
> RWolf © (27.12.10 17:15) [7]
> Можно присвоить каждой странице своё значение свойства Tag,
> и подставить это свойство в case.
Здесь чувство изменяет прекрасному.
--
Regards, LVT.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2011.03.27;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.005 c