Double Commander

2.12. Скрипты Lua

Содержание

1. Введение
2. Необходимая DLL
3. Библиотеки функций Double Commander
3.1. Библиотека DC
3.1.1. Пример с DC.ExecuteCommand
3.2. Библиотека System
3.2.1. Описание возвращаемого значения SysUtils.FileGetAttr
3.2.2. Пример с SysUtils.FileGetAttr
3.2.3. Пример использования FindFirst, FindNext и FindClose
3.3. Библиотека Clipboard
3.3.1. Пример работы с буфером обмена
3.4. Библиотека Dialogs
3.4.1. Кнопки Dialogs.MessageBox
3.4.2. Стиль окна Dialogs.MessageBox
3.4.3. Кнопка по умолчанию в Dialogs.MessageBox
3.4.4. Возвращаемое значение Dialogs.MessageBox
3.4.5. Пример использования Dialogs.MessageBox
3.4.6. Пример использования Dialogs.InputQuery
3.5. Библиотека UTF-8
3.6. Библиотека OS

1. Введение

Double Commander может выполнять скрипты Lua с помощью команды cm_ExecuteScript.

Также на языке Lua можно писать информационные плагины, примеры можно найти в папке программы (plugins/wdx/scripts).

Более подробную информацию о языке программирования Lua можно найти на официальном веб-сайте Lua.

2. Необходимая DLL

Чтобы использовать скрипты Lua, нам требуется интерпретатор Lua версии 5.1 или выше, DLL-файл должен лежать рядом с исполняемым файлом Double Commander или в системной папке.

По умолчанию DC ищет файл с именем lua5.1.dll (Windows), liblua5.1.so.0 (Unix или GNU/Linux) или liblua5.1.dylib (Mac OS). Мы можем вручную изменить имя файла в параметре <PathToLibrary>.

Мы можем использовать DLL-файл проекта LuaJIT. LuaJIT сочетает в себе высокоскоростной интерпретатор, написанный на ассемблере, и JIT-компилятор. Также мы получаем библиотеку FFI: с её помощью в скриптах можно будет вызывать внешние функции C и использовать структуры данных C. DLL для Windows: 32-битная или 64-битная.

Если мы используем 64-битную версию DC, то DLL-файл также должен быть 64-битным.

Дистрибутивы DC для Windows включают в себя DLL-файл Lua (в DC 0.9.7 и новее из проекта LuaJIT), в иных случаях мы можем найти и установить его с помощью менеджера пакетов или скомпилировать.

3. Библиотеки функций Double Commander

Double Commander предлагает несколько библиотек функций для скриптов Lua, список представлен ниже.

Список библиотек
БиблиотекаИмя функцииКраткое описание
DCСпецифические функции Double Commander
SysUtilsРазличные системные функции
ClipbrdРазличные функции для работы с буфером обмена
DialogsВзаимодействие с пользователем
LazUtf8Строковые функции для работы с UTF-8
OSФункции, связанные с операционной системой

3.1. Библиотека DC

Эта библиотека содержит специфические функции Double Commander, все функции представлены в таблице DC.

Библиотека DC
ФункцияОписание
DC.LogWrite

DC.LogWrite(Message, MsgType, bForce, bLogFile)

Пишет сообщение в окно протокола.

Описание:

  • Message : Текст сообщения.
  • MsgType : Тип сообщения: 0 - информационное, 1 - успешная операция, 2 - ошибка.
  • bForce : Логическое (булево) значение, если true, то показать окно протокола (если оно скрыто).
  • bLogFile : Логическое (булево) значение, если true, то сообщение будет записано и в файл протокола.
DC.CurrentPanel

iPanel = DC.CurrentPanel()

Получить активную панель: возвращает 0, если активна левая панель, или 1, если правая.

DC.CurrentPanel(iPanel)

Сделать активной: левую панель, если iPanel равно 0, или правую, если равно 1.

DC.ExecuteCommand

DC.ExecuteCommand(Command, Param1, Param2,...,ParamX)

