przegladarka i access violation

0

Witam!
Napisalem taka mala przegladarke plikow graficznych JPG. Sprawa jest bardzo prosta - przegladarka ma Filelistbox'a, ktory wyswietla tylko pliki *.jpg, oprocz tego jest komponent Image, ktory zaznaczony w Filelistbox'ie element powinien wyswietlic. I wszystko byloby fajnie gdyby nie blad :( Po zaznaczeniu na liscie jakiegos elementu zamiast wyswietlic sie na komponencie Image, wyskakuje taki oto windowsowski blad:
"Acces violation at adress 004696C6 in module 'Project1.exe'. Read of adress 00000000". :>
Podaje prosciutki kodzik programu (czyzby tu byl jakis blad ??):

procedure TForm1.FileListBox1Change(Sender: TObject);
begin
if Filelistbox1.FileName <> '' then
 begin
  Image1.Picture.Graphic.LoadFromFile(Filelistbox1.FileName);
 end;
end;
0

sprobuj tak:

Image1.Picture.LoadFromFile(Filelistbox1.FileName);

//bez "graphics"

0

Dziala !! :) Dzieki za pomoc :)

0

To tak przy okazji, nie bede juz zakladac nowego tematu :)
W FileListBox'ie mamy wlasciwosc "mask" i tam mozna wpisywac maske roznego typu plikow. Np ja mam wpisane *.jpg i Filelistbox wyswietla tylko pliki jpg -> oczywistosc.
Tylko jak zadeklarowac 2 rozne rozszerzenia np *.jpg i *.bmp ?? Probowalem z przecinkiem, ze srednikiem i niestety cos to nie chce dzialac.
Tak wiec czy zna ktos odpowiednia skladnie, zeby we wlasciwosc "mask" wpisac wiecej niz 1 rozszerzenie do wyswietlenia ??

0

U mnie działa np.
.map;.exe
user image

0
Qyon napisał(a)

U mnie działa np.: .map;.exe

U mnie też bez problemu średnik załatwia sprawę

0

hehe no to juz wiem co robilem zle... Pisalem po sredniku spacje i dlatego nie chcialo dzialac :(
Juz wszystko dziala - wielkie dzieki za pomoc :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1