Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Полное имя файла (не бейте ногами) [D5, Win95/98]


V.exeR ©   (2003-01-27 11:33:00) 

...не используя SysUtils. Я нашел пару примеров, но один использует SysUtils, второй неизвестную никому функцию ShortToLongFileName. А надо позарез. Помогите, кому не жалко =)


V.exeR   (2003-01-27 13:00:00) [1]

2 Serious Sam:

Спасибо огромное, этот пример работает =)
Всем спасибо, тема исчерпана...


V.exeR   (2003-01-27 12:54:00) [2]

А кстати GetFullPathName не работает ни черта =(

var
w:PChar;
e:string;
...
D:=255;
SetLength(e,D);
D:=GetFullPathName(PChar(ShortFileNameWithPath),D,PChar(e),w);
SetLength(e,D);

и по-прежнему в e находится старый короткий путь


Игорь Шевченко   (2003-01-27 12:52:00) [3]

А... вопрос не до конца дочитал. Ну да, GetLongPathName


V.exeR   (2003-01-27 12:45:00) [4]

2 Игорь Шевченко:

Нашел. Но не GetShortPathName, а скорее GetFullPathName, только как его правильно использовать?


Игорь Шевченко   (2003-01-27 12:18:00) [5]

А GetShortPathName не подходит ?


Serious Sam   (2003-01-27 12:10:00) [6]

http://www.delphikingdom.com/treasury/getlongfilename.htm
Только заменить ф-ю FileExists на GetFileAttributes - чтобы обойтись без SysUtils


Наверх

Титульная страница Поиск, карта сайта Написать письмо