Вызывает внутреннюю команду Double Commander Command с параметрами Param1..ParamX.

Мы можем подставить столько Param..., сколько поддерживает команда Command.

Примечание: Скрипты работают в основном потоке Double Commander, поэтому иногда последовательное выполнение команд для навигации может не сработать (например, большие каталоги, медленный диск), в этом случае попробуйте отключить Загружать список файлов в отдельном потоке в настройках.

3.1.1. Пример с DC.ExecuteCommand

В этом примере мы написали простой скрипт, который сделает следующее:

  1. перенесёт фокус на правую панель
  2. закроет все открытые вкладки
  3. перейдёт в указанную папку
  4. перенесёт фокус на левую панель
  5. закроет все открытые вкладки
  6. перейдёт в указанный каталог
  7. откроет новую вкладку
  8. перейдёт в указанный каталог
-- 1. Перенести фокус на правую панель.
DC.ExecuteCommand("cm_FocusSwap", "side=right")

-- 2. Закрыть все вкладки.
DC.ExecuteCommand("cm_CloseAllTabs")

-- 3. Перейти в указанный каталог.
DC.ExecuteCommand("cm_ChangeDir", "E:\\FakeKey\\Documents\\Music")

-- 4. Перенести фокус на левую панель.
DC.ExecuteCommand("cm_FocusSwap", "side=left")

-- 5. Закрыть все вкладки.
DC.ExecuteCommand("cm_CloseAllTabs")

-- 6. Перейти в указанный каталог.
DC.ExecuteCommand("cm_ChangeDir", "C:\\Users\\Public\\Music")

-- 7. Открыть новую вкладку.
DC.ExecuteCommand("cm_NewTab")

-- 8. Перейти в указанный каталог.
DC.ExecuteCommand("cm_ChangeDir", "E:\\VirtualMachines\\ShareFolder")

Для выполнения нашего скрипта мы можем создать кнопку на панели инструментов с внутренней командой cm_ExecuteScript.

Предположим, наш скрипт E:\scripts\lua\music.lua, мы могли бы настроить эту кнопку следующим образом:

Вызов скрипта Lua кнопкой панели инструментов

Кроме того, для редактирования наших скриптов мы можем использовать внутренний редактор Double Commander.

Если файл имеет расширение .lua, то он будет распознан внутренним редактором и открыт с подсветкой синтаксиса, специфичного для языка Lua:

Подсветка синтаксиса Lua во внутреннем редакторе

3.2. Библиотека System

Эта библиотека содержит различные системные функции, все они представлены в таблице SysUtils.

Библиотека System
ФункцияОписание
SysUtils.Sleep

SysUtils.Sleep(Milliseconds)

Приостанавливает выполнение скрипта на указанное количество миллисекунд (Milliseconds), выполнение сценария будет продолжено после истечения указанного времени.

SysUtils.GetTickCount

SysUtils.GetTickCount()

Возвращает количество интервалов времени (тиков) с момента старта системы. Это полезно для измерения времени, но не следует делать каких-либо предположений относительно количества времени в интервале между тиками.

SysUtils.FileExists

bFlagExists = SysUtils.FileExists(FileName)

Проверяет, существует ли в файловой системе определённый файл.

FileExists возвращает true, если файл с именем FileName существует на диске, и false в противном случае.

SysUtils.DirectoryExists

bFlagExists = SysUtils.DirectoryExists(Directory)

Проверяет существование Directory в файловой системе и что это действительно каталог.

Если это так, то функция возвращает true, иначе возвращает false.

SysUtils.FileGetAttr

Attr = SysUtils.FileGetAttr(FileName)

Возвращает в Attr атрибуты файла FileName.

Подробное описание возвращаемого значения смотрите здесь.

SysUtils.FindFirst

Handle, FindData = SysUtils.FindFirst(Path)

Ищет файлы, совпадающие с Path (можно использовать маски).

Если файл не найден, Handle будет равно nil.

В случае успеха функция вернёт дескриптор поиска Handle для последующих вызовов SysUtils.FindNext и поиска других совпадений с паттерном.

