Как загрузить PNG картинки в Image?

@InfoMaster · Регистрация: 12.08.2011

Author24 — интернет-сервис помощи студентам

Всем доброго времени суток. Вот такая проблемка возникла: загружаю PNG картинку через Object Inspector - все отлично работает. Как тока пишу в коде:

Delphi

1	sSpeedButton1.Glyph.LoadFromFile('1.png');

Все сразу ошибка...Вложение 240077

Что делать?

03.03.2013, 21:51

Свойство Glyph - TBitmap и соответственно может грузить только битмапы. Создаёте экземпляр TPicture, грузите png и присваиваете Glyph-у.

Delphi

procedure TForm1.FormCreate(Sender: TObject);
var
  picture : TPicture;
begin
  Picture := TPicture.Create;
  Picture.LoadFromFile('myFile.png');
  sb.Glyph.Assign(Picture.Graphic);
  Picture.Free;
end;

	03.03.2013, 21:51