掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ショートカットの情報取得するには? (ID:18473)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
HDDを見ていたら,こんなのがありました. 使えるのではないかと思います. interface部でもimplementation部も構いません.この関数を使用する前に 以下のコードを追加して下さい. function GetLongPathNameA(ShortPathName: PChar; LongPathName: PChar; cchBuffer: Integer): Integer; stdcall; external 'kernel32.dll'; //==================================================================== // kernel32.dll内の関数GetLongPathNameを利用 // GetLongPathNameGetFullPathNameと違いWin98でも大文字と小文字を区 // 別して取得可能 //==================================================================== function TForm1.ShortToLongPath(ShortName: String): String; var Buffer : array[0..MAX_PATH] of Char; begin if (GetLongPathNameA(PChar(ShortName),Buffer,SizeOf(Buffer)))<>0 then begin Result:=Buffer; end else begin Result:=ShortName; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.