создание программы для тестирования

[Иван msts]

Здравствуй, я увлекаюсь компьтерной игрой Microsoft Train Simulator.
И вот потребовалось создать программу-тест для участников игры в мультиплеер. Задумка такая:
светофорная железнодорожная сигнализация достаточно сложная и многие игроки не знают значения сигналов светофоров на железной дороге, для того что бы поверить их знания понадобилось создание этой программы. Начал создавать ее сам что то начало получаться смысл ее в следующем: на несколько секунд (скорее всего 5-7) будет показываться один из 16 возможных сигналов светофора, затем если пользователь не нажал одну из 5 кнопок то показывается следующий сигнал и так 5 раз вся информация сохраняется в файле.

У меня получилось пока сделать только оболочку скоро попробую сделать что бы показывалась gif анимация т.к. необходимо что бы в тесте присутствовали такие сигналы как "два желты, верхний - мигающий" сами сигналы готовы в формате gif есть. файл программа тоже создает и пишет, вот только как привязать нажатие кнопки к всему этому делу???

Могу выслать программу. Одним словом момогите пожалуйста.

e-mail: shatl88@mail.ru; icq: 283436252.

[ACiD]

Может так

Код: Выделить всё

Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 1
  Print #1, 1
Case 2
  Print #1, 2
Case 3
  Print #1, 3
Case 4
  Print #1, 4
Case 5
  Print #1, 5
End Select
End Sub

Private Sub Form_Load()
n As Byte
n = 0
a1 = "asdadasdsadasdasd"
a2 = "asdasdasdasdsadgsgsdg"
'........
Open "" For Output As #1
End Sub

Private Sub Timer1_Timer()
n = n + 1
Image1.Picture = LoadPicture("ИмяФайла")
Command1(0).Caption = a1
'...........
Print #1, i
If n > 5 Then
Close #1
End
End If
End Sub

[Иван msts]

Спасибо, попробую, может то что надо.

Если заинтересовало, то могу выслать прогу. Давно просто уже ни чего не писал вот и позабывал все, а когда-то даже призовые места в ВАО занимал на конкурсах

Посмотрел. Это не совсем то что надо.сейчас объясню точнее что требуется.

есть 5 видов ЖД сигналов в каждом виде есть свои сигналы примерно 3-4 сигнала в одном виде. кнопки с названиями видов есть на форме так же на форме присутствуют 16 PictireBox, в каждом из них свой сигнал. по таймеру показывается любой из 16 и тестируемый человек должен выбрать к какому виду он относится и нажать соответствующую кнопку. по нажатию на кнопку появляется следующий сигнал и так 5 раз. при каждом нажатии на кнопку в файл пишется какая группа сигнала горела и верно или не верно нажал тестируемый человек.

Кто знает как сделать подскажите пожалуйста.

[Иван msts]

Подскажите пожалуйста как вставить файлы формата GIF что бы анимация показывалась, пробовал - не получилось

[GSerg]

В поиск, ибо слишком много обсуждено, чтобы спрашивать ещё раз.

[Иван msts]

Пробовал разными методами которые нашел НЕ получается. дайте ссылку пожалуйста, где все это по русски написано как сделать

[Debugger]

Вот пример.
Там только пример, боюсь, вам не пойдёт.

[Иван msts]

Вот пример.
Там только пример, боюсь, вам не пойдёт.

Все равно спасибо, буду разбираться дальше. сижу уже третий день

[GSerg]

Пробовал разными методами которые нашел НЕ получается. дайте ссылку пожалуйста, где все это по русски написано как сделать

Это интересное заявление.

Как может НЕ получиться, если есть ГОТОВОЕ решение?
http://bbs.vbstreets.ru/viewtopic.php?p=102247#102247

[Иван msts]

Это интересное заявление.

Как может НЕ получиться, если есть ГОТОВОЕ решение?
http://bbs.vbstreets.ru/viewtopic.php?p=102247#102247

А вот так очень просто может не получиться. Лучше подскажите как это сделать а то сижу уже тут второй день с прогой мучаюсь третий.

[tyomitch]

Иван, сходить по ссылке не пробовал?

[Иван msts]

Иван, сходить по ссылке не пробовал?

Не поверишь был там!!! И даже скачал а вот как эту радость работать заставить так и не воткнул

[GSerg]

Тогда дополнительный вопрос: сколько времени тебе потребовалось, чтобы воткнуть, как поместить на форму кнопку aka CommandButton?

[Иван msts]

Тогда дополнительный вопрос: сколько времени тебе потребовалось, чтобы воткнуть, как поместить на форму кнопку aka CommandButton?

10 секунд примерно, а на форму я поместил GifCtl а вот как его работать заставить так и не воткнул. Если есть желание помочь так скажи я объясню все подробности и могу даже выслать прогу

[Иван msts]

Вот самое и интересное что этого свойства там нет!!! Есть свойство (Custom) там предлагается загрузить гиф файл только когда я выбираю файл то он меня посылает

[tyomitch]

Вот теперь можно поподробнее?
Куда именно тебя посылают?

[Иван msts]

Объясните пожалуйста пошагово как это сделать

[Иван msts]

Run-time error 321 пишет

[tyomitch]

Гиф свой дай, проверим.

[Иван msts]

Вот гиф файлик который надо туда вставить

[tyomitch]

Мда. Что-то с ним не так, не знаю что.
Это единственный файл, который надо вставить, или есть ещё?
Если есть ещё, то остальные работают или нет?

[Иван msts]

вообще есть еще такие файлы но они в таком же формате, сейчас попробую их вставить

[Иван msts]

А если отставить вопрос с гиф анимацией, помогите пожалуйста написать код по следующему принципу:
по таймеру показывается картинка если нажата какая либо кнопка то показывается следующая картинка если кнопка не нажата а время закончилось то все равно показывается следующая картинка. Данные какая показывалась картинка и какая нажата кнопка пишутся в файл.

[tyomitch]

Пофиксил контрол, пробуй заново.

Технические подробности: в той картинке не было кода конца потока. Поэтому мой контрол декодировал картинку, потом пять килобайт мусора, а потом ломался.

[ACiD]

Надеюсь это поможет, если ещё актуально:

[ACiD]

Мне кажется это то что нужно