Как отредактировать Id3Tag

[vitalik007]

Здрасте!
У меня вопрос как отредактировать Id3tag в Mp3 файле.
Формат Id3Tag в мп3 я знаю(последние 128 символов)
так как мне эти символы заменить на свои?
у меня заменить получается НО вместо английских букв в файл записываются не понятные
вот Мой код

var
  FS: TFileStream;
  Buffer: string;
begin
  FS := TFileStream.Create(pathedit.Text, fmOpenwrite);
  try
    FS.Seek(-128, soFromEnd);
    buffer:=Titleedit.text;
    fs.write(buffer,30);
    buffer:=Artistedit.text;
    fs.write(buffer,30);
    buffer:=Albumedit.text;
    fs.write(buffer,30);
    buffer:=yearedit.text;
    fs.write(buffer,4);
    buffer:=commentedit.text;
    fs.write(buffer,30);
    buffer:=inttostr(Genre.itemindex);
    fs.write(buffer,4);
  finally
    FS.Free;
  end;

[alexBlack]

fs.write(buffer[1],30);

[mutabor]

Посмотри в этой теме может что нужное для себя найдешь
http://www.programmersforum.ru/showthread.php?t=5588&highlight...

На всякий случай: теретически может быть такой вариант, что тег сохранен только во второй версии и в середине файла. Таким образом ты затрешь хвост трека.