Проверил, создается битая картинка. Ни один просмотрщик картинок не видит её, и хостинг картинок не может её загрузить. Открыл через пикаса, и сделал скрин:
Ну ведь тот же код, на д7 работает как нормально)
убрал переменную в unit1.
создаю (Bild := Tbitmap.Create
при открытии второй формы
при закрытии второй формы присваиваю Image.Picture.Bitmap := Bild;
потом Bild.Free.
всё так и осталось