Таблица FindData содержит информацию о найденном файле или каталоге.

Поля таблицы FindData:

  • Name : Имя файла (без пути).
  • Attr : Атрибуты файла (подробнее смотрите здесь).
  • Size : Размер файла в байтах.
  • Time : Отметка времени файла (в формате POSIX, так называемое Unix-время: количество секунд, прошедших с 1 января 1970 г.)
SysUtils.FindNext

Result, FindData = SysUtils.FindNext(Handle)

Находит следующее вхождение поиска, инициированного FindFirst, Handle — дескриптор поиска, возвращённый функцией FindFirst.

В случае успеха функция вернёт Result не равный nil и таблицу FindData, содержащую информацию о найденном файле или каталоге.

Замечание: За последним вызовом SysUtils.FindNext всегда должен следовать вызов SysUtils.FindClose с тем же Handle. Несоблюдение этого приведёт к утечке памяти.

SysUtils.FindClose

SysUtils.FindClose(Handle)

Завершает серию вызовов SysUtils.FindFirst/SysUtils.FindNext и освобождает использованную память.

Вызов этой функции абсолютно необходим, иначе могут возникнуть большие утечки памяти.

SysUtils.CreateHardLink

bResult = SysUtils.CreateHardLink(Path, LinkName)

Создаёт жёсткую ссылку LinkName на файл Path.

Возвращает true в случае успеха, иначе возвращает false.

SysUtils.CreateSymbolicLink

bResult = SysUtils.CreateSymbolicLink(Path, LinkName)

Создаёт символьную ссылку LinkName на файл Path.

Возвращает true в случае успеха, иначе возвращает false.

SysUtils.ReadSymbolicLink

sTarget = SysUtils.ReadSymbolicLink(LinkName, Recursive)

Читает имя файла, на который указывает символьная ссылка LinkName.

Если Recursive равно true и ссылка указывает на ссылку, то она разрешается рекурсивно до тех пор, пока не будет найдено допустимое имя файла, не являющееся ссылкой.

Возвращает путь, на который указывает символьная ссылка LinkName, или пустую строку, если ссылка недействительна или файл, на который она указывает, не существует и значение Recursive равно true.

SysUtils.PathDelim

SysUtils.PathDelim

Позволяет получить от DC разделитель пути в системе.

В системах Unix/Linux это будет " / " и " \ " в Windows.

SysUtils.ExtractFileName

sName = SysUtils.ExtractFileName(FileName)

Возвращает имя файла из полного (имя+путь) имени файла.

