в ListView вставить ProgressBar

[Бяка]

Доброго времени суток.
Подскажите как в ячейку ListView-а вставить ProgressBar ?
ну например как на рисунке:

001.PNG (5.15 Кб) Просмотров: 852

[alibek]

А с чего ты взял, что на рисунке ListView?

[Бяка]

ну, я незнаю что там на рисунке используют, я рисунок приложил чтоб было понятно, то что я хочу получить от LV
тоесть неиспользуя сторонних компонентов самому нарисовать ProgressBar ручками в стандартном LV

[Хакер]

Ну так нарисуй. В чём затруднения-то?

[Бяка]

я это и хочу, сам то ProgressBar нарисовать 2 минуты, а вот только КАК мне рисовать в LV ?
с какой стороны то подойти?
вот, к примеру, в SubItem добовляю текст

Код: Выделить всё

  Dim LVI As LVItem

  If (LV.hWnd) Then
      With LVI
          .iSubItem = SubItem
          .pszText = Text & vbNullChar
          .cchTextMax = Len(Text) + 1
      End With
      Call SendMessage(LV.hWnd, LVM_SETITEMTEXT, Item, LVI)
  End If

а как тудаже рисунок вставить? или нарисовать?

[Хакер]

http://msdn.microsoft.com/en-us/library ... 85%29.aspx, пункт LVS_OWNERDRAWFIXED.

[Бяка]

ага, сенкс, есть хоть от чего плясать, шас посмотрю что можно сделать