Retrieveimage issue

Cableguy

Expert
Licensed User
Longtime User
Retrieveimage issue (FIXED)

Hi,

I have this code:

B4X:
Sub Retrieve_Images
FileOpen(c1,apppath&"\ImageSet\standart.dat",cRandom)
Bin.New1(c1,true)
for x = 1 to Nrmg
ImageList.Add(Bin.RetrieveImage)
next n 
msgbox(imagelist.Count)
fileclose(c1)
End Sub

NrImg is a Global and is set in the caling sub...the standart file contains 50 files and the messagebox returns me 0...

Whats wrong?

FIXED::sign0161: Never Mind, Its a typo...Nrmg is in fact NrImg, Thats what you get for buying cheap wirelles keyboads!!!!:sign0013:
 
Last edited:
Top