Имя файла содержит все символы после последнего символа разделителя каталогов ("/" или "\") или буквы диска.

SysUtils.ExtractFilePath

sPath = SysUtils.ExtractFilePath(FileName)

Возвращает путь из полного имени файла (включая букву диска).

Путь содержит все символы до последнего символа разделителя каталогов ("/" или "\"), включая сам разделитель каталогов.

SysUtils.ExtractFileDir

sDir = SysUtils.ExtractFileDir(FileName)

Возвращает только каталог из FileName, включая букву диска.

Результат НЕ содержит разделитель каталогов в конце, в отличие от SysUtils.ExtractFilePath.

SysUtils.ExtractFileDrive

sDrive = SysUtils.ExtractFileDrive(FileName)

Возвращает диск из полного имени файла.

Обратите внимание, некоторые операционные системы не поддерживают буквы дисков.

SysUtils.ExtractFileExt

sExt = SysUtils.ExtractFileExt(FileName)

Возвращает расширение файла (все символы после последней точки, включая сам символ ".").

SysUtils.MatchesMask

bResult = SysUtils.MatchesMask(FileName, Mask, MaskOptions)

Возвращает true, если FileName совпадает с переданной маской Mask.

MaskOptions (необязательный параметр, по умолчанию 0) задаётся как сумма следующих значений:

Значение Описание
1
с учётом регистра
2
игнорировать акценты и лигатуры
4
фильтр в стиле Windows: "*.*" также совпадает с файлами без расширения и т.д.
8
включить поддержку пиньинь (будет использоваться файл pinyin.tbl)
SysUtils.MatchesMaskList

bResult = SysUtils.MatchesMaskList(FileName, MaskList, Separator, MaskOptions)

Возвращает true, если FileName совпадает с хотя бы одной из переданных масок MaskList, разделённых Separator (по умолчанию ";").

Separator и MaskOptions (см. выше) — необязательные параметры.

SysUtils.CreateDirectory

bResult = SysUtils.CreateDirectory(Directory)

Создаёт цепочку каталогов, Directory - полный путь каталога.

Возвращает true, если Directory уже существует или был успешно создан, или false, если не удалось создать какую-либо часть пути.

3.2.1. Описание возвращаемого значения SysUtils.FileGetAttr

FileGetAttr возвращает атрибуты FileName в виде ИЛИ-совокупности следующих констант:

Константы, используемые в возвращаемом значении SysUtils.FileGetAttr
ЗначениеОписание
0x00000001
faReadOnly
Файл только для чтения.
0x00000002
faHidden
Скрытый файл.
В Unix/Linux это значит, что имя файла начинается с точки.
0x00000004
faSysFile
Системный файл.
В Unix/Linux это может быть символьное или блочное физическое устройство, именованный канал (FIFO).
0x00000008
faVolumeId
Метка тома (означает, что файл содержит идентификатор (ID) тома).
Только для DOS/Windows 9x на обычной файловой системе FAT (не VFAT или FAT32).
0x00000010
faDirectory
Каталог.
0x00000020
faArchive
Архивный.
Не используется в Unix/Linux.
0x00000400
faSymLink
Символьная ссылка.
Примечание: В случае ошибки функция возвращает -1.

Смотрите пример в следующей секции.

3.2.2. Пример с SysUtils.FileGetAttr

Пример скрипта ниже использует SysUtils.FileGetAttr.

Если параметр окажется каталогом, то скрипт откроет его в новой вкладке активной панели и переключится на неё.

local params = {...}
local myfileattr

if #params == 1 then -- Мы получили один параметр?
  myfileattr = SysUtils.FileGetAttr(params[1])
  if myfileattr > 0 then -- Получили значение атрибута?
    if math.floor(myfileattr / 0x00000010) % 2 ~= 0 then
      -- 0x00000010 присутствует? Тогда это каталог.
      DC.ExecuteCommand("cm_NewTab")
      DC.ExecuteCommand("cm_ChangeDir", params[1])
    end
  end
end

В приведённом выше примере params[1] является первым параметром, переданным скрипту.

При использовании внутренней команды cm_ExecuteScript это будет первый параметр, переданный после имени файла скрипта.

Итак, в нашем примере мы можем создать на панели инструментов кнопку, как показано ниже:

Параметр с cm_ExecuteScript

В этом примере скрипту будет передан параметр %"0%p: имя выделенного в активной панели файла или папки, без кавычек.

3.2.3. Пример использования FindFirst, FindNext и FindClose

В следующем примере мы просканируем содержимое каталога, переданного первым параметром, и сохраним полученные данные в текстовый файл с именем, переданным вторым параметром.

Это даст нам хорошее представление об использовании FindFirst, FindNext и FindClose.

local params = {...}

if #params == 2 then -- У нас есть два параметра?
  local Result = nil
  local OutputFile = nil

  OutputFile = io.output(params[2])

  local Handle,FindData = SysUtils.FindFirst(params[1] .. "\\*")
  if Handle ~= nil then
    repeat
      io.write(FindData.Name .. "\r")
      io.write(FindData.Size .. "\r")
      io.write("---------------\r")

      Result,FindData = SysUtils.FindNext(Handle)
    until Result == nil

    SysUtils.FindClose(Handle)
    io.close(OutputFile)
  end
end

В приведённом выше примере нам нужно передать скрипту два параметра:

  1. params[1] - каталог, содержимое которого мы хотим получить
  2. params[2] - имя файла для сохранения результата работы скрипта

Настраиваем кнопку на панели инструментов с внутренней командой cm_ExecuteScript и передаём параметрами всё необходимое:

Параметр с cm_ExecuteScript

В этом примере скрипту в качестве первого параметра будет передано %"0%Ds: имя каталога активной панели, без кавычек.

3.3. Библиотека Clipboard

Double Commander предоставляет скриптам Lua библиотеку функций для работы с буфером обмена.

Библиотека Clipboard
ФункцияОписание
Clipbrd.Clear

Clipbrd.Clear()

Очищает содержимое буфера обмена.

Clipbrd.GetAsText

StringVar = Clipbrd.GetAsText()

Получает содержимое буфера обмена как строку StringVar.

Clipbrd.SetAsText

Clipbrd.SetAsText(StringVar)

Помещает в буфер обмена строку текста StringVar.

Clipbrd.SetAsHtml

Clipbrd.SetAsHtml(Html)

Добавляет в буфер обмена текст Html в формате HTML (формат буфера обмена CF_HTML).

Содержимое может быть вставлено в приложения, поддерживающие этот формат буфера обмена, такие как MS Word, LO Writer и другие.

Правильным будет сохранять данные с помощью и Clipbrd.SetAsText, и Clipbrd.SetAsHtml: приложение будет использовать тот формат, который поддерживает.

Например, у нас может быть следующее:

  • Clipbrd.SetAsText("Добро пожаловать в Double Commander!")
  • Clipbrd.SetAsHtml("Добро пожаловать в <b>Double Commander</b>!")

Если мы запустим Блокнот и попытаемся вставить текст из буфера обмена, то будет вставлен текст, скопированный с помощью Clipbrd.SetAsText. Но если мы перейдём к Microsoft Word, то будет вставлена строка с выделенным жирным шрифтом Double Commander, потому что Microsoft Word распознаёт и поддерживает этот формат буфера обмена.

3.3.1. Пример работы с буфером обмена

В следующем примере используются три функции, связанные с буфером обмена: Clear, GetAsText и SetAsText.

Это относительно большой скрипт, но было бы неплохо собрать вместе несколько функций, с которыми мы познакомились ранее.

Предполагается, что в нашей активной панели открыт каталог с большим количеством текстовых файлов.

Также предполагается, что в настоящее время в буфере обмена одно слово и что скрипт в качестве единственного параметра получит текущий каталог активной панели.

Скрипт будет сканировать папку, читать содержимое файлов, один за другим, и искать слово из буфера обмена.

Затем имена файлов, которые содержат это словом, будут скопированы в буфер обмена.

Далее скрипт вызовет внутреннюю команду cm_LoadSelectionFromClip и все эти файлы будут выделены.

Кроме того, в конце вернём обратно в буфер обмена слово, которое мы искали.

local params = {...}
local Result = nil
local myfileattr
local bFound = false
local sCompleteFilename = ""
local InputFile = nil
local line = ""
local iPosS
local iPosE
local sFileToSelect = ""
local sSearchString = ""

if #params == 1 then -- Мы получили наш параметр?
  sSearchString = Clipbrd.GetAsText() -- Получаем выражение для поиска.
  Clipbrd.Clear() -- Очищаем буфер обмена.
  DC.ExecuteCommand("cm_MarkUnmarkAll") -- Убедимся, что ничего не выделено.

  -- Начинаем сканировать все файлы нашего каталога один за другим.
  local Handle,FindData = SysUtils.FindFirst(params[1] .. "\\*")
  if Handle ~= nil then
    repeat
      sCompleteFilename = params[1] .. "\\" .. FindData.Name
      myfileattr = SysUtils.FileGetAttr(sCompleteFilename)
      if myfileattr > 0 then -- Получили значение атрибута?
        -- Нам нужен файл, не каталог!
        if math.floor(myfileattr / 0x00000010) % 2 == 0 then

          -- Начинаем читать файл построчно, до конца файла ИЛИ до совпадения.
          InputFile = io.open(sCompleteFilename, "r")
          bFound = false

          while bFound == false do
            line = InputFile:read()
            if line == nil then break end
            iPosS, iPosE = string.find(line, sSearchString)
            if iPosS ~= nil then bFound = true end
          end

          if bFound == true then
            sFileToSelect = sFileToSelect .. FindData.Name .. "\n"
          end

          io.close(InputFile)
        end
      end
      Result,FindData = SysUtils.FindNext(Handle)
    until Result == nil

    SysUtils.FindClose(Handle)
  end

  -- Если что-то нашли, то выделяем!
  if sFileToSelect ~= "" then
    Clipbrd.SetAsText(sFileToSelect)
    DC.ExecuteCommand("cm_LoadSelectionFromClip")
  end

  Clipbrd.SetAsText(sSearchString) -- Восстанавливаем содержимое буфера обмена.
end

3.4. Библиотека Dialogs

Эта библиотека позволяет нашим скриптам взаимодействовать с пользователем, показывая сообщения, выдавая запросы и т.д.

Библиотека Dialogs
ФункцияОписание
Dialogs.MessageBox

ButPressed = Dialogs.MessageBox(Message, Title, ButFlags)

Показывает окно сообщения, функция вернёт нажатую пользователем кнопку.

Описание:

  • Message : Сообщение окна.
  • Title : Текст в заголовке окна.
  • ButFlags : Сумма констант, задающих отображаемые кнопки, стиль окна и кнопку по умолчанию. Смотрите ниже таблицы с кнопками, стилями и кнопкой по умолчанию.
  • ButPressed : Возвращаемое значение, указывающее нажатую кнопку (смотрите эту таблицу).
Dialogs.InputQuery

bAck, sAnswer = Dialogs.InputQuery(Title, Msg, bMask, sDefault)

Показывает диалоговое окно с полем ввода текста.

Описание:

  • Title : Текст в заголовке окна.
  • Msg : Сообщение окна.
  • bMask : Логическое (булево) значение, если true, то вводимый текст будет скрываться "звёздочками".
  • sDefault : Текст, который будет отображаться в строке ввода при появлении окна.
  • bAck : Возвращаемое логическое (булево) значение, указывающее, ввёл ли что-то пользователь или нет.
  • sAnswer : Возвращаемая строка, если пользователь что-то ввёл, а затем нажал ОК.
Dialogs.InputListBox

sAnswer = Dialogs.InputListBox(Title, Msg, Items, sDefault)

Показывает диалоговое окно с возможностью выбора из списка элементов.

Описание:

  • Title : Текст в заголовке окна.
  • Msg : Сообщение окна.
  • Items : Таблица Lua, каждый элемент таблицы должен быть строкой.
  • sDefault : Пункт списка, выделенный по умолчанию.
  • sAnswer : Возвращаемая строка с выбранным пунктом или nil в случае отмены.

3.4.1. Кнопки Dialogs.MessageBox

Кнопки, отображаемые в окне Dialogs.MessageBox, задаются одним из следующих значений:

Константы для кнопок в Dialogs.MessageBox
Значение константыОтображаемые кнопки, слева направо
0x0000
MB_OK
Кнопка OK
0x0001
MB_OKCANCEL
Кнопка OK Кнопка ОТМЕНА
0x0002
MB_ABORTRETRYIGNORE
Кнопка ПРЕРВАТЬ Кнопка ПОВТОР Кнопка ПРОПУСТИТЬ
0x0003
MB_YESNOCANCEL
Кнопка ДА Кнопка НЕТ Кнопка ОТМЕНА
0x0004
MB_YESNO
Кнопка ДА Кнопка НЕТ
0x0005
MB_RETRYCANCEL
Кнопка ПОВТОР Кнопка ОТМЕНА

3.4.2. Стиль окна Dialogs.MessageBox

Стиль окна Dialogs.MessageBox задаётся одним из следующих значений:

Константы, задающие значок и стиль окна Dialogs.MessageBox
Значение константыСтиль окна
0x0040
MB_ICONINFORMATION
Значок ИНФОРМАЦИЯ Информационное окно
0x0030
MB_ICONWARNING
Значок ПРЕДУПРЕЖДЕНИЕ Окно предупреждения
0x0020
MB_ICONQUESTION
Значок ВОПРОС Окно подтверждения
0x0010
MB_ICONERROR
Значок ОШИБКА Окно ошибки

3.4.3. Кнопка по умолчанию в Dialogs.MessageBox

Кнопка по умолчанию (активная) в Dialogs.MessageBox задаётся одним из следующих значений:

Константы, задающие кнопку по умолчанию в Dialogs.MessageBox
Значение константыКнопка по умолчанию
0x0000
MB_DEFBUTTON1
Первая кнопка слева
0x0100
MB_DEFBUTTON2
Вторая кнопка слева
0x0200
MB_DEFBUTTON3
Третья кнопка слева

3.4.4. Возвращаемое значение Dialogs.MessageBox

Число, возвращаемое функцией Dialogs.MessageBox, указывает на кнопку, которую нажал пользователь, и может быть одним из следующих:

Возвращаемое значение Dialogs.MessageBox
Значение константыНажатая кнопка
0x0000
mrNone
Кнопка не нажата
0x0001
mrOK
Результат: OK
0x0002
mrCancel
Результат: ОТМЕНА
0x0003
mrAbort
Результат: ПРЕРВАТЬ
0x0004
mrRetry
Результат: ПОВТОР
0x0005
mrIgnore
Результат: ПРОПУСТИТЬ
0x0006
mrYes
Результат: ДА
0x0007
mrNo
Результат: НЕТ

Примечание: Если закрыть окно, нажав крестик "x" в углу окна или клавишу Esc, то функция вернёт 0x0002, как нажатие кнопки Отмена.

3.4.5. Пример использования Dialogs.MessageBox

Маленький скрипт, использующий Dialogs.MessageBox:

-- Отображаемые кнопки
MB_OK = 0x0000
MB_OKCANCEL = 0x0001
MB_ABORTRETRYIGNORE = 0x0002
MB_YESNOCANCEL = 0x0003
MB_YESNO = 0x0004
MB_RETRYCANCEL = 0x0005

-- Стиль окна
MB_ICONINFORMATION = 0x0040
MB_ICONWARNING = 0x0030
MB_ICONQUESTION = 0x0020
MB_ICONERROR = 0x0010

-- Кнопка по умолчанию
MB_DEFBUTTON1 = 0x0000
MB_DEFBUTTON2 = 0x0100
MB_DEFBUTTON3 = 0x0200

-- Возвращаемое значение
mrNone = 0x0000
mrOK = 0x0001
mrCancel = 0x0002
mrAbort = 0x0003
mrRetry = 0x0004
mrIgnore = 0x0005
mrYes = 0x0006
mrNo = 0x0007

ButFlags = MB_YESNO + MB_ICONQUESTION + MB_DEFBUTTON2
ButPressed = Dialogs.MessageBox("Хотите завершить?", "Вопрос", ButFlags)

if ButPressed == mrYes then
  DC.ExecuteCommand("cm_Exit")
end

Пример использования Dialogs.MessageBox

3.4.6. Пример использования Dialogs.InputQuery

Маленький скрипт, использующий Dialogs.InputQuery:

bAck, sAnswer = Dialogs.InputQuery("Идентификация", "Введите ваше имя:", false, "Иван")

if bAck == true then
  Dialogs.MessageBox("Привет, " .. sAnswer .. "!", "Добро пожаловать!", 0x0040)
end

Пример использования Dialogs.InputQuery

3.5. Библиотека UTF-8

Эта библиотека обеспечивает базовую поддержку кодировки UTF-8.

Все функции представлены в таблице LazUtf8.

Библиотека UTF-8
ФункцияОписание
LazUtf8.Pos

Result = LazUtf8.Pos(SearchText, SourceText, Offset)

Поиск подстроки в строке, начиная с определённой позиции. Поиск чувствителен к регистру.

Возвращает позицию первого вхождения подстроки SearchText в строке SourceText, поиск начинается с позиции Offset (по умолчанию 1).

Если в SourceText не найдено совпадение с SearchText после заданного Offset, то функция возвращает ноль.

LazUtf8.Copy

Result = LazUtf8.Copy(Source, Index, Count)

Копирует (извлекает) часть строки.

Функция возвращает Count символов из строки Source, начиная с позиции Index.

Если Count больше длины строки Source, то результат усекается. Если Index больше длины строки Source, то возвращается пустая строка.

LazUtf8.Length

Result = LazUtf8.Length(String)

Возвращает количество символов в строке с учётом кодировки UTF-8.

LazUtf8.UpperCase

Result = LazUtf8.UpperCase(String)

Возвращает строку, в которой все буквы в нижнем регистре (строчные) заменены на буквы в верхнем регистре (прописные или заглавные).

LazUtf8.LowerCase

Result = LazUtf8.LowerCase(String)

Возвращает строку, в которой все буквы в верхнем регистре (прописные или заглавные) заменены на буквы в нижнем регистре (строчные).

LazUtf8.ConvertEncoding

Result = LazUtf8.ConvertEncoding(String, FromEnc, ToEnc)

Конвертирует кодировку String из FromEnc в ToEnc.

Список поддерживаемых значений кодировок:

  • Системная кодировка по умолчанию (зависит от локали): "default".
  • Кодировка ANSI (Windows) по умолчанию (зависит от локали): "ansi".
  • Кодировка OEM (DOS) по умолчанию (зависит от локали): "oem".
  • Юникод: "utf8", "utf8bom", "ucs2le", "ucs2be".
  • ANSI (Windows): "cp1250", "cp1251", "cp1252", "cp1253", "cp1254", "cp1255", "cp1256", "cp1257", "cp1258".
  • OEM (DOS): "cp437", "cp850", "cp852", "cp866", "cp874", "cp932", "cp936", "cp949", "cp950".
  • ISO 8859: "iso88591", "iso88592", "iso885915".
  • Другие: "macintosh", "koi8".
Специальные значения кодировок (примеры).

В Windows с русской локалью:
  • "default" - cp1251
  • "ansi" - cp1251
  • "oem" - cp866
В Linux с русской локалью:
  • "default" - utf8
  • "ansi" - cp1251
  • "oem" - cp866

3.6. Библиотека OS

Эта библиотека содержит функции, связанные с операционной системой, в которой запущен Double Commander.

Список доступных функций:

Библиотека OS
ФункцияОписание
os.execute

resultcode = os.execute(command)

Выполнить command, аналогично введённой в командной строке, будет возвращён код завершения.

command может быть:

  • Команда терминала, например, os.execute("dir > all.txt")
  • Исполняемый файл, например, os.execute("C:\\Windows\\System32\\calc.exe")
  • Исполняемый файл с параметрами:
    os.execute("C:\\Utils\\fsum.exe -md5 test.bin > md5.txt")
os.tmpname

tempfilename = os.tmpname()

Возвращает строку с именем файла, который может быть использован в качестве временного файла.

os.remove

bresult, errorstr, errorno = os.remove(filename)

Удалить файл с именем filename.

Если удалось, функция вернёт true.

Если не удалось, функция вернёт:

  1. nil как индикатор неудачи
  2. errorstr с описанием ошибки
  3. errorno в виде кода ошибки (число)
os.rename

bresult, errorstr, errorno = os.rename(nameS, nameD)

Переименовать файл nameS в nameD.

Если удалось, функция вернёт true.

Если не удалось, функция вернёт:

  1. nil как индикатор неудачи
  2. errorstr с описанием ошибки
  3. errorno в виде кода ошибки (число)
os.getenv

value = os.getenv(variablename)

Получить в value значение переменной окружения variablename.
Если переменная не существует, то функция вернёт nil.


Valid HTML 4.0 Transitional CSS Valid!