Как создавать формы с разными контролами на чистом API?

← →
nikkie (2001-11-01 09:46) [20]

собственно в MSDN все написано.

void InitCommonControls(VOID);
Registers and initializes the common control window classes. This function is obsolete. New applications should use the InitCommonControlsEx function.

короче, microsoft говорит, что надо использовать InitCommonControlsEx. Тем более, что она более гибкая. Структура состоит всего из 2 полей, так что использовать совсем просто

var
ICC: TInitCommonControlsEx;
begin
ICC.dwSize := SizeOf(TInitCommonControlsEx);
ICC.dwICC :=
ICC_LISTVIEW_CLASSES | ICC_TREEVIEW_CLASSES | ICC_TAB_CLASSES;
// перечисляем те классы, которые собираемся использовать
InitCommonControlsEx(ICC);
end;

есть только одно но. в хелпе на InitCommonControlsEx написано Version 4.70. Вот расшифровка
Version Distribution Platform
4.00 Microsoft® Windows® 95/Windows NT® 4.0.
4.70 Microsoft® Internet Explorer 3.x.
4.71 Microsoft® Internet Explorer 4.0.
4.72 Microsoft® Internet Explorer 4.01 and Windows® 98.
5.00 Microsoft® Internet Explorer 5.
5.00 Microsoft® Windows® 2000 and Windows Me.
5.80 Microsoft® Internet Explorer 5.
5.81 Microsoft® Windows 2000 and Windows Me.
6.00 Microsoft® Windows XP.

то есть при условии, что у юзера стоит Win95 без какого-либо IE этой функции в comctl32.dll не окажется. ситуация трудно вообразимая, но возможная :).

Но дельфи (а точнее, commctrl.pas) нам помогает. InitCommonControlsEx подгружается динамически, а не статически. причем как _InitCommonControlsEx, а InitCommonControlsEx - это просто паскальная функция
Result := Assigned(_InitCommonControlsEx) and _InitCommonControlsEx(ICC);

вариант 1. просто используем InitCommonControlsEx
вариант 2. мы сильно озабочены проблемой запуска своей программы на Win95 без IE и пишем что-то типа
if (not InitCommonControlsEx(ICC)) then InitCommonControls;
вариант 3. мы не морочим себе голову и используем InitCommonControls. хоть она и obsolete, но 100%, что MS ее в следующих версиях не выкинет.

Как создавать формы с разными контролами на чистом API? Найти похожие ветки