diff options
| author | Sverker Eriksson <[email protected]> | 2016-03-08 14:46:09 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2016-03-08 14:46:09 +0100 |
| commit | 7ba125fafa1da21d8780bcdae97f1ef56fb6a39a (patch) | |
| tree | 671891684d94d78211f501371187bb2b425bcdaa /lib/wx/test/wx_basic_SUITE.erl | |
| parent | 2dc84032fd2a957b1625aba9bbcea9cbc04aa0df (diff) | |
| parent | 652b67ba8d15ff415a8f30034bd9eb03a9c2b8ca (diff) | |
| download | otp-7ba125fafa1da21d8780bcdae97f1ef56fb6a39a.tar.gz otp-7ba125fafa1da21d8780bcdae97f1ef56fb6a39a.tar.bz2 otp-7ba125fafa1da21d8780bcdae97f1ef56fb6a39a.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/wx/test/wx_basic_SUITE.erl')
| -rw-r--r-- | lib/wx/test/wx_basic_SUITE.erl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/wx/test/wx_basic_SUITE.erl b/lib/wx/test/wx_basic_SUITE.erl index 2c746158e5..0b919f6254 100644 --- a/lib/wx/test/wx_basic_SUITE.erl +++ b/lib/wx/test/wx_basic_SUITE.erl @@ -338,6 +338,20 @@ data_types(_Config) -> ?m(true, is_boolean(wxCalendarCtrl:setDate(Cal,DateTime))), ?m({Date,_}, wxCalendarCtrl:getDate(Cal)), + %% Images, test sending and reading binaries + Colors = << <<200:8, 199:8, 198:8 >> || _ <- lists:seq(1, 128*64) >>, + Alpha = << <<255:8>> || _ <- lists:seq(1, 128*64) >>, + ImgRGB = ?mt(wxImage, wxImage:new(128, 64, Colors)), + ?m(true, wxImage:ok(ImgRGB)), + ?m(false, wxImage:hasAlpha(ImgRGB)), + ?m(Colors, wxImage:getData(ImgRGB)), + + ImgRGBA = ?mt(wxImage, wxImage:new(128, 64, Colors, Alpha)), + ?m(true, wxImage:ok(ImgRGBA)), + ?m(true, wxImage:hasAlpha(ImgRGBA)), + ?m(Colors, wxImage:getData(ImgRGBA)), + ?m(Alpha, wxImage:getAlpha(ImgRGBA)), + wxClientDC:destroy(CDC), %%wx_test_lib:wx_destroy(Frame,Config). wx:destroy(). |