Centrovanie v ListView – Visual Basic – Fórum – Programujte.com

Čaute!

Do ListView zapisujem položky, kde mám 6 stĺpcov, ale problém je v tom, že keď dám uložiť program a zase ho spusím  sa všetky položky v stĺpcoch okrem prvého stĺpca sa posúvajú do prava. Ukladá mi to do TextFile. Skúšal som to aj vo vlastnostiach aj cez tento kód:

ListView1.Columns.Add("Column1", 100, HorizontalAlignment.Left)

        ListView1.Columns.Add("Column2", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("Column3", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("Column4", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("Column5", 100, HorizontalAlignment.Left)
        ListView1.Columns.Add("Column6", 100, HorizontalAlignment.Left)

A stále to nefunguje. Pre uloženie používam tento kód:

 Dim myWriter As New IO.StreamWriter(TextFile1)
        For Each myItem As ListViewItem In ListView1.Items
            myWriter.WriteLine(myItem.Text & " # " & myItem.SubItems(1).Text & " # " & myItem.SubItems(2).Text & " # " & myItem.SubItems(3).Text & " # " & myItem.SubItems(4).Text & " # " & myItem.SubItems(5).Text)
        Next

        myWriter.Close()
        Close()

Ak vie niekto poradiť vopred Ďakujem...

Hezký nový rok :)

Když do souboru neukládáš informaci o zarovnání sloupců, nemůžeš ji z něj ani načíst.

ListView1.Columns.Add - tohle je podle mě špatně. Co se stane je, že přidáš další sloupce (7 až 12) a ty jsou správně zarovnané, ale to je asi k ničemu, když chceš zarovnat sloupce 1 až 6. Musí to jít jinak.

Další věc je, že sloupec 1 má fixní zarovní, a to doleva. Nedá se to změnit. Když chceš mít 1 sloupec zarovnaný jinak, obejdeš to tím, že prvnímu sloupci nastavíš nulovou šířku, on de facto zmizí, je neviditelný a první viditelný sloupec je ve skutečnosti ten druhý s volitelným zarovnáním. Snad jsem to napsal správně.