Hola alquimista, si quieres que funcione de la forma que indicas, debes mantener la propiedad AutoEnabled en False y habilitar y desabilitar tu los botones.
Código Delphi
[-]
with mp3player do
begin
Close;
FileName:=mp3File;
Open;
SetMPVolume(mp3Player, TBvolumen.Position);
Play;
Autoenable:=false;
EnabledButtons := [BtPause,BtStop];
end;
procedure TForm1.mp3playerClick(Sender: TObject; Button: TMPBtnType;
var DoDefault: Boolean);
begin
With mp3player do begin
Case Button of
btPlay : EnabledButtons := [btPause, btStop];
btStop : begin
EnabledButtons := [btPlay];
Position := 0;
end;
btPause : EnabledButtons := [btPlay, btPause, btStop];
end;
end;
end;
Saluditos