For i= 0 To 74
scvImages.Panel.Height=(nbrImage+1)*(imgHeight+imgSpace)
When I Log the filenames they are correct but without double quotes (ImageList.Get(I)). When I add the quotes I get an error for the bmpImage.....line.
Is there a way of passing non-parameterized filenames to an imageview? PhilMac.
Dim imvImage As ImageView
Dim bmpImage As Bitmap
Dim ImageName As String
ImageList.Sort(True)
bmpImage.Initialize(File.DirAssets,"""&ImageList.Get(i)&""") 'ImageList.Get(i)) ' "image"&i&".jpg")
imvImage.Initialize("imvImage")
imvImage.Gravity=Gravity.FILL
imvImage.Tag=i
imvImage.Bitmap=bmpImage
scvImages.Panel.AddView(imvImage,lfmImage,i*(imgHeight+imgSpace),imgWidth,imgHeight)
NextDim bmpImage As Bitmap
Dim ImageName As String
ImageList.Sort(True)
bmpImage.Initialize(File.DirAssets,"""&ImageList.Get(i)&""") 'ImageList.Get(i)) ' "image"&i&".jpg")
imvImage.Initialize("imvImage")
imvImage.Gravity=Gravity.FILL
imvImage.Tag=i
imvImage.Bitmap=bmpImage
scvImages.Panel.AddView(imvImage,lfmImage,i*(imgHeight+imgSpace),imgWidth,imgHeight)
scvImages.Panel.Height=(nbrImage+1)*(imgHeight+imgSpace)
When I Log the filenames they are correct but without double quotes (ImageList.Get(I)). When I add the quotes I get an error for the bmpImage.....line.
Is there a way of passing non-parameterized filenames to an imageview? PhilMac.