[poli-smen]

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

Ну в старом виде, как вы мне давали, были слова и цифры, препятствующие будущей записи, типа номер семпла, канал, значение. Было так:
1 Канал1: 0000 Канал2: 0000
2 Канал1: 0002 Канал2: 0002
И т.д...
Но потом я сделал так, чтобы выводилось только значение. 0002, например. В одноканальном проблем нет, так как там 0002 и все. Но так же выводит и для 2-х канального. А должно быть так 00020002. То есть 2 канала рядом. как так вывести? В правильном итоге, как на картинке, в не правильном, значение в одном канале.

Здесь должно быть так:

Код:

      Inc(i);
      s1:='';
      s:=''+IntToStr(i);
      for chanel := 1 to Header.wChannels do
      begin
        f.ReadBuffer(sample, SampleSize);
        Dec(wChankSize, SampleSize);
        s:=s+' Chanel'+IntToStr(chanel)+' '+IntToHex(sample, SampleSize*2);
        s1:=s1+IntToHex(sample, SampleSize*2);//  <=======
      end;
      Form1.Memo1.Lines.Add(s1);

А для каких целей в этом коде используется переменная s ?