如何退出realaudio(100分)

如何退出realaudio,像mediaplayer.close的语句一样完全退出realaudio.
thank you!

没有测试，随手写的。思路就是找标题栏，然后Close主窗体！
Hrealaudio:= Winprocs.FindWindow(nil,'realaudio');

if Hrealaudio <> 0 then

SendMessage(Hrealaudio,WM_CLOSE,0,0);

搞定了,记得给分.用Free退出,若要动态建立,就用Create,呵呵,跟其他控件一样的用法,
老兄为何不多试一下.
procedure TForm1.Button1Click(Sender: TObject);
begin

ra.Free;//退出
end;


procedure TForm1.Button2Click(Sender: TObject);
var ra:TRealAudio;
begin

ra:=TRealAudio.Create(Application);//建立一个.
ra.Parent:=Self;//设父项为此表单
ra.Show;//显示
end;

begin

RealAudio1.FreeOnRelease

close;
end;