Hi Friedrich.

API works fine here, code as follows:

program
map
module('WinAPI')
ExpandEnvironmentStrings (*cstring lpSrc, *cstring lpDst, long
nSize),long,pascal,raw,name('ExpandEnvironmentStri ngsA'),proc
end
end
p1 cstring(256)
p2 cstring(1024)
p3 long
code
p1 = '%PATH%'
p3 = size(p2)
ExpandEnvironmentStrings (p1, p2, p3)
stop(p2)

SB still returning nothing.

Best Regards,

Gary.

Gary James
Strategy, South Africa
Web: www.strategyonline.co.za
Blog: www.strategyonline.co.za/blog