Wywolanie pliku z zasobów.

Czy moze mi ktos poprawić kod zeby działał ??:

procedure TForm1.Wypisz(i:byte);
begin
Jpeg:=TJPEGImage.Create;
Image1.picture.jpeg;
Label2.Caption := Nazwisko[i];
Label4.Caption := Imie[i];
Label6.Caption := Wiek[i];
Label8.Caption := Ksywka[i];
Image1.Picture.JPEGimage.LoadFromResourceName(hinstance,IntToStr(i)+'.JPG');
Jpeg.Free;
end;

Za pomoc z góry dzieki.

zwróć uwagę że <font color="darkblue">.JPG</span> to nie to samo co <font color="blue">.jpg</span>

Image1.picture.jpeg;

Co to za dziwna linijka?