Indigo Rose AutoPlay Media Studio (часть 3) - [36] :: Программы

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

Добавлено:
Ещё вопрос. Мне хотелось бы сделать одну или ряд функций которые отвечали бы, для начала, только за названия кнопок главного меню и подменю каждой кнопки, задача решена лишь отчасти приведённым ниже кодом, однако есть но... В папке с контентом только первая папка содержит части, остальные три нет. В результате код называет первую кнопку, вторую и... и всё... ну и конечно кнопки с названиями частей. Поскольку мозг уже кипит, трудно сообразить что нужно или не нужно писать. Красным выделил места, которые, на мой взгляд, в ответе за недоработку.
Сразу хочу отметить, что если вдруг будет способ с XML - я не работал с ним вообще никогда и прибавив к этому то, что я только знакомлюсь с Lua...

Код:

-- Функция возвращает путь к папке с контентом--
function fGetContentPath()
    local sContentPath = _SourceFolder.."\\"..(INIFile.GetValue("AutoPlay\\setting.ini", "Main", "SourseFolder"));
    return sContentPath
end

-- Функция используется для поиска удовлетворяющих условие значений в функции ниже--
function fGetPartsName(tPartName)
    local tPrtName = Folder.Find(tPartName, "*", false, nil);
    local gPageObject = Page.EnumerateObjects();
    if (gPageObject ~= nil) then
        for nPartIndex, sNameButton in gPageObject do
            if (String.Left(sNameButton, 4)=="Part" and (Page.GetObjectType(sNameButton)) == OBJECT_BUTTON) then
                for n, s in tPrtName do
                    Button.SetText("Part"..n, String.SplitPath(tPrtName[n]).Filename);
            else...
                end
            end
        end
    end
end

-- Пока эта функция отвечает за названия кнопок основного меню используя названия папок и должна будет называть кнопки подменю используя названия папок внутри тех, которыми названы кнопки меню--
function fSetMenuButName()
    local gPageObject = Page.EnumerateObjects();
    if (gPageObject ~= nil) then
        for nIndex, sNameButton in gPageObject do
            if (String.Left(sNameButton, 6)=="Button" and (Page.GetObjectType(sNameButton)) == OBJECT_BUTTON) then
                local tFoldName = Folder.Find(fGetContentPath(), "*", false, nil);
                for n, s in tFoldName do
                    Button.SetText("Button"..n, String.SplitPath(tFoldName[n]).Filename);
                    fGetPartsName(tFoldName[n])
                end
            end
        end
    end
end

Добавлено:
Ой, я решил задачку... и вправду мозг уже кипит... Кому интересно загвоздка была очень простой...

Код:

function fGetPartsName(tPartName)
local tPrtName = Folder.Find(tPartName, "*", false, nil);
local gPageObject = Page.EnumerateObjects();
if (gPageObject and tPrtName) ~= nil) then
for nPartIndex, sNameButton in gPageObject do
if (String.Left(sNameButton, 4)=="Part" and (Page.GetObjectType(sNameButton)) == OBJECT_BUTTON) then
for n, s in tPrtName do
Button.SetText("Part"..n, String.SplitPath(tPrtName[n]).Filename);
end
end
end
end
end

Теперь всё как надо, и меню с названиями и части подписываются! Буду рад, если поступят предложения по оптимизации.

Отдельное спасибо tavria2, на примере Вашего кода очень хорошо работается.

Модерирует : gyra, Maz
Widok (17-05-2010 12:17): Лимит страниц. Продолжаем здесь.	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99