Показать сообщение отдельно
  #6  
Старый 18.05.2010, 19:16
ART ART вне форума
Продвинутый
 
Регистрация: 13.02.2006
Адрес: Магнитогорск
Сообщения: 669
Репутация: 14745
По умолчанию

Спасибо за подсказку.
Структуру вообще не понятная. В тесте так: вопрос, три варианта ответа. По логике должно быть так:

Код:
type
 TRec = record
  Q, A1, A2, A3: string[255];
  Right: byte;
 end;

Но считывает абракадабру. Есть у кого какие нить идеи? Любые.

При структуре:

Код:
type
 TRec = record
  s: integer;
  Q, A1, A2, A3: string[255];
  Right: byte;
 end;


Отлично считывает только первую запись. Остальное таже абракадабра
Ответить с цитированием