Смена страниц в PageControl по таймеру

@Dead_x · Регистрация: 28.03.2016

Author24 — интернет-сервис помощи студентам

сделал смену только для 2 страниц :

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
switch(PageControl1->ActivePageIndex)
          {
                    case 0:
                    PageControl1->ActivePageIndex=1;
                    break;
                    case 1:
                    PageControl1->ActivePageIndex=0;
                    break;
 
          }
 
}

как сделать для 3 страниц ?

@volvo · 09.05.2016, 18:57

Для любого количества вкладок:

C++
1
2
3
4
5
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
    PageControl1->ActivePageIndex =
        (PageControl1->ActivePageIndex + 1) % PageControl1->PageCount;
}

@nick42 · 09.05.2016, 19:03

C++
1
2
3
4
5
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
     PageControl1->ActivePageIndex = Timer2->Tag % PageControl1->PageCount;
     Timer2->Tag += 1;
}

@volvo · 09.05.2016, 19:07

На кой еще Tag привязывать?

@nick42 · 09.05.2016, 19:19

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

На кой еще Tag привязывать?

- дурная привычка.

@volvo · 09.05.2016, 19:23

Вот этой привычкой ты гробишь возможность пользователю между тиками таймера выбрать вкладку, чтобы потом переключение пошло дальше. Тебе в таком случае нужно добавлять еще одно событие, чтобы выставить значение Tag-а. Так что избавляйся от этих привычек

@nick42 · 09.05.2016, 19:52

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

ты гробишь возможность пользователю между тиками таймера выбрать вкладку

- ну вот! уже различное поведение вариантов. Это ж только сам пользователь знает, что ему надо от его программы. И кроме того, я свой вариант писал, не видя других предложений; так что это - не альтернатива.

Новые блоги и статьи Все статьи Все блоги /
WebAssembly в Kubernetes stackOverflow 03.03.2025 В современной экосистеме облачных технологий WebAssembly (Wasm) становится все более значимым компонентом, предлагая уникальный подход к выполнению кода в распределенных системах. Эта технология. . .	GitHub Actions или Jenkins: Выбираем CI/CD платформу stackOverflow 03.03.2025 Непрерывная интеграция и развертывание (CI/ CD) изменили подход к разработке программного обеспечения, превратив его в бесшовный процесс от написания кода до развертывания в продакшн. GitHub Actions и. . .	Автоматизация тестирования Pull Request в Kubernetes: Интеграция с GitHub Actions и GKE stackOverflow 03.03.2025 Масштабные проекты с использованием Kubernetes требуют надежной системы тестирования изменений перед их внедрением в продакшн-среду. Традиционный подход с ручной проверкой Pull Request не справляется. . .	Tестирование Pull Request в Kubernetes с помощью vCluster stackOverflow 03.03.2025 При работе с микросервисной архитектурой критически важно обеспечить качественное тестирование каждого изменения перед его слиянием в основную кодовую базу. Однако тестирование Pull Request в. . .	Использование пакета Context в Golang bytestream 03.03.2025 Управление параллельными процессами в современных приложениях - сложная задача, особенно когда речь идет о микросервисной архитектуре и распределенных системах. Пакет context в Go - это гибкое. . .
WebAssembly и Go: Работа с DOM и обработка ошибок bytestream 03.03.2025 WebAssembly представляет собой технологию, позволяющую запускать низкоуровневый код в браузере практически на нативной скорости. Особенно интересные возможности открываются при использовании. . .	WebAssembly и Go: Создание высокопроизводительных веб-приложений bytestream 03.03.2025 WebAssembly - это технология, изменившая подход к созданию высокопроизводительных веб-приложений. До появления WebAssembly JavaScript оставался единственным языком программирования, который понимали. . .	Контексты в Go: отмена, тайм-ауты и распространение bytestream 03.03.2025 В многопоточном программировании существует множество ситуаций, когда необходимо прерывать выполнение горутин или ограничивать время их работы. Отсутствие грамотного управления параллельными. . .	WebSocket в Go: создание масштабируемых real-time приложений bytestream 03.03.2025 Веб-приложения все чаще требуют обработки данных в режиме реального времени. Традиционный подход с использованием HTTP-запросов имеет существенные ограничения для таких сценариев. При каждом запросе. . .	Как дебажить в Go: Руководство по отладке bytestream 03.03.2025 Отладка в Go имеет свои особенности, связаные с строгой типизацией, моделью конкурентности и управлением памятью. Go предоставляет богатый набор встроеных средств для отладки, которые дополняются. . .

@volvo Супер-модератор 33091 / 21388 / 8216 Регистрация: 22.10.2011 Сообщений: 36,715 Записей в блоге: 9
	09.05.2016, 19:07	4
	На кой еще Tag привязывать? 0

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	09.05.2016, 19:19	5
	Сообщение от volvo На кой еще Tag привязывать? - дурная привычка. 0

@volvo Супер-модератор 33091 / 21388 / 8216 Регистрация: 22.10.2011 Сообщений: 36,715 Записей в блоге: 9
	09.05.2016, 19:23	6
	Вот этой привычкой ты гробишь возможность пользователю между тиками таймера выбрать вкладку, чтобы потом переключение пошло дальше. Тебе в таком случае нужно добавлять еще одно событие, чтобы выставить значение Tag-а. Так что избавляйся от этих привычек 0

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	09.05.2016, 19:52	7
	Сообщение от volvo ты гробишь возможность пользователю между тиками таймера выбрать вкладку - ну вот! уже различное поведение вариантов. Это ж только сам пользователь знает, что ему надо от его программы. И кроме того, я свой вариант писал, не видя других предложений; так что это - не альтернатива. 0