Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.07;
Скачать: CL | DM;

Вниз

помогите конвертировать имя файла в ДОСовское   Найти похожие ветки 

 
Vtt   (2002-01-23 17:43) [0]

Помогите конвертировать имя файла и путь к нему из Win в ДОСовское.Т.е.:
С:\Program Files\ProgrammaOne.txt должно быть преобразованно в нечто вроде С:\Progra~1\Progra~9.txt

Нужна процедурка либо укажите хотябы где почитать об этом.


 
Romkin ©   (2002-01-23 17:54) [1]

uses Windows;

var
LongPath: string;
ShortPath: string;
nSize: integer;
begin
nSize := GetShortPathName(PChar(LongPath), nil, 0);
SetLength(ShortPath, nSize);
GetShortPathName(PChar(LongPath), PChar(ShortPath), nSize);
end



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

Текущий архив: 2002.02.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
3-18741
Andrey007
2001-12-29 10:31
2002.02.07
Вопрос по Query.Locate.


6-18934
SemFLY
2001-11-13 20:21
2002.02.07
Какая команда в Windows разрывает соединение с интеренетом ?


1-18834
Yuraz
2002-01-22 09:15
2002.02.07
Необходимо при запуске читать, при выходе записывать информацию в файл окон MEMO


1-18856
avr555
2002-01-22 17:02
2002.02.07
Вызвать событие


7-19002
Новичек
2001-11-02 12:06
2002.02.07
Как читать данные с CD по секторам ?