この発言は
#00363　じゅにゃ        さんのWindowsディレクトリを取り出す
に対するコメントです

この発言に対し以下のコメントが寄せられています

#00365　べあ            さん　RE^2:Windowsディレクトリを取り出す




　じゅにゃ さん、こんにちは。

文字列用のメモリはヒープでなくスタックに取ったほうが楽です。

function WhereisWinDir: string;
var
  Buffer: array[0..MAX_PATH] of Char;
begin
  Result := '';
  if GetWindowsDirectory(Buffer, MAX_PATH) <> 0 then begin
    Result := Buffer;
  end;
end;

                                                    ぜえた (QZC05100)

Original document by ぜえた          氏 ID:(QZC05100)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。