abstract error в классе

[cosmic_call]

помогите пожалуйста. речь идет о низкоуровневом воспроизведении звука.
я написал рабочую функцию:

function SoundPlay(...)
var WaveFormatex: TWAVEFORMATEX;
    WaveEvent: THandle;
    WaveHandle: HWAVEOUT;
...
//заполняю WaveFormatex и тд
...
WaveEvent:=CreateEvent(nil, false, false, nil);
WaveOutOpen(@WaveHandle, 0, @WaveFormatex, WaveEvent, 0, CALLBACK_EVENT);
..
//ну и дальше воспроизведение и так далее

все это работало отлично. затем я попробовал создать отдельный класс потока для процесса воспроизведения

TPlayThread = class(TThread)
    private
...
      WaveFormatex: TWAVEFORMATEX;
      WaveEvent: THandle;
      WaveHandle: HWAVEOUT;
      WaveHeader: array of TWAVEHDR;
      WaveBuffer: array of PAnsiChar;
...

дальше я там описываю create для этого класса в котором заполняю WaveFormatex и пишу отдельную функцию:

function TPlayThread.Play(BegPos, EndPos:longint):smallint;
...
begin
  WaveEvent:=CreateEvent(nil, false, false, nil);
  WaveOutOpen(@WaveHandle, DevID, @WaveFormatex, WaveEvent, 0, CALLBACK_EVENT);

все тоже самое но на waveoutopen получаю ошибку abstract error. в чем собственно проблема? интуиция мне подсказывает что чтото не так с доступом к переменным класса, потому что драйвер звуковой поправляет поля в WaveHandle. если да то как это органтзовать по другому? или проблема не в этом?
спасибо заранее

[veniside]

может просто забыли

procedure Execute; virtual; abstract;

у TPlayThread реализовать?

[cosmic_call]

да забыл) спасибо
уже поправил но пока что все равно чуть дальше ошибки появились буду разбираться