小编Pab*_*ino的帖子

我有一行描述如下:'| 0200 | 4 | SALGADOS ||| KG | 00 | 19051000 |||| 17 |'

我想分隔管道在数据库中保存数据的位置.

我正在错误地使用pos功能.但我得到的数据.

在if中,我将数据插入db.

ReadLn(txt, line);
if True then
  if (Pos('|0200|', line)) = 1 then
  begin
    fArq.Add(line);
  end;
  if (pos('|0000|', line)) = 1 then
  begin
    fArq.Add(line);
  end;
  if (pos('|0005|', line)) = 1 then
  begin
    fArq.Add(line);
  end;
  if (pos('|C460|', line)) = 1 then
  begin
    fArq.Add(line);
    flagCF := True;
  end
  else
  begin
    if flagCF = True then
      if (pos('|C490|', line)) = 0 then
        fArq.Add(line)
      else
        flagCF := False; …