Unit CDCtrl |
Classes |
Functions |
Register -
Types |
Constants |
Variables |
Functions |
Types |
TCDButton = (cdbPlay,cdbStop,cdbPause,cdbPrev,cdbNext);
TCDClick = procedure (Sender: TObject; Button: TCDButton; var Continue: boolean) of object
TCDModes = (cdNotReady,cdStopped,cdPlaying,cdRecording,cdSeeking,cdPaused,cdOpen);
Constants |
Variables |