Работа с mp3 id3 тегами

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
struct
{
  char ID[3];
  char Title[30];
  char Artist[30];
  char Album[30];
  char Year[4];
  char Comment[30];
  char Genre;
}TAG;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int Handle = FileOpen("D:\\1.mp3", fmOpenRead);
  if(Handle != -1)
    {
      if(FileSeek(Handle, -128, 2) != -1)
        if(FileRead(Handle, (void *)&TAG, 128) != -1)
          {
            Edit1->Text = AnsiString(TAG.Title);
            Edit2->Text = AnsiString(TAG.Artist);
            Edit3->Text = AnsiString(TAG.Album);
          }
      FileClose(Handle);
    }
}
//---------------------------------------------------------------------------

Label2->Caption=(AnsiString)TAG.Artist+(AnsiString)TAG.Title;