Чтение из файла через поток

[tim91]

Есть такой тип:

 Rec = record
    name:UnicodeString;
    number:integer;
  end;
  TRec = ^Rec;

и

strList:TList;

в список добавляю элементы типа TRec. В файл записываю и считываю так:

outputS:=TFileStream.Create('output.txt', fmCreate or fmOpenWrite);
 for i:=0 to strList.Count - 1 do begin
    outputS.Write(strList[i]^, SizeOf(TRec));
 end;
 outputS.Free;
 outputS:=TFileStream.Create('output.txt', fmOpenRead);
 for i:=0 to strList.Count - 1 do begin
  outputS.Read(tmpTStr, SizeOf(TRec));
  ShowMessage(tmpTStr^.name); 
 end;

Собственно, ошибка на строчке с ShowMessage (access violation at address...). Предполагаю, что неправильно считаваю.

[asmodey1]

А вы переменную tmpTStr: ТRec объявляете ?

Сообщение от tim91

Предполагаю, что неправильно считЫваю.

А что, бряку на эту строку трудно поставить ? И посмотреть, что в записи ?

[GunSmoker]

http://www.delphikingdom.ru/asp/view...alogid=1206#06

[tim91]

да, tmpTStr: TRec