ll_libload shlwapi, "shlwapi.dll"
ll_getproc PathCanonicalize, "PathCanonicalizeA", shlwapi
#module
#deffunc canonicalize val, str
mref after, 24 : mref before, 33
sdim s, 256
ll_getptr s : ll_ret prm.0
ll_getptr before : ll_ret prm.1
ll_callfunc prm, 2, PathCanonicalize@
after = s
return
#global
sdim file, 256
file = "c:\\windows\\.\\system\\..\\explorer.exe"
font "", 20, 1
objsize 150, 30 : objmode 2
input file, 480, 25
button "元の形に戻す", *canon
stop
*canon
canonicalize file, file
objprm 0, file
stop
|