Code: Select all
iError:= gflLoadThumbnail( 'filename.gif', 100, 100, @pBmp, @vLoadParam, vFileInfo );
Is there any way to also directly give a GFL_COLOR to use for the canvas/background?
Moderators: XnTriq, helmut, xnview
Code: Select all
iError:= gflLoadThumbnail( 'filename.gif', 100, 100, @pBmp, @vLoadParam, vFileInfo );
Code: Select all
var
vWhite: GFL_COLOR;
iError: GFL_ERROR;
begin
...
iError:= gflLoadThumbnail( 'filename.gif', 100, 100, @pBmp, @vLoadParam, vFileInfo );
if iError<> GFL_NO_ERROR then exit;
vWhite.Red:= 255;
vWhite.Green:= 255;
vWhite.Blue:= 255;
vWhite.Alpha:= 0;
iError:= gflResizeCanvas( pBmp^, nil, 100, 100, GFL_CANVASRESIZE_CENTER, @vWhite );