مشکل با Listview ---- عدم نمایش بموقع اطلاعات

سلام بر اساتید
من یک مشکل حل نشدنی دارم با Listview
وقتی میخوام اطلاعاتی رو تو فرم Edit ویرایش کنم یکی از گزینه ها ویرایش عکس هست که میتونیم تصویر رو ویرایش کنیم و عکس جدیدی رو جایگزین کنیم
مشکل من اینجاست که وقتی رو داده هایی که بعد از ویرایش روی Listview ریخته میشن کلیک میکنم عکس جدید رو نشون نمیده و یکم اذیت میکنه به این صورت که باید روی سطر بالایی یا پایینی کلیک کنی و بعد روی سطری که ویرایش شده کلیک کنی تا عکس رو نمایش بده
نمیدونم منظورم رو متوجه شدین یا نه !!!
از listvie.update و refresh هم استفاده کردم اما بی فایده بوده برای حجل این مشکل
خواهش میکنم یک راه حل اساسی بدین واسه حل این مشکل
یک عکس هم میزارم از برنامه بهتر متوجه قضیه بشید :

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

ببینید من الان یوزر شماره 8 رو ویرایش کردم و یک عکس جدید براش جایگزین کردم ولی وقتی بعد از زدن دکمه ویرایش میام روی سطر یوزر 8 تو listview کلیک میکنم عکسی به من نشون نمیده و باید حتما روی یوزر 6 یا 10 کلیک کنم و بعد بیام روی یوزر 8 کلیک کنم تو listview تا عکس جدید نمایش داده بشه
ممنون میشم کمک کنید این مشکل من حل بشه


اینم کدی که تو خاصیت ListView1_ItemSelectionChanged نوشتم تا اطلاعات رو از دیتابیس بخونه و بریزه روی فرمم :

کد:

