:: Игры Разума
Вопросы на собеседовании 8A
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Ну что продолжим ?
Продолжаем с циклами.
Дано: Выполнить команду Activate Window Puzzle - 1000 раз
Не использовать:
  • Циклы, Do While, For, Scan, Print etc.
  • Рекурсию
  • Таймеры
  • Таблицы, курсоры, данные с SQL серверов и прочего доступа к данным
  • Генерацию кода

    ЗЫ Интересно что я еще забыл ?

    Подсказка: Работает только в среде разработки в RunTime не работает

    Я пользуюсь этой возможностью лет 15 уже


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
  • Re: Вопросы на собеседовании 8A
    AleksM

    Сообщений: 17881
    Дата регистрации: 11.11.2003
    Цитата:
    Выполнить команду Activate Window Puzzle
    У меня нету такого окна


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    AleksM

    Сообщений: 17881
    Дата регистрации: 11.11.2003
    Цитата:
    ЗЫ Интересно что я еще забыл ?
    В Command команду 1000 раз не набирать


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    А уменя на VFP9SP2 есть


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    AleksM

    Сообщений: 17881
    Дата регистрации: 11.11.2003
    Ага, попался. Это я про 7-ку написал.


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Дык в FPD 2.6 работает нормально


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    Foxtrot

    Сообщений: 3408
    Откуда: Куда:
    Дата регистрации: 25.04.2003
    Цитата:
    В Command команду 1000 раз не набирать
    Натолкнуло на такое
    _Screen.AddObject("clickme", "mycalc")
    DEFINE CLASS mycalc AS Custom
    PROCEDURE Init
    BINDEVENT(_Screen, "Click", This, "MyDo")
    ENDPROC
    PROCEDURE MyDo
    Activate Window Calculator
    ENDPROC
    ENDDEFINE


    ------------------
    Мойте ноги, моя ноги вы моете и руки
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    Равиль

    Сообщений: 6554
    Откуда: Уфа
    Дата регистрации: 01.08.2003
    piva
    ... Дано: Выполнить команду Activate Window Puzzle - 1000 раз ... Я пользуюсь этой возможностью лет 15 уже
    А командное окно здесь ни при чем ?
    Интересно - человек 15 лет уже наслаждается - с утра загружает 1000 разлов и до вечера их разгадывает


    ------------------
    Тяжело согнать курсором муху с монитора ...
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 3204
    Откуда: Рига
    Дата регистрации: 03.02.2006
    У меня деватки нет проверить, но может такое сойдет
    local a(1000)
    a=_vfp.docmd("activate window puzzle")
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    А мышь выдержит ?


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Равиль - тогда для тебя специальное
    Activate Window Calculator


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    ssa

    Сообщений: 13008
    Откуда: Москва
    Дата регистрации: 23.03.2005
    leonid
    У меня деватки нет проверить, но может такое сойдет
    local a(1000)
    a=_vfp.docmd("activate window puzzle")
    Такое в FPD 2.6? Сомневаюсь


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Вот что я забыл еще указать Лёня напомнил
    не использовать макро, eval, execscript и _VFP


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 3204
    Откуда: Рига
    Дата регистрации: 03.02.2006
    А там не было условия про FPD2. А решение не обязательно должно совпадать с авторским.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    ssa

    Сообщений: 13008
    Откуда: Москва
    Дата регистрации: 23.03.2005
    Самое простое и что первое пришло в голову:

    On Key Label f12 acti wind puzzle

    и подержать кнопочку F12.


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Да мое решение работает начиная с FP 2.5


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Киррич на нее тоже можно положить


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    ssa

    Сообщений: 13008
    Откуда: Москва
    Дата регистрации: 23.03.2005
    Тоже вариант. Кстати, такой способ, только с предметом полегче и поменьше, у меня иногда практически применялся.


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 3204
    Откуда: Рига
    Дата регистрации: 03.02.2006
    Создать программу Tmp
    i=i+1
    if i<=1000
    activate window calculator
    i=i+1
    keyboard "{Uparrow}{Enter}"
    endif
    затем в командном окне набрать
    public i
    i=0
    on error do tmp
    aaaa
    Ratings: 0 negative/0 positive
    Re: Вопросы на собеседовании 8A
    piva
    Автор

    Сообщений: 18655
    Откуда: Курган
    Дата регистрации: 24.03.2004
    Ну почти так !


    ------------------
    Часто бывает так, что есть над чем задуматься, а нечем.
    Ratings: 0 negative/0 positive


    Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

    On-line: 1 (Гостей: 1)

    © 2000-2024 Fox Club 
    Яндекс.Метрика