Иногда не работает очистка id3 тегов

//здесь я читаю файл и теги нормально читаются
//все теги выводяться в эдиты
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  int Handle = FileOpen((ListBox2->Items->Strings[i]+ListBox1->Items->Strings[i]), fmOpenRead);    //  стринги путь+имя
  if(Handle != -1)
    {
      if(FileSeek(Handle, -128, 2) != -1)
        if(FileRead(Handle, (void *)&TAG, 128) != -1)
          {
            Edit2->Text = AnsiString(TAG.Title);
            Edit3->Text = AnsiString(TAG.Artist);
            Edit4->Text = AnsiString(TAG.Album);
            Edit10->Text = AnsiString(TAG.ID);
            Edit11->Text = AnsiString(TAG.Year);
            Edit13->Text = AnsiString(TAG.Comment);
          }
      FileClose(Handle);
    }
}
 
 
//---------------
// здесь нажимаем кнопку и теги должны чиститься
 
void __fastcall TForm1::Button14Click(TObject *Sender)
{
 
//ListBox2->Items->Strings[i] - путь 
//ListBox1->Items->Strings[i] - имя файла с расширением
   int Handle = FileOpen((ListBox2->Items->Strings[i]+ListBox1->Items->Strings[i]), fmOpenReadWrite); // Открыл для чтения/записи
   if(Handle != -1) // все нормально? тогда читаем
   {
      if(FileSeek(Handle, -128, 2) != -1) // перешли на нужное место нормально?
         if(FileRead(Handle, (void *)&TAG, 128) != -1) // прочиталось?
         {
            Edit2->Text = AnsiString(TAG.Title); // выводим теги
            Edit3->Text = AnsiString(TAG.Artist);
            Edit4->Text = AnsiString(TAG.Album);
            Edit10->Text = AnsiString(TAG.ID);
            Edit11->Text = AnsiString(TAG.Year);
            Edit13->Text = AnsiString(TAG.Comment);
 
            
           // заменяю то что в тэге на пробел
           sprintf(TAG.Title, "%s\0", " ");
           sprintf(TAG.Artist, "%s\0", " ");
           sprintf(TAG.Album, "%s\0", " ");
           sprintf(TAG.ID, "%s\0", " ");
           sprintf(TAG.Year, "%s\0", " ");
           sprintf(TAG.Comment, "%s\0", " ");
            // возвращаемся туда, откуда считали структуру
            if(FileSeek(Handle, -128, 2) != -1)
            {
               FileWrite(Handle, (void *)&TAG, 128); // и записываем назад TAG с одним изменённым полем
 
            }
         }
         FileClose(Handle);
   }
}