Зачем новичку БД, если он ещё string от array of string не отличает.
Dmitry_DM, прочитай про типы данных и ключевое слово
type
Собери тип которой будет в себе содержать вопросы и к каждому вопросу 3и варианта + 1н правильный ответ.
Код:
type TMyQuestion : record
fquest: string
fopt1: string
fopt2: string
fopt3: string;
fans: string;
end;
Заведи массив таких вопросов и файл из этого типа данных:
Код:
var
FQuestions : file of TMyQuestion;
MyQuestions : array [0..99] of TMyQuestion;
Запись типизированных данных в файл и считывание оных оттуда:
Записывать:
Код:
AssignFile(FQuestions, 'c:\FQuestions.dat');
Rewrite(FQuestions, 1);
For i:=0 to Length(MyQuestions)-1 do
BlockWrite(FQuestions, MyQuestions[i], Sizeof(FQuestions));
CloseFile(FQuestions);
Читать по аналогии.