Pitanja za Visual Basic 6

[GrimReaper]

1.Kako da ispisem (recimo u nekom labelu) ime nekog fajla? Ali samo ime ne i direktorijum (probao sam sa .FileName ali to ispisuje sve, kao recimo C:\Program Files\...)
2.Kako da za Common Dialog postavim dva filtera koji ce da se menjaju preko padajuceg menija?

Hvala unapred!

 

[GrimReaper]

Ma hajde ljudi, nije valjda da niko to ne zna?

 

[GrimReaper]

E uspeo sam i sam da uradim, ali imam jos dva nova pitanja:
1. Kako da se pritiskom na Cancel Common Dialog zatvara ne radeci nista(da ne radi istu akciju koju radi na Open)
2. Kako da sve labele iste boje oznacim jednim imenom, da budu jedna grupa(recimo da se zovu Selected) ako je to moguce.

 

[mslav]

Kako si uradio za dva filtera???

P.S.
Za Cancel =>

Private Sub cmdGumb_()

'ide kod tra la la
On Error GoTo Errhandler:
'ovde kucas uobicajen kod
Errhandler:
'ovde kucas sta ce da bude ako ides na Cancel

End Sub

 

[GrimReaper]

Pa, isao sam na tref 8) .Kod je:
<Dialog Name>.Filter = "Filter1|ekstenzije" + "|Filter2|ekstenzije"
E hvala ti sto si mi odgovorio, barem se neko smilovao . Imam jos jedno pitanje, pa se nadam da mi mozes odgovoriti. Kako da program prepoznaje deo imena (u mom slucaju ekstenziju) pa da ga na osnovu toga smesta u jednu ili drugu kolonu?
PS Jel da napravim tacno kako si napisao ili da stavim Private Sub <Ime Komande>_Click. A za razvrstavanje labela prema boji jel znas?

 

[mslav]

Za labele ne znam :? , za extenziju je odavno bila slicna tema, a ono sam Private Sub sam lupio , stavi ono sto tebi treba, nisam siguran, ali mislim da ne mora ni Errhandler nego bilo sta drugo...

 

[GrimReaper]

A jel mozes da mi kazes ime te teme ako se secas?

 

[torque]

Za prepoznavanje ekstenzije probaj ovako nesto:

ekstenzija = Right(ImeFajla,3)
Select Case ekstenzija
   Case "mp3"
      'sta da radi 
   Case "wma"
      'sta da radi
End Select

A za filter mozes i ovako:

CommonDialog1.Filter = "Muzika (*.mp3;*.wma)|*.mp3;*wma|Slike (*.jpg;*.gif)|*.jpg;*.gif"

Ovo su samo primeri a ti ces iz njih izvuci sta tebi treba.
Pozdrav.

 

[GrimReaper]

E hvala ti puno. A jel znas mozda za ono svrstavanje u jednu grupu(ne mora po boji samo da se svi labeli svrstaju u jednu grupu koja ce recimo da se zove Labels)?

 

[torque]

Pa ako je to to na sta je mislim onda samo ih indeksiras. Recimo Labels(1),Labels(2)...

 

[GrimReaper]

E, mslav, ono za Cancel ne radi (ne moze da zatvori Common Dialog ne postoji takva komanda)!

 

[mslav]

E, mslav, ono za Cancel ne radi (ne moze da zatvori Common Dialog ne postoji takva komanda)!

Probaj da pre onog 'tra la la koda ukucas
CommonDialogBox1.CancelError = True 'umesto CommonDialogBox1 otkucaj njegovo ime.

 

[GrimReaper]

Ma znam ja sve to, ali ne postoji komanda koja mi treba (da zatvori Common Dialog) :?

 

[mslav]

Probaj posle Errhandlera: -> da otkucas Exit Sub, ili CommonDialogBox1.->pa neka komanda na koju se zatvara.

 

[GrimReaper]

Uspelo mi je sa Exit Sub, hvala ti.

 

[GrimReaper]

Ljudi, opet mi treba nesto ops: Jel moze da se napravi file iz Visual Basica (recimo neka slika) pa da mu se dodeljuju parametri (recimo kod slike ekstenzija, velicina itd.)

 

[mslav]

moze





























ne mogu sad da se setim recu ti kasnije;
ali probaj da ubacujes neke kontrole, pa da im trazis opcije i sl. Ja sam tako provalio 75% svih kodova koje sada znam

 

[GrimReaper]

E ako mi verujes svasta sam pokusao ali nista mi nije uspelo. Ima nesto za neki stdPicture al mnogo je komplikovano, ne zelim da zalazim u to ako nije to to 8) .Inace imam jos jedno pitanje ( ops: ops: ops: sramota me je koliko vas gnjavim ali eto moram ). Kako da command button bude enabled ali da mu se ne pojavljuju one crtice kad kliknem na njega.

 

[mslav]

Ne znam ni ja, i ja bih zeleo da to prokljuvim
B:-)

 

[ArgusPanoptes]

Rj Grim Riper koliko imas godina?

 

[GrimReaper]

Zasto?

 

[GrimReaper]

Ajde, ljudi, samo mi jos te dve stvari ostale da zavrsim program (ono za kreiranje fajlova mi treba za slike i za muzicke fajlove). Svima koji su mi pomogli obecavam da cu se oduziti (naravno ako zaradim nesto )

 

[mslav]

Za slike ne znam, a sta je to za muziku?

 

[GrimReaper]

Pa isto tako da napravim muzicke fajlove i da ih podesavam.

 

[mslav]

Ne znam stvarno, zao mi je... Pogledaj po nekim drugim forumima.