OberonCore
https://forum.oberoncore.ru/

Info21sysTPGraphics Сохранение BMP файла
https://forum.oberoncore.ru/viewtopic.php?f=24&t=432
Страница 1 из 1

Автор:  Kubanych [ Понедельник, 16 Апрель, 2007 15:18 ]
Заголовок сообщения:  Info21sysTPGraphics Сохранение BMP файла

Здравствуйте. Попробовал изменить Info21sysTPGraphics следующим образом.

PROCEDURE Save* (folder,file:ARRAY OF CHAR);
VAR loc:Files.Locator;
f:Files.File;
res:INTEGER;
BEGIN
loc := Files.dir.This(folder$);
f:= Files.dir.New( loc, Files.dontAsk ); ASSERT( f # NIL );

HostBitmaps.ExportBitmap(v,f);

f.Register(file$ ,'', Files.dontAsk, res );
f.Close;
END Save;

Однако, после вывода рисунка и вызова этой процедуры получается
bmp файл нулевой длины. В чем может быть ошибка?

С уважением,

Автор:  Илья Ермаков [ Вторник, 29 Май, 2007 22:11 ]
Заголовок сообщения: 

Дело в том, что ExportBitmap сохраняет только отображение, которое уже является DIB-картинкой (имеет тип HostBitmaps.StdView) - Вы это увидите, если взглянете на ее исходный код.
Сначала отображение надо привести к DIB вызовом HostBitmaps.ViewToBitmap, а уже потом сохранять полученный View через ExportBitmap.

Страница 1 из 1 Часовой пояс: UTC + 3 часа
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/