---

Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object,  ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs)  Handles ListView1.ItemSelectionChanged
        TextBox8.Text = e.Item.SubItems(1).Text
        TextBox7.Text = e.Item.SubItems(2).Text
        If e.Item.SubItems(3).Text = "Male" Then
            RadioButton4.Checked = True
        Else
            RadioButton3.Checked = True
        End If
        ComboBox2.Text = e.Item.SubItems(4).Text
        PictureBox2.ImageLocation = (Environment.CurrentDirectory & "\CustomerPictures\") + e.Item.SubItems(5).Text + ".jpg"
        pics = (PictureBox2.ImageLocation)
        TextBox6.Text = e.Item.SubItems(6).Text
        TextBox5.Text = e.Item.SubItems(7).Text
        Label12.Text = e.Item.SubItems(0).Text
    End Sub

---

یه جورایی این حرف من راهنمایی برای خودم هست تا شما!
نمیشه کد آپدیت عکس رو توی کلید آپدیتِ ویرایش هم بذارید؟! و یا از توی همون کلید آپدیت، ListView1_ItemSelectionChanged رو فراخوانی کنید؟!
:n13:

سلام.
از ایونت های دیگه مثل MouseClick برای ریفرش عکس استفاده کن.

نقل قول:

---

نوشته شده توسط saurron [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

یه جورایی این حرف من راهنمایی برای خودم هست تا شما!
نمیشه کد آپدیت عکس رو توی کلید آپدیتِ ویرایش هم بذارید؟! و یا از توی همون کلید آپدیت، ListView1_ItemSelectionChanged رو فراخوانی کنید؟!
:n13:

---

این رو قبلا هم امتحان کرده بودم و مجدد هم امتحان کردم نشد و مشکل پابرجاست

نقل قول:

---

نوشته شده توسط Payman_62 [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام.
از ایونت های دیگه مثل MouseClick برای ریفرش عکس استفاده کن.

---

متاسفانه نشد و نتیجه نداشت

نقل قول:

---

نوشته شده توسط Ship Storm [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

این رو قبلا هم امتحان کرده بودم و مجدد هم امتحان کردم نشد و مشکل پابرجاست



متاسفانه نشد و نتیجه نداشت

---

نشد !!!

ببین اگر نرم افزار رو برای کسی به جز خودت نمیخواهی بهتره از راه حل های غیر استاندارد استفاده کنی

مثلا بیای ایندکس سطر رو بعد از تغییرات به وسیله کد نویسی کم و زیاد کنی

یا اون picture box ای که قرار عکس نمایش دهد برابر null قرار بدی و دوباره برابر ادرس یا اسم عکس جدید قرار دهید

اما در کل نباید مشکلی باشه

این روش رو هم تست کردم نشد متاسفانه

بسم الله الرحمن الرحیم
با سلام
در دکمه ویرایشتون کد مربوط به پر شدن لیستتون رو هم قرار بدید. که بلافاصله بعد از دکمه ویرایش لیستتون هم آپدیت بشه.
موفق باشید.

نقل قول:

---

نوشته شده توسط shotok [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

بسم الله الرحمن الرحیم
با سلام
در دکمه ویرایشتون کد مربوط به پر شدن لیستتون رو هم قرار بدید. که بلافاصله بعد از دکمه ویرایش لیستتون هم آپدیت بشه.
موفق باشید.

---

خوب این مورد که هست و از قبل بوده

یعنی حتی وقتی به صورت خودکار ایندکس لیست عوض میشه و دوباره سر جای اولش قرار میگیره مشکل پا برجاس؟
اگه اینطوره به نظر من یه جای کوچیک کار میلنگه و از قلم افتاده و مشکل جدی نیست، این عکس انتخاب شده توی CustomerPictures وجود داره یا برنامه اول اونو کپی میکنه (که یه مقدار زمان بر هست) و بعد آپدیت میشه؟
کلا چطوره از یه تایمر استفاده کنید که بعد از چند صدم ثانیه ListView1_ItemSelectionChanged فراخوانی بشه و یا بعد از چند لحظه ایندکس عوض بشه و به حالت قبل برگرده؟

خاصیت ItemSelectionChanged بعد از تغییر اتنخاب ها اتفاق می افته بهتر هست از رویداد های دیگه ای مثل ColumnClick استفاده کنید..

نقل قول:

---

نوشته شده توسط saurron [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

یعنی حتی وقتی به صورت خودکار ایندکس لیست عوض میشه و دوباره سر جای اولش قرار میگیره مشکل پا برجاس؟

---

آره دقیقا مشکل عجیبی هست معلوم نیست مشکل کجای کاره و از چیه

نقل قول:

---

نوشته شده توسط saurron [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

این عکس انتخاب شده توی CustomerPictures وجود داره یا برنامه اول اونو کپی میکنه (که یه مقدار زمان بر هست) و بعد آپدیت میشه؟

---

این عکس کپی میشه و بعد آپدیت میشه ولی فرقی نمیکنه حتی 10 ثانیه هم صبر کنی بازم مشکل هست برای بار اول که کلیک میکنی روش

نقل قول:

---

نوشته شده توسط samasara [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

خاصیت ItemSelectionChanged بعد از تغییر اتنخاب ها اتفاق می افته بهتر هست از رویداد های دیگه ای مثل ColumnClick استفاده کنید..

---

تو این رویداد امکان استفاده از پارامتر برای دریافت مقادیر نیست و با ارور مواجه میشه کار
e.Item.SubItems(5).Text قایل استفاده نیست که بخوام تو PictureBox2.ImageLocation مقدار بدم

یک پیشنهادی شاید جواب داد .. در انتهای دکمه ی ادیت فکوس رو روی لیست و اولین گزینه بده به این صورت شاید اون رویداد بموقع اتقاق بیفته..

نقل قول:

---

نوشته شده توسط samasara [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

یک پیشنهادی شاید جواب داد .. در انتهای دکمه ی ادیت فکوس رو روی لیست و اولین گزینه بده به این صورت شاید اون رویداد بموقع اتقاق بیفته..

---

اینم جالبه :n09:

نقل قول:

---

نوشته شده توسط samasara [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

یک پیشنهادی شاید جواب داد .. در انتهای دکمه ی ادیت فکوس رو روی لیست و اولین گزینه بده به این صورت شاید اون رویداد بموقع اتقاق بیفته..

---

با دستور
ListView1.Items(0).Selected = True
این کار رو انجام دادم ولی باز هم فایده ای نداشت متاسفانه

با دستور .FocusedItem امتحان بکن ..

اگر برات امکان داره دستور های edit رو هم بگذار شاید کلید این مشکل عجیب اونجا باشه

نقل قول:

---

نوشته شده توسط samasara [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

با دستور .FocusedItem امتحان بکن ..

اگر برات امکان داره دستور های edit رو هم بگذار شاید کلید این مشکل عجیب اونجا باشه

---

با این دستور

listView1.FocusedItem = listView1.Items.Item(0)
هم تست کردم نشد
الان کد دکمه edit رو هم قرار میدم

کد دکمه Edit :

کد:

---

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        On Error Resume Next
        ListView1.Items.Clear()
        If ImgPaths <> Nothing Then
            System.IO.File.Delete(pics)
            Dim rnds As New Random
            Dim temps As String
            temps = rnds.Next(100000, 999999).ToString()
            File.Copy(ImgPaths, Environment.CurrentDirectory & "\CustomerPictures\" & temps & ".JPG")
            Dim stream As New FileStream(Environment.CurrentDirectory & "\CustomerPictures\" & temps & ".JPG", FileMode.Open)

            If (RadioButton4.Checked = True) Then
                ss = "Male"
            ElseIf (RadioButton3.Checked = True) Then
                ss = "Female"
            End If

            Dim con As New SqlConnection()
            con.ConnectionString = "Data Source=.\SQLExpress;AttachDbFilename=|DataDirectory|\Automation.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True;"
            con.Open()
            Dim com As New SqlCommand()
            com.Connection = con
            Dim sql As String
            sql = "UPDATE Login SET UserName = '" & TextBox8.Text & "', Password='" & TextBox7.Text & "', Gender='" & ss & "', BirthYear='" & ComboBox2.SelectedItem & "', Picture='" & temps & "', Phone='" & TextBox6.Text & "', Email='" & TextBox5.Text & "' WHERE  (ID = '" & Label12.Text & "')"
            com.CommandText = sql
            com.ExecuteNonQuery()
            MsgBox("User Edited Successfully")
            Me.Refresh()

        Else

            If (RadioButton4.Checked = True) Then
                ss1 = "Male"
            ElseIf (RadioButton3.Checked = True) Then
                ss1 = "Female"
            End If
            Dim con As New SqlConnection()
            con.ConnectionString = "Data Source=.\SQLExpress;AttachDbFilename=|DataDirectory|\Automation.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True;"
            con.Open()
            Dim com As New SqlCommand()
            com.Connection = con
            Dim sql As String
            sql = "UPDATE Login SET UserName = '" & TextBox8.Text & "', Password='" & TextBox7.Text & "', Gender='" & ss1 & "', BirthYear='" & ComboBox2.SelectedItem & "', Phone='" & TextBox6.Text & "', Email='" & TextBox5.Text & "' WHERE  (ID = '" & Label12.Text & "')"
            com.CommandText = sql
            com.ExecuteNonQuery()
            MsgBox("User Edited Successfully")
            Me.Refresh()
         
        End If

        Dim Lst As ListViewItem
        PubSqlCon.ConnectionString = PubStrConString
        PubSqlCom.CommandText = "SELECT * FROM  Login "
        PubSqlCom.Connection = PubSqlCon
        If PubSqlCon.State = ConnectionState.Closed Then PubSqlCon.Open()
        PubSqlDR = PubSqlCom.ExecuteReader()
        If PubSqlDR.HasRows Then
            While PubSqlDR.Read()
                Lst = ListView1.Items.Add(PubSqlDR("ID"))
                Lst.SubItems.Add(1).Text = (PubSqlDR("UserName"))
                Lst.SubItems.Add(2).Text = (PubSqlDR("Password"))
                Lst.SubItems.Add(3).Text = (PubSqlDR("Gender"))
                Lst.SubItems.Add(4).Text = (PubSqlDR("BirthYear"))
                Lst.SubItems.Add(5).Text = (PubSqlDR("Picture"))
                Lst.SubItems.Add(6).Text = (PubSqlDR("Phone"))
                Lst.SubItems.Add(7).Text = (PubSqlDR("Email"))
            End While
        End If

        If PubSqlCon.State = ConnectionState.Open Then PubSqlCon.Close()
        TextBox5.Text = ""
        TextBox6.Text = ""
        TextBox7.Text = ""
        TextBox8.Text = ""
        RadioButton3.Checked = False
        RadioButton4.Checked = False
        PictureBox2.Image = My.Resources.Pictures_Canon_icon
        ComboBox2.SelectedIndex = -1
        GroupBox6.Enabled = False
        GroupBox1.Enabled = False
    End Sub

---

راستش آلان واقعا شرایط درست فکر کردن رو ندارم .. اما چرا نوشتی :

کد:

---


TextBox5.Text = ""        TextBox6.Text = ""        TextBox7.Text = ""        TextBox8.Text = ""        RadioButton3.Checked = False        RadioButton4.Checked = False        PictureBox2.Image = My.Resources.Pictures_Canon_icon        ComboBox2.SelectedIndex = -1        GroupBox6.Enabled = False        GroupBox1.Enabled = False

---

شما بجای خالی کردن همون اطلاعات ویرایش شده به بدید .. با این کار کلا این مشکل حل می شه(البته بشتر مثل پاک کردن صورت مسله می مونه اما به هرحال مثل اسپرین می مونه)

نقل قول:

---

نوشته شده توسط samasara [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

راستش آلان واقعا شرایط درست فکر کردن رو ندارم .. اما چرا نوشتی :

کد:

---


TextBox5.Text = ""        TextBox6.Text = ""        TextBox7.Text = ""        TextBox8.Text = ""        RadioButton3.Checked = False        RadioButton4.Checked = False        PictureBox2.Image = My.Resources.Pictures_Canon_icon        ComboBox2.SelectedIndex = -1        GroupBox6.Enabled = False        GroupBox1.Enabled = False

---

شما بجای خالی کردن همون اطلاعات ویرایش شده به بدید .. با این کار کلا این مشکل حل می شه(البته بشتر مثل پاک کردن صورت مسله می مونه اما به هرحال مثل اسپرین می مونه)

---

این قسمت که فقط جهت خالی کردن مقدارهای داخل textbox ها و بقیه ابزارهای روی فرم یعد از ویرایش هست (برگشت به حالت اول)