images.gdiplus: GDI+ "ARGB" is little-endian, so really maps to opengl BGRA
parent
785907543f
commit
e228d8478f
|
@ -2,8 +2,8 @@
|
||||||
USING: accessors alien.c-types alien.data alien.enums
|
USING: accessors alien.c-types alien.data alien.enums
|
||||||
classes.struct destructors images images.loader
|
classes.struct destructors images images.loader
|
||||||
io.streams.limited kernel locals math windows.com
|
io.streams.limited kernel locals math windows.com
|
||||||
windows.gdiplus windows.streams windows.types ;
|
windows.gdiplus windows.streams windows.types typed
|
||||||
FROM: images => ARGB ;
|
byte-arrays grouping sequences ;
|
||||||
IN: images.gdiplus
|
IN: images.gdiplus
|
||||||
|
|
||||||
SINGLETON: gdi+-image
|
SINGLETON: gdi+-image
|
||||||
|
@ -48,7 +48,7 @@ SINGLETON: gdi+-image
|
||||||
image new
|
image new
|
||||||
{ w h } >>dim
|
{ w h } >>dim
|
||||||
pixels >>bitmap
|
pixels >>bitmap
|
||||||
ARGB >>component-order
|
BGRA >>component-order
|
||||||
ubyte-components >>component-type
|
ubyte-components >>component-type
|
||||||
f >>upside-down? ;
|
f >>upside-down? ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue