Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Имена каталогов 
Author Message
Loopback



PostPosted: Wed Apr 14, 2010 10:57    Post subject: Reply with quote

ivs wrote:
// а вот за слешик - печаль осталась.

По-сути, реализовано все совершенно правильно, поскольку наличие слеша позволяет без лишних телодвижений определить, где каталог, а где файл. Но раз есть специфические задачи, то и копировать придется через запуск сторонней утилиты.

Вот, набросал скрипт на Autoit, который обрезает слеши у каталогов. Его можно скомпилировать в экзешник, создать пользовательскую команду и повесить на хоткей. В параметрах передавать список %L.
Code:

If $CmdLine[0] = 0 Then
    MsgBox (0, "Ошибка", "Недостаточно входных параметров")
    Exit
EndIf

Global $sOut = ""

$hFile = FileOpen($CmdLine[1], 0)
While 1
    $sLine = FileReadLine($hFile)
    If @error = -1 Then ExitLoop
    If StringRight($sLine, 1) = "\" Then $sLine = StringTrimRight($sLine, 1)
    $sOut &= $sLine & @CRLF
Wend

FileClose($hFile)

ClipPut(StringTrimRight($sOut, 2))
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group