Listbox1.Items.SaveToFile('IMAGES')
FileName:=Path+ListBox1.Items[ListBox1.ItemIndex] ; Image1.Picture.LoadFromFile(FileName) ;