Алфавитно-цифровая сортировка файлов с числами в названии

Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB

Rules

Search

FAQ

Memberlist

Usergroups

Profile

Алфавитно-цифровая сортировка файлов с числами в названии
Goto page Previous 1, 2

Total Commander Forum Index -> Общие вопросы

View previous topic :: View next topic

Author

Message

Worros

Joined: 19 Jan 2007
Posts: 1123

(Separately) Posted: Fri Oct 03, 2008 01:00 Post subject:

Tol!k wrote:

Worros, http://wincmd.ru/plugring/expander.html - разгрызает имя на слова. Именно для сортировки

Похоже, то что надо. Помнил же, что есть что-то похожее, название забыл Smile

Только как его заставить использовать пробел как разделитель?

Tol!k

Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

(Separately) Posted: Fri Oct 03, 2008 01:47 Post subject:

там исходники на Дельфи и это:

Code:

sep:=tmpIni.ReadString('Main','Divider','_');

//замена _ на пробел и в Expander.lng и в dll-ке не помогла Sad

Worros

Joined: 19 Jan 2007
Posts: 1123

(Separately) Posted: Fri Oct 03, 2008 02:00 Post subject:

Tol!k wrote:

там исходники на Дельфи и это:

Code:

sep:=tmpIni.ReadString('Main','Divider','_');

//замена _ на пробел и в Expander.lng и в dll-ке не помогла Sad

Угумс. Я пришёл ровно к тому же. И тем же путём. Так неохота разбираться с этих исходником серьёзно Confused

Была надежда, что кто-то знает простое "заветное слово", а придётся всё же ковыряться.

Спасибо за помощь.

Batya

Joined: 15 Dec 2004
Posts: 2229
Location: Москва, Россия

(Separately) Posted: Fri Oct 03, 2008 10:44 Post subject:

Worros wrote:

Была надежда, что кто-то знает простое "заветное слово", а придётся всё же ковыряться.

Есть такое "заветное слово" Very Happy

CaptainFlint wrote:

Script_wdx?

Легко:

Code:

'===========================================================================
' Колонка Result3 возвращает имя файла\папки, начиная с заданной позиции
'===========================================================================

'========== Изменяемые параметры ===========================================
StartPos = 3 'Начальная позиция возврата имени
'===========================================================================

Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
content3 = Result3
Set FSO = Nothing

Function Result3
Result3 = Mid(FSO.GetFileName(filename), StartPos)
End Function

Вместо content3 (это у меня такой следующий номер) можешь поставить другой номер колонки (content, content1, ... , content9).
_________________
Нет, я не сплю. Я просто медленно моргаю.

Lev

Joined: 02 Mar 2005
Posts: 392

(Separately) Posted: Fri Oct 03, 2008 18:43 Post subject:

regexp.wdx
regexp.ini

Code:

[Regexp]
rule=-3
[-3]
find="..(.*)"
change="$1"

Worros

Joined: 19 Jan 2007
Posts: 1123

(Separately) Posted: Fri Oct 03, 2008 20:35 Post subject:

Большое всем спасибо! Остановился на последнем варианте (regexp.wdx).

Display posts from previous:

	Total Commander Forum Index -> Общие вопросы	All times are GMT + 4 Hours Goto page Previous 1, 2
Page 2 of 2

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum