Treba mi neki kratak tutorijal za ListView kontrolu.Imam gomilu literatutu za Vb6 ali skoro da uopste nesto ima za ovu kontrolu a znam da je dosta mocna kontrola sto se tice povezivanja sa BP.
Tutorijal za ListView kontrola u vb6
Zaključano
Zakačeno
Jel ti treba nesto konkretno... Posto je sve, manje-vise , oko te kontrole vec intuitivno jasno.
Inače ne volim da šaljem ljude na google, ali u ovakvim slučajevima je to neophodno, jer ima gomile primera i tutorijala na netu
http://www.google.com/search?h...GGGL_enRS348RS348&ie=UTF-8
Ako imaš neko konkretno pitanje, slobodno pitaj.
http://www.google.com/search?h...GGGL_enRS348RS348&ie=UTF-8
Ako imaš neko konkretno pitanje, slobodno pitaj.
Potpis
-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti
Evo najjednostavniji primjer....
Kreiraj jednu listbox kontrolu i dva komandna dugmeta i unesi sledeci kod...
I eto ti resenja...
Da pojasnim i ovo...
List1.AddItem-dodajes u listu
"Bojan" - vrijednost koju dodajes, mozes dodati npr. vrijednost iz nekog textboxa samo tad netrebas navodnike...npr
, - to ti je separator
1 - ovo ti je index , u texbox kontroli pocetni index je 0
Jesi to zeleo...???
Kreiraj jednu listbox kontrolu i dva komandna dugmeta i unesi sledeci kod...
Code:
Private Sub Command1_Click()
List1.AddItem "Milan", 0
List1.AddItem "Bojan", 1
List1.AddItem "Stojan", 2
End Sub
Private Sub Command2_Click()
List1.SetFocus
List1.Selected(1) = True
End Sub
Private Sub Command1_Click()
List1.AddItem "Milan", 0
List1.AddItem "Bojan", 1
List1.AddItem "Stojan", 2
End Sub
Private Sub Command2_Click()
List1.SetFocus
List1.Selected(1) = True
End Sub
I eto ti resenja...
Da pojasnim i ovo...
Code:
List1.AddItem "Bojan", 1
List1.AddItem "Bojan", 1
List1.AddItem-dodajes u listu
"Bojan" - vrijednost koju dodajes, mozes dodati npr. vrijednost iz nekog textboxa samo tad netrebas navodnike...npr
Code:
List1.AddItem Text1.Text ,1
List1.AddItem Text1.Text ,1
, - to ti je separator
1 - ovo ti je index , u texbox kontroli pocetni index je 0
Code:
List1.Selected(1) = True
sa ovim postavljes vrijednost drugog clana u texboxu da bude selektovana, jer je vrijednost za prvi 0 tj. kod List1.Selected(1) = True
Code:
List1.Selected(0) = True
, bi selektovao prvu vrijednost.List1.Selected(0) = True
Jesi to zeleo...???
Malo kasnim ali evo konkretno pitanje:
Ako je listview popunjen podatocima iz jedne tabele iz access baze(recimi da ima 5 kolona i 5 redova)kako sad preko njega izbrisati te podatke u tabelu.
Ako je listview popunjen podatocima iz jedne tabele iz access baze(recimi da ima 5 kolona i 5 redova)kako sad preko njega izbrisati te podatke u tabelu.
Ajd jos malo pojasni ..., sta da brises , odakle, kojim dogadjajem bi uradio to sto zelis?
Ako na pr. imam sledece stavke u listview1 kontrolu:
sifra opis cena kol ukupna_cena
0001 mleko 30 4 120
0002 jogurt 50 2 100 itd
kako da ovo izbrisem sa ove kontrole a istovremeno da mi se izbrise iz tabele sa kojom je povezana ova kontrola.
Mislim da sam bio jasan
sifra opis cena kol ukupna_cena
0001 mleko 30 4 120
0002 jogurt 50 2 100 itd
kako da ovo izbrisem sa ove kontrole a istovremeno da mi se izbrise iz tabele sa kojom je povezana ova kontrola.
Mislim da sam bio jasan
Ako sam te dobro razumio...ja bi to odradio ovako..
napravis neko kontrolno dugme npr. "Obrisi"
i u njega ubacis kod...
Ovo ima svoje nedostatke ali uglavnom bi odradilo taj posao
napravis neko kontrolno dugme npr. "Obrisi"
i u njega ubacis kod...
Code:
Private Sub Obrisi_Click()
List1.Clear
While Data1.Recordset.Fields("Sifra").Value <> ""
Data1.Recordset.MoveFirst
Data1.Recordset.Delete
Data1.UpdateRecord
End Sub
Private Sub Obrisi_Click()
List1.Clear
While Data1.Recordset.Fields("Sifra").Value <> ""
Data1.Recordset.MoveFirst
Data1.Recordset.Delete
Data1.UpdateRecord
End Sub
Ovo ima svoje nedostatke ali uglavnom bi odradilo taj posao