Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Вниз

Как из сокращённого пути сделать полный?   Найти похожие ветки 

← →
rolex   (2005-06-08 20:39) [0]

К примеру имеется адрес C:\DOCUM~1\..., как его преобразовать в полный?

---

← →
EVD ©   (2005-06-08 20:58) [1]

GetLongPathName + F1

---

← →
Alx2 ©   (2005-06-08 20:59) [2]

GetFullPathName?

---

← →
Юрий Зотов ©   (2005-06-08 21:07) [3]


function GetLongPathName(lpszShortName: LPCTSTR;
 lpszLongName: LPTSTR; cchBuffer: DWORD): DWORD; stdcall;
 external kernel32 name "GetLongPathNameA";

function ShortPathToLongPath(const ShortPath: string): string;
var
 Buff: packed array[0..MAX_PATH] of char;
begin
 SetString(Result, Buff, GetLongPathName(PChar(ShortPath), Buff, SizeOf(Buff)))
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 Caption := ShortPathToLongPath("C:\Progra~1\Common~1\Borlan~1\MSHelp\Win32.hlp")
end;


---

← →
rolex   (2005-06-08 21:17) [4]

спасибо!

---

← →
Alx2 ©   (2005-06-08 21:36) [5]

>Юрий Зотов ©   (08.06.05 21:07)

>GetLongPathName

О ней почему-то нет информации в Windows SDK (идущем в комлекте с D6). Интересно, есть причины? Или я не там ищу?

---

← →
Юрий Зотов ©   (2005-06-08 21:57) [6]

> Alx2 ©   (08.06.05 21:36) [5]

Возраст SDK из комплекта Delphi - 100 лет в обед, там многого нет. А GetLongPathName появилась начиная с Win98. Она даже в Delphi 7 не декларирована (кстати, непонятно почему - внутри VCL она используется). Поэтому я и привел ее декларацию здесь.

Юзайте свежие выпуски MSDN - они рулез. А SDK из комплекта Delphi - это так, вспомогательный инструмент для быстрой справки по базовым, давно устоявшимся вещам.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.043 c