for flooders
:: Главная :: Решения :: Статьи :: Сайт М. Дроздова :: Файловый архив :: Книга по VFP 9 :: Русский Help Online :: OFF-LINE Форум
   Л и с о в о д ы   в с е х   с т р а н,  о б ъ е д и н я й т е с ь !!!  

Список Форумов  :: Игры Разума
   :: Помощь сайту :: 

Вопросы на собеседовании 8A
piva
[Болтун]
Автор

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

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

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

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


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

  • Re: Вопросы на собеседовании 8A
    AleksM
    [Админ]

    Сообщений: 17704
    Дата: 14.03.07 07:44:33ОтветитьЦитировать
    Цитата:
    Выполнить команду Activate Window Puzzle
    У меня нету такого окна


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    AleksM
    [Админ]

    Сообщений: 17704
    Дата: 14.03.07 07:46:08ОтветитьЦитировать
    Цитата:
    ЗЫ Интересно что я еще забыл ?
    В Command команду 1000 раз не набирать


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 07:49:02ОтветитьЦитировать
    А уменя на VFP9SP2 есть


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

    Re: Вопросы на собеседовании 8A
    AleksM
    [Админ]

    Сообщений: 17704
    Дата: 14.03.07 07:50:19ОтветитьЦитировать
    Ага, попался. Это я про 7-ку написал.


    ------------------
    Лучше переесть, чем недоспать.
    Не спеши, а то успеешь.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 07:53:18ОтветитьЦитировать
    Дык в FPD 2.6 работает нормально


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

    Re: Вопросы на собеседовании 8A
    Foxtrot

    Сообщений: 3377
    Откуда: Куда:
    Дата: 14.03.07 08:33:51ОтветитьЦитировать
    Цитата:
    В 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


    ------------------
    P.S. будете проходить мимо, не стесняйтесь, проходите
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    Равиль

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


    ------------------
    Тяжело согнать курсором муху с монитора ...
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 2617
    Откуда: Рига
    Дата: 14.03.07 08:41:48ОтветитьЦитировать
    У меня деватки нет проверить, но может такое сойдет
    local a(1000)  
      a=_vfp.docmd("activate window puzzle")
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 08:41:58ОтветитьЦитировать
    А мышь выдержит ?


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

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 08:42:49ОтветитьЦитировать
    Равиль - тогда для тебя специальное
    Activate Window Calculator


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

    Re: Вопросы на собеседовании 8A
    ssa
    [Модератор]

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


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

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


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

    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 2617
    Откуда: Рига
    Дата: 14.03.07 08:44:41ОтветитьЦитировать
    А там не было условия про FPD2. А решение не обязательно должно совпадать с авторским.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    ssa
    [Модератор]

    Сообщений: 12246
    Откуда: Москва
    Дата: 14.03.07 08:44:47ОтветитьЦитировать
    Самое простое и что первое пришло в голову:

    On Key Label f12 acti wind puzzle

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


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 08:44:52ОтветитьЦитировать
    Да мое решение работает начиная с FP 2.5


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

    Re: Вопросы на собеседовании 8A
    piva
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 08:50:02ОтветитьЦитировать
    Киррич на нее тоже можно положить


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

    Re: Вопросы на собеседовании 8A
    ssa
    [Модератор]

    Сообщений: 12246
    Откуда: Москва
    Дата: 14.03.07 08:52:25ОтветитьЦитировать
    Тоже вариант. Кстати, такой способ, только с предметом полегче и поменьше, у меня иногда практически применялся.


    ------------------
    Лень - это неосознанная мудрость.
    Ratings: 0 negative/0 positive

    Re: Вопросы на собеседовании 8A
    leonid

    Сообщений: 2617
    Откуда: Рига
    Дата: 14.03.07 08:57:06ОтветитьЦитировать
    Создать программу 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
    [Болтун]
    Автор

    Сообщений: 18533
    Откуда: Курган
    Дата: 14.03.07 09:08:09ОтветитьЦитировать
    Ну почти так !


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



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

    On-line: 19 dimuhametov  and Guests: 18


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