усовершенствовать медиаплеер C++

[carrie bradshaw]

привет, всем любителям программировать. помогите, пожалуйста, усовершенствовать программу на С++.

медиаплеер

#include <vcl.h>
#pragma hdrstop
 
#include "Unit83.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm83 *Form83;
//---------------------------------------------------------------------------
__fastcall TForm83::TForm83(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm83::BitBtn1Click(TObject *Sender)
{
MediaPlayer1->Play();
}
//---------------------------------------------------------------------------
void __fastcall TForm83::BitBtn2Click(TObject *Sender)
{
  MediaPlayer1->Pause();

}
//---------------------------------------------------------------------------
void __fastcall TForm83::BitBtn3Click(TObject *Sender)
{
MediaPlayer1->Rewind();
}
//---------------------------------------------------------------------------
void __fastcall TForm83::TrackBar1Change(TObject *Sender)
{
TrackBar1->Max = 65350 ;
waveOutSetVolume(0, MAKELONG(TrackBar1->Position, TrackBar1->Position));
}
//---------------------------------------------------------------------------
void __fastcall TForm83::BitBtn4Click(TObject *Sender)
{
if (OpenDialog1->Execute())
 {
 MediaPlayer1->FileName=OpenDialog1->FileName;
 MediaPlayer1->Open();
 }
 ListBox1->Items->Add(OpenDialog1->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TForm83::FormCreate(TObject *Sender)
{
MediaPlayer1->Close();
}

помогите, пожалуйста, вывести на экран время воспроизведения трека или возможно ещё как-то усовершенствовать.

[raxp]

MediaPlayer1->Length, внутри структура:

hh: byte;
    mm: byte;
    ss: byte;
    NotUsed: byte;

возможно ещё как-то усовершенствовать.

выкиньте MCI обертку и перейдите на DirectSound. Хотя вам стоит пока начать с ActiveX WMP.