文件读写要命，真急呀

Question

我想把指定的2进制值(字符串,如010011)写入2进制文件,并能够再从文件中读出并显示出来怎么做哪?劳驾请写清楚一点,新手,谢谢.

Answer 1

var
  TF : File;
  Str :String;
 If FileExists(FileName) then  
  begin
      AssignFile(TF,FileName);  
      RESET(TF);
      While not eof(TF) do
      begin
         readln(TF,Str);
         Memo1.Lines.Add(Str);
      end;
   closefile(TF);
  end
  else
     showmessage('This file doesn'+''''+'t exist, please to check it!');

Answer 2

还不是太清楚，不过可否类似这样b : BYTE;
begin
    b :=  $51;
    ShowMessage(char($51));