Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Можно ли скопировать облать из wmf файла в bitmap [D5, D7, Win95/98, WinME, NT4, Win2k, WinXP]


Degobar ©   (2005-01-20 14:53:00) 

Как скопировать облать из wmf файла в bitmap ???

Все действия приводят к ошибке

"Can only modify an image if it contains a bitmap"


LM2   (2005-01-20 16:29:00) [1]

первый способ

var
mf: TMetafile;
bmp: TBitmap;
begin
 mf := TMetafile.Create;
 mf.LoadFromFile('C:\Program Files\Microsoft Office\CLIPART\PUB60COR\AN00010_.WMF');
 bmp := TBitmap.Create;
 bmp.Height:=mf.Height;
 bmp.Width :=mf.Width;
 bmp.Canvas.Draw(0, 0, mf);
 Canvas.Draw(0, 0, bmp);
 bmp.Free;
 mf.Free;
end;


второй способ работает только с EMF или с 32-х разрядными WMF
PlayEnhMetaFile


Наверх

Титульная страница Поиск, карта сайта Написать письмо