| View previous topic :: View next topic |
| Author |
Message |
Avada
Joined: 01 Aug 2008
Posts: 10460
Location: Россия, Саратов
|
 (Separately) Posted: Tue Dec 30, 2025 19:03 Post subject: |
 |
|
Orion9
Плагином пользуюсь, но осваивать скрипты сейчас нет времени. По той же причине вопрос о переводе этого справочника в HTML для меня сейчас не актуален.
У ключей с DPI речь идёт не про единственное дефолтное значение, а про набор вариантов, поэтому значение указывается условно.
Значения я, кстати, в первом приближении проверил (спасибо за списки!), несколько своих цифр в своём указании дефолтных значений исправил для следующего обновления (при этом в описаниях значений в основном всё было верно).
| Code: | AlwaysShowAppdata 1 вместо 0
IconOverlaysUsb 1 вместо 0 и переделка описаний значений
EverythingForTree 0 вместо 1
ReturnToReUploadDir 0 вместо 1
CopySparseFiles 0 вместо 1
ZipTestWarnExplorer 0 вместо 1
TabsListLastVisited к 0 добавлено (по умолчанию)
%Commander_Path% в нескольких значениях заменено на %COMMANDER_PATH% (полностью в верхнем регистре, как везде в файле) |
Но в английском файле данных неточностей гораздо больше.
| Code: | Для обоих ключей UserSpec есть точное значение по умолчанию *.*, а не примерное file_mask
[Right] SpecialView 0, а не 100
MenuHideChar "?", а не " "
Iconsize32_dpi 96, а не 0
ReplacePhotoApp 0, а не 1 (не отслежена замена умолчания)
PhotoAppFilter "ext", а не "none" ("ext" подразумевает любое расширение или никакого расширения)
AssociationMultiVerbs 0, а не 1
CopyHugeBlockSizeOther 64, а не 32 (значение по умолчанию и рекомендуемое значение различаются)
7zInternal 1, а не 0
7zSolidSizeLZMA2_6 16384, а не 4096 (тщательно тестировалось, есть и другие подобные ошибки)
Editor "notepad.exe", а не "none"
PreviewHandlers 1, а не 0
ThumbnailProviders 1, а не 0
PreloadInputFilters32 и др. - вместо 0 (откуда взялось такое значение, непонятно) есть точные значения по умолчанию
AlbumArt 3, а не 1
[Lister] Font1 теперь верно "Consolas,-15,204", значение "Fixedsys,-16,204" старое
[Lister] Font2 теперь верно "Consolas,-15,255", значение "Terminal,-12,255" старое
[Lister] Font3 теперь верно "Verdana,-15,204", значение "System,-16,b,204" старое |
Ряд разночтений объясняется не ошибками, а другими причинами.
| Code: | ThumbGdiplusTypes просто другой порядок расширений
ActiveTitle и многие другие цветовые ключи - везде, где можно, у меня с определённого момента стало использоваться значение по умолчанию -1
В шрифтовых ключах (FontCharset и др.) для кодировок значения 204 и 1 отличаются просто из-за языка
FontSampleText - чисто технические разночтения (я даю пример умолчания в тексте описания)
ColorFilter1..ColorFilter25 - чисто технические разночтения (я даю разные примеры масок, но это необязательно)
WipeDir слэш в конце пути обязательным не является
Version это надо просто вовремя менять вручную
WarnTooBig значение умолчания 1 или 0 зависит от системы, я даю более новое
CompareResyncSeparators - тот же набор символов
LowercaseStrings "English in Titles - в русском файле данных сокращено специально (для удобства работы с таблицей)
Tabstops и другие подобные ключи - границы колонок на разных компьютерах несколько различаются, они условны |
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
| Back to top |
|
 |
