| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как создать Progress Bar динамически ? И под XP (его не видно) ? [D7, Win95/98, WinME, NT4, Win2k, WinXP]

maxi ©   (2003-12-08 09:43:00) 

Уважаемые мастера. Как создать Progress Bar динамически ??? Делаю так :

Windows.ShowWindow(MainWnd,sw_SHOW);
CommCtrl.InitCommonControls;
ProgWnd := CreateWindow(PROGRESS_CLASS, "", WS_CHILD or
WS_BORDER or WS_VISIBLE, 10, 10, 100, 20, MainWnd, 0,
Hinstance, nil);
Windows.ShowWindow(ProgWnd,sw_SHOW);

При этом главное окно появляется на экране, а бара не видно.
В своё время занимался проблемой ProgressBar-а под ХР, но забыл как это делается. По моему там отличное от PROGRESS_CLASS название класса ???? Или какую то библиотеку надо подгружать в проект перед отрисовкой ????. Подскажите плииз.....

---

jonni   (2003-12-08 13:31:00) [1]

hwndPB = CreateWindowEx(0, PROGRESS_CLASS,
(LPSTR) NULL, WS_CHILD | WS_VISIBLE,
rcClient.left, rcClient.bottom
cyVScroll, rcClient.right, cyVScroll,
hwndParent, (HMENU) 0, g_hinst, NULL);

vot primer sozdaniya Progress bar iz MSDN

u menya bila podobnaya problema... okna ne poyavlyalis".. no lechilos" eto prosto..
UpdateWindow();
ShowWindow();

---

Наверх