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

Ну вот как и обещал.

В On Preload страницы регистрации помещаем следующий код

Код:

local regkey = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\AtMegaSoft"); -- проверка наличия ключа в реестре
if regkey then -- если существует то
local result = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\AtMegaSoft", "MyValue", true); -- получаем значение MyValue
    if result == "1000" then -- если MyValue = 1000 то
    Page.Jump("Page1"); -- Перейти к странице Page1
    end
end

В свойства кнопки On Click пишем код

Код:

-- получаем введенные данные из объектов Input
local inp1 = Input.GetText("Input1");
local inp2 = Input.GetText("Input2");
local inp3 = Input.GetText("Input3");
if inp1 == "100" and inp2 == "200" and inp3 == "700" then -- проверка на соответствие введенных данных
x = 0;
local inptable = {inp1, inp2, inp3} -- создаем таблицу данных
-- в цикле суммируем данные из таблицы преобразовав строки в числа
    for index, input in inptable do
    inpdata = String.ToNumber(input);
    x = x + inpdata
        if x == 1000 then -- если x = 1000 то
        Registry.CreateKey(HKEY_LOCAL_MACHINE, "Software\\AtMegaSoft"); -- создаем ключ в реестре
        Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\AtMegaSoft", "MyValue", "1000", REG_SZ); -- присваеваем MyValue значение 1000
        Page.Jump("Gratulation");
        end
    end
else
Dialog.Message("AtMegaSoft", "Ключ неверен! Попробуйте еще раз", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end

Я поменял местами и соответственно переименовал Input2 и Input3, потому что непоследовательный переход по клавише Tab. Учти это и сделай то же самое.

Модерирует : gyra, Maz
Widok (03-09-2007 23:10): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 100 101