Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Dos - овский путь / 5 сообщений из 5, страница 1 из 1
12.04.2007, 08:57
    #34454789
Vaso116
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dos - овский путь
скажие пожалуйста есть ли команда которая сделает коротким
т.е. 'C:\Program Files\123456789\' переделывала в 'c:\Progra~1\123456~1' и тд.

зарание благодарен !!!
...
Рейтинг: 0 / 0
12.04.2007, 09:05
    #34454807
Sergey Sizov.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dos - овский путь
И уже в который раз приходится спрашивать - а зачем, собственно? Только из-за неумения работать с длинными именами? Так как раз вчера-позавчера здесь такая работа в очередной раз обсуждалась.
...
Рейтинг: 0 / 0
12.04.2007, 13:32
    #34455959
Погодин
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dos - овский путь
* объявляем функцию получения короткого пути из длинного (255 -> 8.3)
DECLARE LONG GetShortPathName IN win32api STRING @lpszLongPath,;
STRING @lpszShortPath,LONG cchBuffer
m.lpszShortPath=SPACE(255)
m.cchBuffer=255
GetShortPathName(@m.arh_path,@m.lpszShortPath,m.cchBuffer)
...
Рейтинг: 0 / 0
13.04.2007, 12:30
    #34458850
Рома Б.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dos - овский путь
К коду Погодина рекомендую добавить:

m.lpszShortPath = LEFT (m.lpszShortPath, AT (CHR (0), m.lpszShortPath) - 1)

Иначе функции работы со строками будут работать некорректно. В C++ и др. языках строка заканчивается нулём, а в Фоксе определяется размером буфера. Если эту строку без последней обработки, например, срастить с 'другая строка', то получится не 'c:\Progra~1\123456~1другая строка', а 'c:\Progra~1\123456~1 много-много пустоты другая строка'
...
Рейтинг: 0 / 0
13.04.2007, 16:16
    #34459909
Погодин
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dos - овский путь
Точно. Забыл строчку скопировать. Или в VFP9:

m.lpszShortPath=ALLTRIM(m.lpszShortPath,0,CHR(0),' ')
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Dos - овский путь / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]