Перейти к содержанию
Fire Monkey от А до Я
  • 0

[Windows] Как загрузить HBITMAP в TBitmap ?


Gor777

Вопрос

Рекомендуемые сообщения

  • 0

Вам требуется, в первую очередь, подключить модули для возможности использования HBITMAP

uses
  ...
  {$IFDEF MSWINDOWS}
  Vcl.Graphics,
  {$ENDIF}
  ...

Далее, предположим, у Вас есть изображение tmpBmp - в формате Vcl.Graphics.TBitmap (для примера - я его гружу из файла. Это как-раз тот формат, о котором идет речь в Вашем вопросе)

Ну и далее все действия Вам должны быть понятны..

var
  tmpBmp : Vcl.Graphics.TBitmap;
  tmpStream : TMemoryStream;
begin
  tmpBmp := Vcl.Graphics.TBitmap.Create;
  try
    tmpBmp.LoadFromFile('d:/index_cr.bmp');

    tmpStream := TMemoryStream.Create;
    tmpBmp.SaveToStream(tmpStream);

    Image1.Bitmap.LoadFromStream(tmpStream);
  finally
    tmpBmp.Free;
    tmpStream.Free;
  end;
end;

Думаю, что все достаточно просто и понятно написал

 

P.S. все написано "на коленке" и за пару минут, так-что сорри, что не учитывал все "нюансы".

Собственно FMX сделает за вас всю работу по преобразованию...

Изменено пользователем Brovin Yaroslav
Ссылка на комментарий
Гость
Эта тема закрыта для публикации ответов.
×
×
  • Создать...