Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
procedureConvertWMF2BMP (const
WMFFileName, BMPFileName: TFileName); var
MetaFile: TMetafile; Bitmap: TBitmap; begin
Metafile := TMetaFile.Create; Bitmap := TBitmap.Create; try
MetaFile.LoadFromFile(WMFFileName); with
Bitmap do
begin
Height := Metafile.Height; Width := Metafile.Width; Canvas.Draw(0, 0, MetaFile); SaveToFile(BMPFileName); end
; finally
Bitmap.Free; MetaFile.Free; end
; end
; // Использование: ConvertWMF2BMP('c:mypic.wmf', 'c:mypic.bmp')