Facing problem in legacy device in case of robitmap.in case of nonlegacy device below code is working good. but for legacy device(version 3.0) robitmap object giving problem.
first time
m.bMapImage = createobject("roBitmap", getting single images here)
m.bitmapimage creating robitmap object for first image.
but next time for second image(loop increment by 1) it's not creating object. and jump in else part
print "BMAPIMAGE_IS_INVALID "
.
is it legacy device problem for robitmap?
for j=0 to 9 step 1
if(m.bMapImage<>invalid)
m.bMapImage.clear(m.white)
end if
m.bMapImage = createobject("roBitmap", getting single images here)
m.msgport1 = CreateObject("roMessagePort")
if isLegacyDevice()
m.screen.SetPort(m.msgport1)
else
m.screen.SetMessagePort(m.msgport1)
end if
codes = bslUniversalControlEventCodes()
msg1=wait(1700, m.msgport1)
if m.bMapImage <> invalid
m.screen.DrawScaledObject(FIX(marginX), FIX(marginY), imageWidth / m.bMapImage.GetWidth(), imageHeight / m.bMapImage.GetHeight(),m.bMapImage)
else
print "BMAPIMAGE_IS_INVALID "
end if
end for
any suggestion would be thankful.