خواندن رشته با کارکترهای تک بایتی از فایل

سلام
من چنین کدی دارم:

procedure LoadStr(FileName:String;var S:String);

Var

  Stream : TFileStream;

begin

  Stream := TFileStream.Create(FileName,fmOpenRead);

  try

    Stream.Position := 0;

    SetLength(S,Stream.Size);

    Stream.Read(S[1], Stream.Size);

  finally

    Stream.Free;

  end;

end;

میخوام در فایلی متنی که چیزی مثل }$2.1${ در اون هست باز کنم و }$ رو پیدا کنم اما در دلفی یونیکد، نمیتونه پیداش کنه و وقتی مثلا 50 کارکتر اول فایل رو میخوام نشونم بده، رشته ای مرکب از کارکترهای مستطیل و کارکترهای ناخوانا نشون میده. در دلفی غیر یونیکد مشکلی نداشتم. حالا نمی دونم چطور بررسیش کنم.