# Re: 关于GetWindowsDirectory API的问题..

Posted by 小吴 on June 04, 1997 at 00:32:59:

In Reply to: 关于GetWindowsDirectory API的问题.. posted by SATURNBOY on June 03, 1997 at 16:50:12:

首先，WinDir 不建议使用固定长度字串变数，建议用下面的写法
Dim WinDir As String
WinDir = Space$(20)

然后取得资料之后要将末尾空白去掉
WinDir = Left$(WinDir, Rtval)

这样才对。上面的 code 在 Windows 的目录是用中文命名时会破功。不过好像没人这么做，所以就放心用吧!

: HI! 小吴好!
: 程式码如下:(在vb6.0下,使用WIN95a)
: -------------------------------------------------------------------------------------------
: Dim WinDir As String * 20
: Dim Rtval As Integer

: Rtval = GetWindowsDirectory(WinDir, 20)
: '抓出windows的目录 WinDir = c:\windows

: label1.Caption = WinDir & "\win.ini"
: '应该label1会显示 c:\windows\win.ini
: '可是结果却还是 c:\windows
: 为啥会如此呢?

: 谢啦!

Follow Ups: