Показать сообщение отдельно
  #1  
Старый 28.03.2013, 14:32
Dmitry_DM Dmitry_DM вне форума
Активный
 
Регистрация: 07.08.2012
Сообщения: 258
Версия Delphi: Delphi 7
Репутация: 11
По умолчанию Помогите с работой со строками

Здравствуйте! Я вот решил написать игру "Кто хочет стать миллионером".
Столкнулся с такой трудностью как создания массивов с вопросами и ответами. Инфа берется с файла. Там вот такая "иерархия":
Код:
[Questions for "Кто хочет стать миллионером"]
---
^Завершите философскую русскую пословицу: "Век живи, век учись - ..."
-Академиком станешь
-Богатеньким будешь
-В люди выйдешь
+Дураком помрешь
---
^Какое небесное тело используется для определения известных актеров, спортсменов и музыкантов?
-Астероид
-Комета
+Звезда
-Планета
---
Так вот: есть такие массивы:
Код:
  Vopros: array of string;
  Variant1: array of string;
  Variant2: array of string;
  Variant3: array of string;
  Variant4: array of string;
  Otvet: array of string;
Как считывать файл, что бы
--- обозначало новый вопрос (разделитель).
^ обозначало новый вопрос и заполнялось в массив Vopros
+ и - обозначало вариант ответа и все 4 варианта писались в массивы Variant (1-4)
+ обозначало правильный вариант ответа и заполнялось в массив Otvet
И еще один вопрос: как потом послать строку массива в Lable каждый раз РАНДОМНО?
Буду очень благодарен за ответы!!
Ответить с цитированием