listview eintrag in textbox Verfasst am: 23.05.2007, 06:25
hab mal wieder ein problem und zwar möchte ich, wenn ich spalte 1 markiert bzw angeklick hab
den inhalt von zelle 1 in textbox1 , zelle 2 in textbox2 und zelle 3 in texbox3
damit es dann hinterher so aussieht.
hoffe ihr könnt mir da helfen.
ZiG_ Überflieger
Anmeldedatum: 07.03.2007 Beiträge: 1248
Verfasst am: 23.05.2007, 08:14
Ich hoffe mal ich hab dich richtig verstanden.
Hier mal ein code mit dem du ermitteln kannst ob eine Zeile angeklickt wurde oder nicht, dann noch welche Zeile und ob es die linke Maustaste war.
Wenn alles erfüllt wurde, werden die Daten an die Textboxen übergeben.
[code]
Private list as listitem
Private Sub lv_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = 1 Then 'Nur wenn linke Maustaste betätigt wurde
With lv 'Dein ListView (Ich nenne es mal lv)
Set list = .HitTest(x, y) 'HitTest wird ausgeführt ob eine Zeile angeklickt wurde
If Not list Is Nothing Then 'Wenn nicht leer, dann wurde eine Zeile angeklickt
Set .SelectedItem = .ListItems(list.Index) 'Index wird an list übergeben
Text1.Text = list.Text 'Text wird übertragen
Text2.Text = list.SubItems(1) 'zweite Spalte wird übergeben
Text3.Text = list.SubItems(2) 'dritte Spalte wird übergeben
End If
End With
End If
Set list = Nothing
End Sub
[/code]
Hier wird jetzt nur reagiert wenn die linke Maustaste gedrückt wurde.
So kannst du zusätzlich für die rechte Maustaste vielleicht ein Popupmenü einbauen.
Sollte so funktionieren. Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)