我的文本文件中数据存储的格式如下:
帧号   标识符   名字   数据
01     000001    ly    12456
请问怎么分别把帧号,标识符,名字和数据放到各自对应的变量中呢?

解决方案 »

  1.   

    定义相应的结构 
    然后把整行数据读入到BUF 然后对此BUF用定义的结构进行类型强行转换
    再分别赋值即可
      

  2.   

    可是怎么具体读出呢?我先读出一行数据到buf,
    接着比如我想读000001 或者123456 用什么函数呢?请指教!3x
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      MyText:TextFile;
      Str:String;
    begin
      AssignFile(MyText,'C:\123.txt');
      Reset(MyText);
      while not Eof(MyText) do
      begin
        Readln(Mytext,Str);
        ShowMessage(Str);
        //分割字符操作,付給你的變量
      end;
      CloseFile(MyText);
    end;