I tried but I still have some problem... it seems that the table is empty, very strange.. here the code I wrote to test the function:
Code: Select all
@VERSION 5,0
@APPTITLE "Join Files"
@APPVERSION "$VER: Hollywood 5.0 (12-March-12)"
@DISPLAY {Title = "Join Files"}
@SCREEN {Mode = "ask", Width = 640, Height = 480}
pattern$ = "jpg|jpeg|bmp|tif|gif|png"
title$ = "Choose files"
tempfile$ = "temp.png"
f$ = FileRequest(title$,pattern$,#REQ_MULTISELECT)
NPrint("Path:", PathPart(f$[0]))
NPrint("Files selected:", ListItems(f$) - 1)
While f$[c] <> ""
NPrint(FilePart(f$[c]))
c = c + 1
Wend
d = 1 ; id brush counter
While f$[e] <> ""
LoadBrush(d,f$[e])
ret_val, table$ = IsPicture(f$[e])
If ret_val = True
NPrint("The file is an image? :", ret_val)
NPrint("Width:", table$[e])
NPrint("Height:", table$[e])
NPrint("Alpha:", table$[e])
NPrint("Vector:", table$[e])
Else
NPrint("The file is not an image...")
EndIf
d = d + 1 ;counter
e = e + 1 ;counter
Wend
WaitLeftMouse()
End()
That's the error that Hollywood report to me:
Error in line 32 (main_util.hws): Table field 0 was not initialized!