Class TCdPlay (unit Mmmain)

Inherits from

TForm

Constructors



Functions

procedure About1Click(Sender: TObject);


procedure AutoSaveClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure Label4Click(Sender: TObject);


procedure MediaPlayer1Click(Sender: TObject; Button: TMPBtnType; var DoDefault: Boolean);


procedure MediaPlayer1Notify(Sender: TObject);


procedure ProgramsClick(Sender: TObject);


procedure StereoButton1Click(Sender: TObject);


procedure Timer1Timer(Sender: TObject);


procedure DeviceClose;


procedure DeviceOpen;


Function FindNextTrack : Boolean;


Function FindPrevTrack : Boolean;


procedure GetDeviceInfo(DeviceInfo:TDeviceInfo);


procedure SaveDeviceInfo(DeviceInfo:TDeviceInfo);


Properties

Events

Variables

About1 : TMenuItem;


AutoSave : TMenuItem;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


LEDElapsed : TLEDLabel;


LEDRemain : TLEDLabel;


LEDTrack : TLEDLabel;


MainMenu1 : TMainMenu;


MediaPlayer1 : TMediaPlayer;


Options1 : TMenuItem;


Panel1 : TPanel;


Panel2 : TPanel;


Prorams : TMenuItem;


StereoButton1 : TStereoButton;


Timer1 : TTimer;


TrackList : TMenuItem;


View : TMenuItem;


DeviceExist : Boolean;


DeviceInfo : TDeviceInfo;


DeviceOpened : Boolean;



Constructors


Functions


procedure About1Click(Sender: TObject);


procedure AutoSaveClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure Label4Click(Sender: TObject);


procedure MediaPlayer1Click(Sender: TObject; Button: TMPBtnType; var DoDefault: Boolean);


procedure MediaPlayer1Notify(Sender: TObject);


procedure ProgramsClick(Sender: TObject);


procedure StereoButton1Click(Sender: TObject);


procedure Timer1Timer(Sender: TObject);


procedure DeviceClose;


procedure DeviceOpen;


Function FindNextTrack : Boolean;


Function FindPrevTrack : Boolean;


procedure GetDeviceInfo(DeviceInfo:TDeviceInfo);


procedure SaveDeviceInfo(DeviceInfo:TDeviceInfo);


Properties


Events


Variables


About1 : TMenuItem;


AutoSave : TMenuItem;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


LEDElapsed : TLEDLabel;


LEDRemain : TLEDLabel;


LEDTrack : TLEDLabel;


MainMenu1 : TMainMenu;


MediaPlayer1 : TMediaPlayer;


Options1 : TMenuItem;


Panel1 : TPanel;


Panel2 : TPanel;


Prorams : TMenuItem;


StereoButton1 : TStereoButton;


Timer1 : TTimer;


TrackList : TMenuItem;


View : TMenuItem;


DeviceExist : Boolean;


DeviceInfo : TDeviceInfo;


DeviceOpened : Boolean;