Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Ландграф Павел © (2005-08-08 19:21:00)
Помню вроде была ф-ция, но не помню какая=) подскажите...

MBo (2005-09-28 08:24:00) [1]
>Может, потому что путь и файл должны реально существовать на диске?
Да, обязательно. Это очевидно хотя бы из того, что априори нельзя узнать, какое число будет стоять в ...shortn~NUMBER

Wood (2005-09-28 08:15:00) [2]
Может, потому что путь и файл должны реально существовать на диске?

Wood (2005-09-28 08:04:00) [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.
Подскажите что я не понял?

Ландграф Павел (2005-08-08 20:50:00) [4]
оно!=)

Fay (2005-08-08 19:29:00) [5]
Ландграф Павел © (08.08.05 19:21)
GetShortPathName ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »