Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: CL | DM;

Вниз

ListView и WinXP   Найти похожие ветки 

 
Yuri Btr ©   (2002-07-01 12:27) [0]

Ув. мастера, моя программа использует VisualStylesAPI для WinXP и также мне очень нужно в программе использовать обычный ListView. Но только я включаю поддержку VSAPI в программе (ресурс "24" или program.exe.manifest) как программа вызывает ошибку в kernel32
Есть ли способы побороть данную несовместимость? Я просмотрел статью "Поддержка Windows Visual Styles (Themes) API в Ваших органах управления" и пришел к выводу, что коряво написан исходник ListView. Так ли это?


 
Yuri Btr ©   (2002-07-01 13:43) [1]

Пожалуйста, ответьте кто нибудь, кто знает ответ.
Мне нужно определиться, или делать интерфейс без ListView - что будет довольно долго, или не использовать VisualStyles - что не очень красиво (я делаю коммерческую программу), или использовать сторонние компоненты (не родные Borlandовские)


 
Игорь Шевченко ©   (2002-07-01 13:47) [2]

Если коммерческая - лучше делать так, чтобы гарантировано работало. В данном случае или без Visual Styles или без ListView.


 
Yuri Btr ©   (2002-07-01 17:09) [3]

Спасибо всем ответившим :-)
Проблема заключалась в том, что если в TListView свойство ViewStyle стоит в vsReport и не определены ImageIndex для Column Titles, то при использовании VisualStyles - возникает
ошибка.
Вывод - при использовании vsReport+VSAPI нужно обязательно ассоциировать ListView с ImageList и для каждой колонки выставить соответствующую иконку.


 
Макс Черных ©   (2002-07-01 19:13) [4]

Я наверно уже 10 раз отвечаю на этот вопрос.
Может модераторам это в FAQ занести.

Column Titles здесь не совсем виноваты, причина в неточности
в модуле ComCtrls.pas.

Решение:
1. Поставить D6 Update Pack 2
2. Если с п1. не выходит, или D5, то
в ComCtrls.pas найти процедуру TCustomListView.UpdateColumn
Исправить оригинальный код:
if FImageIndex <> -1 then
fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES;

на нижеследующий:
if FImageIndex <> -1
then fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES
else mask := mask and not (LVCF_IMAGE);



Страницы: 1 вся ветка

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
3-47163
Sevish
2002-06-17 08:09
2002.07.15
Помогите с тормозами при открытии ...


14-47789
Виктор
2002-06-15 14:56
2002.07.15
Посоветуйте, чем создавать help-файлы по компонентам Delphi


3-47190
Explorer
2002-06-19 09:01
2002.07.15
Данные из MSSQL в dbf


8-47622
Stimky
2002-03-06 18:02
2002.07.15
Есть ли у кого пример реализации Z-Buffer


1-47591
Igor_sh
2002-06-28 18:11
2002.07.15
Использование редактора свойств от TDBGrid