Главная страница
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
6-47658
SemFLY
2002-04-29 18:07
2002.07.15
Анонимная отправка почты


4-47883
BAHO
2002-05-13 02:24
2002.07.15
Меню в чужом окне...


3-47100
shulc
2002-06-20 19:13
2002.07.15
Not enough storage is available to process this command


6-47647
ikivio
2002-04-24 23:06
2002.07.15
Proxy and E-mail


1-47365
Юра
2002-07-02 01:58
2002.07.15
ListBox