[kafi2030]

بسم الله الرحمن الرحيم

السلام عليكم

كيف لي ان امنع المستثمر من العبث بالحد الفاصل بين اعمدة الليست فيو ؟

والف شكر

[sooriaty03]

السلام عليكم ورحمة الله وبركاته

تفضل أخي هذا هو الكود

كود :

Dim OldWidth As Integer = -1
    Private Sub ListView1_ColumnWidthChanging(ByVal sender As Object, ByVal e As System.Windows.Forms.ColumnWidthChangingEventArgs) Handles ListView1.ColumnWidthChanging
        e.Cancel = True
        OldWidth = ListView1.Columns.Item(e.ColumnIndex).Width
    End Sub
    Private Sub ListView1_ColumnWidthChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ColumnWidthChangedEventArgs) Handles ListView1.ColumnWidthChanged
        If OldWidth > -1 Then
            ListView1.Columns.Item(e.ColumnIndex).Width = OldWidth
            OldWidth = -1
        End If
    End Sub

بالتوفيق

[kafi2030]

الف شكر
اخي Sooriaty

تم تجربة الكود، وعمل بنجاح

بارك الله فيك وبامثالك