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

Djon1970, заметано, только до первых внятных результатов пока еще далеко. Занимаюсь, главным образом, компиляцией и пытаюсь понять принципы... Ну и параллельно делаю свой авторан. В чем Ваши материалы оказывают неоценимую помощь. Спасибо, дружище!

tavria2, вопрос:
есть кнопка, к ней привязаны такие команды (при нажатии):

Код:

--- очистка Output от предыдущего значения и внесение нового текста
Paragraph.SetText("Output", "");
Paragraph.SetText("Output", "Маленькие, но необходимые для снятия стресса, игрули. Вобщем, Релакс, и еще раз, Релакс!!!");
-- задание рабочей папки
fPath = String.SplitPath("SOFTWARE\\games");
g_strDefaultFolder = fPath.Folder..fPath.Filename;

-- определение функций по обработке файлов и каталогов папки...
function RefillFilesList()
    -- очистка listbox Soft
    ListBox.DeleteItem("Soft",LB_ALLITEMS);

    StatusDlg.Show();
    tblFiles = File.Find(g_strDefaultFolder,"*.exe",false,true);--отбирать только ехе-файлы
    StatusDlg.Hide();
    -- добавление для каталогов в листбоксе значения UP и его заполнение (listbox)
    ListBox.AddItem("Soft","[..]","UP");
    if(tblFiles)then
        for i, filename in tblFiles do
            tblFileParts = String.SplitPath(filename);
            tblAttributes = File.GetAttributes(filename);
            if(tblAttributes)then
                if(tblAttributes.Directory)then
                    ListBox.AddItem("Soft","["..tblFileParts.Filename.."]",filename);
                else
                    ListBox.AddItem("Soft",tblFileParts.Filename..tblFileParts.Extension,filename);
                end
            end
        end
    end
end
RefillFilesList();

Потом к listbox "Soft" привязаны такие команды (по двойному клику):

Код:

-- суть - по дв клику переход на 1 каталог вверх или вниз - для каталогов, для файлов -запуск файла на исполнение
tblSelected = ListBox.GetSelected("Soft");
if(tblSelected)then
    local strFolderName = "";
    local strText = ListBox.GetItemText("Soft",tblSelected[1]);
    local strPath = ListBox.GetItemData("Soft",tblSelected[1]);
    if(String.Left(strText,1) == "[")then
        -- It is a folder...
        if(strPath == "UP")then
            -- go up one folder level...
            local nPosition = String.ReverseFind(g_strDefaultFolder,"\\");
            if(nPosition ~= -1)then
                strFolderName = String.Left(g_strDefaultFolder,nPosition);
                strFolderName = String.TrimRight(strFolderName,"\\");
            else
                strFolderName = g_strDefaultFolder;
            end
        else
            strFolderName = strPath;
        end
     g_strDefaultFolder = strFolderName;
        RefillFilesList();
    else
        File.Open(strPath);
    end
end

Собственно, вопрос - как заблокировать выход из папки games в каталог SOFTWARE? Мне надо, чтобы юзер работал только с games и ее файлами и каталогами (вниз можно двигаться, вверх - только рабочая папка games)...

Модерирует : 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