home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FCE Gold Plus
/
GOLD.iso
/
pc
/
fscommand
/
Xtras
/
FileXtra4-Mac.sit
/
FileXtra4_test.dir
/
00001_Script_test_bug1()
next >
Wrap
Text File
|
2002-12-20
|
728b
|
20 lines
on test_bug1
fxObj = xtra("FileXtra4").new()
thePath = "Macintosh HD:Test Folder Name Really Long1:Test Folder Name Really Long2:Test Folder Name Really Long3:"
thePath = thePath & "Test Folder Name Really Long4:Test Folder Name Really Long5:Test Folder Name Really Long6:"
thePath = thePath & "Test Folder Name Really Long7:Test Folder Name Really Long8:Test Folder Name Really Long9:"
put "test_bug1(): length of path == " & string(thePath.length)
theList = fxObj.fx_FolderToList(thePath)
put theList
errCode = fxObj.fx_ErrorNumber()
put "FX3 error code: " & string(errCode)
if errCode <> 0 then
put " error string: " & fxObj.fx_ErrorString()
end if
fxObj = 0
end