| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
dsn
Посетитель
Зарегистрирован: 24.10.2004
Сообщения: 47
Статус: Отсутствует на форуме
Очки: 24 |
 Заголовок сообщения: Стиль "Эскизы страниц"
Добавлено: Вт Сен 13, 2005 17:28 |
 |
|
Подскажите, Стиль ListView в проводнике "Эскизы страниц" стандартный или отрисовывается самостоятельно? Смотрел в Spy++, вроде стиля OwnerDraw не видно.
|
|
|
| Вернуться к началу |
|
 |
RADIOFUN
Давний участник
Зарегистрирован: 15.02.2005
Сообщения: 106
Откуда: Krasnodar
Статус: Отсутствует на форуме
Очки: 0 |
Заголовок сообщения:
Добавлено: Вт Сен 13, 2005 18:41 |
|
|
Если тамже посмотреть видно что стиль:
LVS_ICON
причем как ни меняеш вид проводника в Spy++все также :-(
И еще в борландовском ListWiew 3 стиля,а тут 5.
PS Если пишеш на C++Builder то лучше поинтересуйся ListView в TotalCommander ,Он (в смысле командер) написан на дельфи.
И у него есть вид "эскизы страниц"
|
|
|
| Вернуться к началу |
|
|
dsn
Посетитель
Зарегистрирован: 24.10.2004
Сообщения: 47
Статус: Отсутствует на форуме
Очки: 24 |
Заголовок сообщения:
Добавлено: Чт Сен 15, 2005 5:32 |
|
|
| Цитата: |
Если пишеш на C++Builder то лучше поинтересуйся ListView в TotalCommander ,Он (в смысле командер) написан на дельфи.
|
А что, его исходники доступны?
|
|
|
| Вернуться к началу |
|
|
RADIOFUN
Давний участник
Зарегистрирован: 15.02.2005
Сообщения: 106
Откуда: Krasnodar
Статус: Отсутствует на форуме
Очки: 0 |
Заголовок сообщения:
Добавлено: Чт Сен 15, 2005 13:07 |
|
|
вроде нет ,но зато можно посмотреть *.DFM файл
Вот обьявление левой паенели с файлами
| Код: |
object LeftList: TMyListBox
Tag = 170
Left = 1
Top = 58
Width = 307
Height = 271
ExtendedSelect = False
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 16
MultiSelect = True
ParentFont = False
//а вот и стиль:
Style = lbOwnerDrawFixed
TabOrder = 3
OnClick = ListClick
OnDblClick = DoubleClick
OnEnter = LeftListEnter
OnExit = ListExit
OnKeyUp = ListKeyUp
OnMouseMove = ListMouseMove
OnChange = ListChange
OnKeyPress1 = FormKeyPress
TrueColumnWidth = 0
OnRButtonDown = ListRButtonDown
OnRButtonUp = ListRButtonUp
OnLButtonDown = ListLButtonDown
OnLButtonUp = ListLButtonUp
OnHScroll = ListHScroll
end |
Если хочется посмотреть самому то сначала распакуй Total cmd UPXом
|
|
|
| Вернуться к началу |
|
|
|