Orion9
Joined: 01 Jan 2024
Posts: 979
|
| (Separately) Posted: Tue Dec 30, 2025 19:32 Post subject: |
|
|
Avada
Ого! Солидная прибавка пояснений. Спасибо.
Да, скрипт я сбросил на случай, если кому-то будет интересно. Понятно, что здесь уже давно все переболели и ТС, и всем, что с ним связано, поэтому сложно ожидать, что кто-то сейчас возьмет и кинется верстать новый справочник)
Пока полученный вариант меня более-менее устраивает, просто хотел подчеркнуть, что моих знаний в области работы с текстом не хватает и дело вряд ли куда-то сдвинется дальше, чем уже полученный html-файл) |
|
| Back to top |
|
|
Orion9
Joined: 01 Jan 2024
Posts: 979
|
| (Separately) Posted: Tue Jan 06, 2026 13:07 Post subject: |
|
|
Avada
А Russian.cedf с поправками когда будет доступен?
Дело не в спешке. Я просто забыл приложить скрипт для сравнения cedf-файлов, а вдруг он кому-то будет интересен.
 Hidden text | Code: | RegisterCommand 60042 "CompareTwoCedfs"
Func CompareTwoCedfs()
Local txt, rex, out, i = 0, bCtrl = IsPressed(0x11)
Local dir = COMMANDER_PATH & "\Tools\UltraEditors\Data Files"
Local rus = dir & "\Russian.cedf", eng = dir & "\English.cedf"
Local T1 = GetUptime(), T2 = T1, T3
If Not FileExist(rus) Then
MsgBox("Файл не найден " & rus)
Return
EndIf
If Not FileExist(eng) Then
MsgBox("Файл не найден " & eng)
Return
EndIf
ShowOptHint("Parsing.")
Sleep(200)
# чтение файлов
Local txt_rus = FileRead(rus)
Local txt_eng = FileRead(eng)
# наполнение массивов
Local aRus1 = List(), aEng1 = List()
Local aRus2 = List(), aEng2 = List()
rex = RegExp('<key name="(.*?)" file="(.*?)" section="(.*?)" default="(.*?)" version="(.*?)".*?' & _
'<description>(.*?)</description>', txt_rus)
If rex.Exec() Then
Do
i += 1
aRus1.Add("[" & rex.Match[3] & "]" & Chr(9) & rex.Match[1])
aRus2.Add("[" & rex.Match[3] & "]" & Chr(9) & rex.Match[1] & Chr(9) & '"' & rex.Match[4] & '"')
T3 = GetUptime()
If Round(T3 - T2, 0) > 400 Then
#ShowOptHint("Keys processed: " & i & auCRLF & rus)
T2 = T3
EndIf
Until Not rex.ExecNext()
EndIf
Free(rex)
rex = RegExp('<key name="(.*?)" file="(.*?)" section="(.*?)" default="(.*?)" version="(.*?)".*?' & _
'<description>(.*?)</description>', txt_eng)
If rex.Exec() Then
i = 0
Do
i += 1
aEng1.Add("[" & rex.Match[3] & "]" & Chr(9) & rex.Match[1])
aEng2.Add("[" & rex.Match[3] & "]" & Chr(9) & rex.Match[1] & Chr(9) & '"' & rex.Match[4] & '"')
T3 = GetUptime()
If Round(T3 - T2, 0) > 400 Then
#ShowOptHint("Keys processed: " & i & auCRLF & eng)
T2 = T3
EndIf
Until Not rex.ExecNext()
EndIf
Free(rex)
ShowOptHint(aRus1.Count & " Russian keys total." & auCRLF & aEng1.Count & " English keys total.")
Sleep(1100)
# сравнение массивов
ShowOptHint("Comparing.")
out &= "--------------------------------------" & auCRLF
out &= " Russian.cedf -> English.cedf" & auCRLF
out &= "--------------------------------------" & auCRLF
Local j = 0
Local idx, val
For i = 0 To aRus1.Count - 1
# поиск несуществующих ключей
If Not bCtrl And aEng1.IndexOf(aRus1[i]) = -1 Then
j += 1
out &= StrFormat("%03d", j) & " " & aRus1[i] & auCRLF
# поиск отличающихся ключей
ElseIf bCtrl And aEng1.IndexOf(aRus1[i]) <> -1 Then
idx = aEng1.IndexOf(aRus1[i])
If aEng2[idx] <> aRus2[i] Then
j += 1
val = StrPart(aEng2[idx], auTAB, 3)
out &= StrFormat("%03d", j) & " " & aRus2[i] & " <> " & val & auCRLF
Endif
EndIf
Next
out &= auCRLF
out &= "--------------------------------------" & auCRLF
out &= " English.cedf -> Russian.cedf" & auCRLF
out &= "--------------------------------------" & auCRLF
j = 0
For i = 0 To aEng1.Count - 1
If Not bCtrl And aRus1.IndexOf(aEng1[i]) = -1 Then
j += 1
out &= StrFormat("%03d", j) & " " & aEng1[i] & auCRLF
ElseIf bCtrl And aRus1.IndexOf(aEng1[i]) <> -1 Then
idx = aRus1.IndexOf(aEng1[i])
If aRus2[idx] <> aEng2[i] Then
j += 1
val = StrPart(aRus2[idx], auTAB, 3)
out &= StrFormat("%03d", j) & " " & aEng2[i] & " <> " & val & auCRLF
Endif
EndIf
Next
Free(aRus1, aEng1, aRus2, aEng2)
out = StrReplace(out, "[[", "[")
out = StrReplace(out, "]]", "]")
out = StrReplace(out, Chr(9), " ")
Sleep(300)
ClipPut(out)
ShowOptHint("Скопировано в буфер.")
EndFunc
Func ShowOptHint(Text)
SetHintParam("ShowHint", "Font", 13, "Arial")
SetHintParam("ShowHint", "BackColor", 0x001C1C1C)
SetHintParam("ShowHint", "Text", 0xFFFFFF)
ShowHint(Text, "", "", 0, 0)
Sleep(50)
SetHintParam("ShowHint", "Reload")
EndFunc |
Когда будет готово, можно еще раз прогнать оба файла на поиск отличий. Кнопка для скрипта:
Hidden text TOTALCMD#BAR#DATA
60042
%COMMANDER_EXE%,4
Russian.cedf и English.cedf|Поиск несуществующих ключей|Ctrl - Поиск отличающихся ключей
-1 |
|
| Back to top |
|
|
Avada
Joined: 01 Aug 2008
Posts: 10460
Location: Россия, Саратов
|
| (Separately) Posted: Tue Jan 06, 2026 15:51 Post subject: |
|
|
Orion9
Предполагаю, что в течение января. И не только этот файл данных, но и все прочие справочники и русская история версий. Новых версий TC с начала октября не было, так что ожидаются просто исправленные редакции всего того, что уже выкладывалось.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
| Back to top |
|
|
Destiny
Joined: 15 Dec 2015
Posts: 312
|
| (Separately) Posted: Wed Jan 07, 2026 19:31 Post subject: |
|
|
Учитывая, что Гислер хочет в конце января - начале февраля начать очередное бета-тестирование - то очень было бы полезно, и по другому-то и не скажешь, успеть бы выложить эти данные до его начала.
Чтобы любые изменения можно было спокойно сравнивать с реально актуальными данными, если они вдруг будут изменяться. |
|
| Back to top |
|
|
Avada
Joined: 01 Aug 2008
Posts: 10460
Location: Россия, Саратов
|
| (Separately) Posted: Wed Jan 07, 2026 21:28 Post subject: |
|
|
Destiny
Даже если очередное бета-тестирование начнётся в январе раньше, откладывать обновление справочников до финального релиза новейшей версии я в этот раз не буду. Накопилось вполне достаточно изменений, пора готовить материал к выкладыванию. Чем я, собственно, постепенно и занимаюсь.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
| Back to top |
|
|
Orion9
Joined: 01 Jan 2024
Posts: 979
|
| (Separately) Posted: Thu Jan 08, 2026 00:35 Post subject: |
|
|
Avada
Спасибо за ответ. Посмотрим какие расхождения останутся, а какие нет. |
|
| Back to top |
|
|
|
|
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
|
Powered by phpBB © 2001, 2005 phpBB Group
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
