Помогите с ListView.

[mse]

Когда добавляю массив элементов в ListView и получается пока они все не добавятся ListView как бы подвисает. Если использовать ListView.Update и ListView.EndUpdate
То происходит частое обновление его обновление (как бы мерцание).
Как от этого избавится?

[mdx]

В смысле от мерцания?

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

me.SetStyle(ControlStyles.OptimizedDoubleBuffer, True)

[mse]

Нет, это не это.
Это для компонентов применяется.
Вот код.

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

Private Sub TabFileTree_AfterSelect()


        Dim ThumbnailImagesList As New ImageList

        'Создание Thumbnail и добовление в ImagesList

        With ThumbnailImagesList
            .ImageSize = New Size(120, 100)
            .ColorDepth = ColorDepth.Depth32Bit
            .TransparentColor = Color.Transparent
        End With
        TabFileList.LargeImageList = ThumbnailImagesList

        'Конец создания Thumbnail и добовление в ImagesList


     
            Dim ImageFile As FileInfo
            Dim ImageDirectory As New DirectoryInfo(TabFileTree.SelectedNode.FullPath.ToString)
            Dim ImageCounter As Integer = 0

            'Сброс счётчиков и очистка коллекции
            ImageCollection.Clear()
            ImageCount = 1


            For Each ImageFile In ImageDirectory.GetFiles
                TabFileList.Update()

                'Добавление списка файлов в TabFileList
                TabFileList.Items.Add(Path.GetFileName(ImageFile.Name), ImageCounter)
                'Добавление списка файлов в коллекцию
                ImageCollection.Add(ImageFile.FullName)
                'Добавление списка файлов в ThumbnailImagesList
                ThumbnailImagesList.Images.Add(Image.FromFile(ImageFile.FullName))
       End For
    End Sub


+ Вот сама программа. Не хотел выкладывать пока допишу, но ладно так уж и быть.
Просто в ней ещё куча ошибок. И буду менять движок ёё полность и реализовывать поддержку 3Д файлов и те де.

[mdx]

Вообще-то это лучше бы делать в каком-нибудь дополнительном treadе. Если пишешь на VB2005 - для этого есть класс BackgroundWorker. Я бы сделал так:
1. Получаешь список файлов
2. Делаешь в ImageList'е кучу копий какой-нибудь картинки по числу файлов
3. Добавляешь список файлов в ListView
4. Перерисовывая на каждом шаге, заменяешь в Imagelist'е картинки на настоящие

[mse]

1. Да понятно что на потоки разбивать.
2. Ну тот же эффект получается между прочим))
Есть ещё варианты?

[Nord777]

Application.DoEvents ???

[mdx]

Поставь таймер, и попробуй обновлять по нему. Мерцать будет значительно реже.

[mse]

Application.DoEvents - Это то же что и TabFileList.Update, TabFileList.EndUpdate

Application.DoEvents Method

When you run a Windows Form, it creates the new form, which then waits for events to handle. Each time the form handles an event, it processes all the code associated with that event. All other events wait in the queue. While your code handles the event, your application does not respond. For example, the window does not repaint if another window is dragged on top.
If you call DoEvents in your code, your application can handle the other events. For example, if you have a form that adds data to a ListBox and add DoEvents to your code, your form repaints when another window is dragged over it. If you remove DoEvents from your code, your form will not repaint until the click event handler of the button is finished executing.
Typically, you use this method in a loop to process messages.

Ну, таймер вариант. Но опять же, получается, будет мерцание, а это не очень приятно. Даже если оно уменьшится в 2 раза.

Ну что больше что не кто с этой проблемой не сталкивался?

[VAngel]

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

        Dim i As Integer
        Dim col(0 To 1000) As ListViewItem
        For i = 0 To 1000

            col(i) = New ListViewItem
            col(i).Text = "Запись " & i

        Next
        Me.ListView1.Items.AddRange(col)

Может так, не очень эротично но без мерцания[/code]

[Sebas]

Если использовать ListView.Update и ListView.EndUpdate
То происходит частое обновление его обновление (как бы мерцание).
Как от этого избавится?

Не может быть, ты что, их на добавление каждой итемы ставишь?!?!?

[mse]

сори провтыкал... Сейчас перепишу посмотрю на результат.