из полного имени (путь) получить досовское 8.3

← →
Ландграф Павел © (2005-08-08 19:21) [0]

Помню вроде была ф-ция, но не помню какая=) подскажите...

← →
Fay © (2005-08-08 19:29) [1]

Ландграф Павел © (08.08.05 19:21)
GetShortPathName ?

← →
Ландграф Павел © (2005-08-08 20:50) [2]

оно!=)

← →
Wood (2005-09-28 08:04) [3]

Может я туплю, но у меня не получается:
....
var
Buffer: PChar;
Buffer1: PChar;
pat: AnsiString;
begin
pat:="C:\Documents and Settings\User All\Мои документы\file n. doc";
\\путь к примеру
try
GetMem(Buffer,Length(pat) + 1);
StrCopy(Buffer, PChar(pat));
GetMem(Buffer1,255);
GetShortPathName(Buffer,Buffer1,255);
Label1.Caption:= StrPas(Buffer1);
finally
FreeMem(Buffer);
FreeMem(Buffer1);
end;
end;

Если указать путь с помощью Opendialog, то нормально. Я не хочу указывать в Opendialog.
Подскажите что я не понял?

← →
Wood (2005-09-28 08:15) [4]

Может, потому что путь и файл должны реально существовать на диске?

>Может, потому что путь и файл должны реально существовать на диске?
Да, обязательно. Это очевидно хотя бы из того, что априори нельзя узнать, какое число будет стоять в ...shortn~NUMBER

из полного имени (путь) получить досовское 8.3 Найти похожие ветки