Чтение онлайн

на главную - закладки

Жанры

Программирование мобильных устройств на платформе .NET Compact Framework

Салмре Иво

Шрифт:

dx_betweenButtons

 buttonAnswer1.Top = buttonAnswer0.Top

 'Следующий ряд

 buttonAnswer2.Left = buttonAnswer0.Left

 buttonAnswer2.Top = buttonAnswer0.Top + answerButtons_dy + _

dy_betweenButtons

 buttonAnswer3.Left = buttonAnswer2.Left + answerButtons_dx + _

dx_betweenButtons

 buttonAnswer3.Top = buttonAnswer2.Top

 'Следующий ряд

 buttonAnswer4.Left = buttonAnswer2.Left

 buttonAnswer4.Top = buttonAnswer2.Top + answerButtons_dy + _

dy_betweenButtons

 buttonAnswer5.Left = buttonAnswer4.Left + answerButtons_dx + _

dx_betweenButtons

 buttonAnswer5.Top = buttonAnswer4.Top

End Sub

'-----------------------------------------------------------------------

'Вспомогательная функция, которая позволяет задавать состояние видимости

'кнопок, отображающих ответы из словаря

'-----------------------------------------------------------------------

Private Sub SetAnswerButtonVisibility(ByVal visibleState _

 As Boolean)

 buttonAnswer0.Visible = visibleState

 buttonAnswer1.Visible = visibleState

 buttonAnswer2.Visible = visibleState

 buttonAnswer3.Visible = visibleState

 buttonAnswer4.Visible = visibleState

 buttonAnswer5.Visible = visibleState

End Sub

'-----------------------------------------------------------------

'Вспомогательная функция, вызываемая для задания свойств видимости

'некоторых элементов управления

'-----------------------------------------------------------------

Private Sub SetDifficultyButtonVisibility(ByVal visibleState _

 As Boolean)

 buttonShowAnswers_AdvancedVersion.Visible = visibleState

 buttonShowAnswers_SimpleVersion.Visible = visibleState

End Sub

'-----------------------------------------------------------------------

'Вспомогательная функция, которая позволяет задавать состояние видимости

'кнопок, отображающих ответы из словаря

'-----------------------------------------------------------------------

Private Sub SetAnswerButtonEnabled(ByVal enabledState _

 As Boolean)

 buttonAnswer0.Enabled = enabledState

 buttonAnswer1.Enabled = enabledState

 buttonAnswer2.Enabled = enabledState

 buttonAnswer3.Enabled = enabledState

 buttonAnswer4.Enabled = enabledState

 buttonAnswer5.Enabled = enabledState

End Sub

'-----------------------------------------------------------------

'Задает текст в текстовом окне и кнопках,

'необходимых для формулирования вопросов.

'

случае практической реализации эта функция должна просматривать

'вопросы динамически

'-----------------------------------------------------------------

Private Sub SetTextForVocabularyQuestion

 setQuestionText("What is the English word for 'der Mensch'?")

 buttonAnswer0.Text = "Four"

 buttonAnswer1.Text = "Person"

 buttonAnswer2.Text = "Three"

 buttonAnswer3.Text = "To Jump"

 buttonAnswer4.Text = "Newspaper"

 buttonAnswer5.Text = "Brother"

End Sub

'Вызывается для оценки варианта ответа, выбранного пользователем

Private Sub evaluateMultipleChoiceAnswer(ByVal buttonClicked _

 As Button, ByVal selection As Integer)

 'Примечание: В практической реализации правильный номер ответа

 'определяется динамически и не всегда соответствует "кнопке #1"

 'Если выбранный пользователем вариант ответа не является правильным,

 'отменить доступ к нажатой кнопке

 If (selection <> 1) Then

'Выбранный вариант ответа является неправильным

buttonClicked.Enabled = False

 Else

'Пользователь выбрал правильный ответ, продолжить игру

StateChangeForGameUI(GameUIState.waitForNextQuestion)

 End If

End Sub

'Абстракция, задающая текст вопросов

Sub setQuestionText(ByVal textIn As String)

 textBoxAskQuestion.Text = textIn

Поделиться:
Популярные книги

Эпоха Опустошителя. Том III

Павлов Вел
3. Вечное Ристалище
Фантастика:
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Эпоха Опустошителя. Том III

Курс 1. Сентябрь

Фокс Гарри
1. Маркатис
Фантастика:
аниме
фэнтези
сказочная фантастика
5.00
рейтинг книги
Курс 1. Сентябрь

Кодекс Охотника. Книга XII

Винокуров Юрий
12. Кодекс Охотника
Фантастика:
боевая фантастика
городское фэнтези
аниме
7.50
рейтинг книги
Кодекс Охотника. Книга XII

Двойник короля 14

Скабер Артемий
14. Двойник Короля
Фантастика:
аниме
фэнтези
попаданцы
5.00
рейтинг книги
Двойник короля 14

Сильнейший Столп Империи. Книга 1

Ермоленков Алексей
1. Сильнейший Столп Империи
Фантастика:
аниме
фэнтези
фантастика: прочее
попаданцы
5.00
рейтинг книги
Сильнейший Столп Империи. Книга 1

Мы – Гордые часть 8

Машуков Тимур
8. Стальные яйца
Фантастика:
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Мы – Гордые часть 8

Глава рода

Шелег Дмитрий Витальевич
5. Живой лёд
Фантастика:
боевая фантастика
6.55
рейтинг книги
Глава рода

Кодекс Охотника. Книга XXXVI

Винокуров Юрий
36. Кодекс Охотника
Фантастика:
аниме
фэнтези
попаданцы
5.00
рейтинг книги
Кодекс Охотника. Книга XXXVI

Рассвет русского царства

Грехов Тимофей
1. Новая Русь
Документальная литература:
историческая литература
5.00
рейтинг книги
Рассвет русского царства

Локки 8. Потомок бога

Решетов Евгений Валерьевич
8. Локки
Фантастика:
фэнтези
боевая фантастика
героическая фантастика
попаданцы
5.00
рейтинг книги
Локки 8. Потомок бога

На границе империй. Том 10. Часть 9

INDIGO
Вселенная EVE Online
Фантастика:
боевая фантастика
космическая фантастика
попаданцы
5.00
рейтинг книги
На границе империй. Том 10. Часть 9

Вперед в прошлое!

Ратманов Денис
1. Вперед в прошлое
Фантастика:
попаданцы
5.00
рейтинг книги
Вперед в прошлое!

Враг из прошлого тысячелетия

Еслер Андрей
4. Соприкосновение миров
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Враг из прошлого тысячелетия

Последний Паладин. Том 6

Саваровский Роман
6. Путь Паладина
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Последний Паладин. Том 6