Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

KOLMHXPStyle [Delphi, Windows]

Compiler © (2007-08-27 16:35:00)
Скачал KOLMHXPStyle. Не работает.
Функция ThrowWndProc(...) Self_ := Pointer(GetProp(Wnd, ID_SELF));Self_ всегда=nil. Отсюда ошибки и прога валится. В чем приKOL?

Compiler (2007-08-28 21:26:00) [1]

> {$IFDEF USE_PROP} > self_ := Pointer( GetProp( W, ID_SELF ) ); > {$ELSE} > self_ := Pointer( GetWindowLong( W, GWL_USERDATA ) ); > > {$ENDIF}

Именно так и работает.

> 2 mdw

mdw (2007-08-28 10:14:00) [2]
Не спорьте, горячие финские парни. :))
> Andrey_rus
KOLMHXPStyle представляют собой набор компонентов, реализующих собственную отрисовку в стиле Office XP.
> Compiler
Если вам нужно, то приведите в рабочее состояние и пришлите, обновим. Автор вряд ли, по крайней мере в ближайшее время, будет поддерживать. Поищите в Kol.pas ID_SELF и исправте по аналогии в KOLMHXPStyle. Примерно так:
{$IFDEF USE_PROP}
self_ := Pointer( GetProp( W, ID_SELF ) );
{$ELSE}
self_ := Pointer( GetWindowLong( W, GWL_USERDATA ) );
{$ENDIF}

Andrey_rus (2007-08-27 22:38:00) [3]
За за отрисовку контролов в стиле XP отвечает OS, при наличии соответствующего манифеста в ресурсе программы.

Compiler (2007-08-27 22:27:00) [4]
Функция ThrowWndProc(..) из модуля KOLMHXPStyle.pas отвечает за отрисовку контролов в стиле XP.
http://www.kolnmck.ru/files/components/controls/mhxpstyle.7z

Andrey_rus (2007-08-27 17:34:00) [5]
Что не догоняю - какая связь между KOLMHXPStyle и ThrowWndProc?

Наверх

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