Picture1.Picture = LoadPicture(App.Path & "\xxx.gif")