1. Вы находитесь в архивной версии форума xaker.name. Здесь собраны темы с 2007 по 2012 год, большинство инструкций и мануалов уже неактуальны.

Пишем игру "шутку"

  1. Здравствуйте, наверное многие помнят игру где был написан вопрос мол "Довольны ли вы своей зарплатой?" и перед вами было две кнопки "Да" и "Нет", ну и как вы уже вспомнили, когда наводишь курсор на кнопку "Нет", то он таинственным способом убегал от вас.

    Ну что, попробуем написать такую вот штуковину. Погнали

    Создаем новую форму и кидаем на нее следующие компоненты:
    • Label - 1
    • Button - 2

    В caption лабела пишем вопрос и переносим его куда вам угодно. В caption первой кнопки пишем "Да", а у второй кнопки "Нет". Ну думаю вопросов здесь возникнуть не должно. Вот что должно получится:

    [​IMG]

    "А что же дальше?" - спросите вы, да все просто! Тыкаем на кнопку "Нет" и в Object Inspector переходим на вкладку "Events" и там находим "OnMouseMove" и тыкаем на него два раза. И в открывшемся окне, между begin и end, пишем следующее:
    Код:
    Randomize;
    Button2.Left:=random(300)-10;
    Button2.Top:=random(260)-10;
    Кстати, в скобочках нужно написать размер вашей формы, чтобы кнопка не выпрыгивала за ее пределы, а чтобы узнать размер формы достаточно перетащить кнопку в любой угол и возле курсора будет написано то что вам нужно.

    Жмем F9 и пробуем, получилось Радоваться рано, можно же сделать чтобы при нажатии на кнопку "Да" выводилось какое-либо сообщение, например "ха-ха-ха, мы так и знали!", но как же это реализовать? Да очень просто, тыкаем на кнопку "Да" два раза и пишем в открывшемся окне:
    Код:
    MessageBox(0,'Мы так и знали :))','ха-ха :)',0);
    Ну вот и все, теперь жмем F9 и проверяем что же у нас получилось:) Удачи в кодинге:)

    P.S Баян, но все равно решил поделиться с вами :)

    ©p0wER
     
  2. Баян еще тот, но раз уж написал - пускай будет)
     
  3. Код:
    Button2.Left := Random(Self.Width - Button2.Width);
    Button2.Top := Random(Self.Height - Button2.Height);
     
  4. Это если я не ошибаюсь первый или второй урок по дэлфи :)
    Дальше будет калькулятор ?
     
  5. zapadlo_zapadlov, вы имеете что-то против? Любому начинающему будет неплохо начать с этого.
     
  6. Я не против я только за - ты бы тогда уже и выложил ссылку на эти уроки.
    Они есть на ру трекере и все кто их смотрел не жалеют зачётные видео уроки получились :)
     
  7. zapadlo_zapadlov, ты имеешь виду уроки Антона Макрушина что ли? Там у него было вроде это. Ну держите тогда, отличные уроки - http://rutracker.org/forum/viewtopic.php?t=2829387 :)