problem sa slikom u komandnom dugmetom

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

imam aplikaciju pravljenu u visual basicu 6. Napravio sam setup medjutim imam problem sa slikom u komandnom dugmetu.
Stavio sam u picture da se pojavljuje jedna slika i to je ok.ali takodje sam postavio i kod

Private Sub cmdIzadji_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Me.Image2.Picture = LoadPicture("kraj1.jpg") End Sub

kojim kad kliknem na to dugme pojavljuje se druga slika,ali ja dobijam gresku

run-time error 53
file not found kraj1.
pokusao sam i sa ovim

Me.Image2.Picture = LoadPicture("H:\Documents and Settings\bs\My Documents\VB\moj projekat\slike\kraj1.jpg")

ali kad sam napravio setup paket i instalirao program na drugom kompjuteru dobijam ponovo gresku jer ovog fajla nema na toj lokaciji.
Nije mi jasno kako ga nije smetio u setup paketu
Ima li neka druga komanda da ovaj problem resim?
Hvala[/code]

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Kada postavis samo ime slike, bez putanje/foldera, program ce fajl potraziti u zadnjem folderu kojem si pristupao iz programa.
Znaci, ukoliko si u tvom programu otvarao neki fajl iz recimo C:\neki_folder, i nakon toga pokusas da ucitas kraj1.jpg, program ce fajl potraziti kao c:\neki_folder\kraj1.jpg
Trenutni folder je sadrzan u varijabli CurrentFolder (Application.CurrentFolder).

E sada, ja ne mogu konkretno da ti kazem kako to da resis u VB posto ne radim u tom jeziku. Ovo sto sam napisao vazi za sve jezike.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Greska je u ovom:

Me.Image2.Picture = LoadPicture("kraj1.jpg")

Verovatno se razlikuje putanja fajla-slike na racunaru na kome instaliras taj program, od putanje na tvom racunaru.

Probaj ovako:
Me.Picture = LoadPicture(App.Path & "\" & "01-wlp11.jpg")

Nadam se da ti je kod jasan, svako moze da ga "provali".