Image1.Picture = LoadPicture(App.Path + "\g(" & n & ").gif")
Image1.Picture = LoadPicture(App.Path + "\g(" + n + ").gif")