求bcb中自带的activex安装后的组件的属性和方法？？？

1 我在 component--import Active-Control 里加的
     Real Player ActiveX contrl Library(Version 1.0)
     安装的RealAudio1  （可以播放realplay形式的文件
2 可他的属性和方法是什么呢？我在 onlinehelp里没发现啊，
3。我这里有段关于这个的delphi的程序，可在bcb中那又是什么呢？

procedure TForm1.OpenFileButtonClick(Sender: TObject);
begin
if OpenRealFileDialog.Execute then
realaudio1.SetSource (OpenRealFileDialog.filename);
end;
procedure TForm1.PlayButtonClick(Sender: TObject);
var
pbCanPlay:wordbool;
begin
if RealAudio1.CanPlay (pbCanPlay) then {当能够播放时再进行播放功能设置}
begin
RealAudio1.DoPlay ;{执行REAL控件的播放操作}
PlayButton.Enabled :=false;{设置播放按钮不可用}
PauseButton.Enabled :=true;{设置暂停按钮为可用}
StopButton.Enabled :=true;{设置停止按钮为可用}
end
end;
procedure TForm1.PauseButtonClick(Sender: TObject);
var
pbPlayPause:wordbool;
begin
if RealAudio1.CanPlayPause (pbPlayPause) then{当可以进行暂停设置时再进行操作}
begin
RealAudio1.DoPlayPause ;{执行REAL控件的暂停功能}
PauseButton.Enabled :=false;{设置暂停按钮不可用}
PlayButton.Enabled :=true;{设置播放铵钮为可用}
end
end;
procedure TForm1.StopButtonClick(Sender: TObject);
var
pbCanStop:wordbool;
begin
if RealAudio1.CanStop (pbCanStop) then{当能够进行停止操作时再进行程序设置}
begin
RealAudio1.DoStop ;{执行REAL控件的停止功能}
StopButton.Enabled :=false;{设置停止按钮为不可用}
PauseButton.Enabled :=false;{设置暂停按钮为不可用}
PlayButton.Enabled :=true;{设置播放按钮为可用}
end
end; //摘自正版的2001程序员大本营

同时希望高手能指点一下我的学习方法  不胜感激

8 个解决方案

#1

没有的1!具体的要察看该active安装目录下的*.pas文件

#2

to ：　xycleo()虚竹和尚()　
你是重那发现的？

#3

自己找的1!以前装过一个Flash的ocx

你可以在D:\Program Files\Borland\CBuilder5\Ocx\Vci里找到

如果有*hlp,当然好!如果没有,就只能看*.pas的了

#4

1.//TForm1::OpenFileButtonClick

if (OpenRealFileDialog->Execute())
Realaudio1->SetSource (OpenRealFileDialog->Filename);

2.//TForm1::PlayButtonClick
bool pbCanPlay;
if (RealAudio1->CanPlay(pbCanPlay))
{
RealAudio1->DoPlay() ;
PlayButton->Enabled =false;
PauseButton->Enabled =true;
StopButton->Enabled =true;
}

3.//TForm1::PauseButtonClick
bool pbPlayPause;
if (RealAudio1->CanPlayPause (pbPlayPause)
{
RealAudio1->DoPlayPause() ;
PauseButton->Enabled =false;
PlayButton->Enabled =true;
}

4.//TForm1::StopButtonClick

bool pbCanStop;

if (RealAudio1->CanStop (pbCanStop))
{
RealAudio1->DoStop() ;
StopButton->Enabled =false;
PauseButton->Enabled =false;
PlayButton->Enabled =true;
}

//wordbool相当什么类型?谁会Delphi.

#5

to ：　xycleo()虚竹和尚()　
我的\Program Files\Borland\CBuilder5\Ocx\Vci下有3个文件夹，1Form1
2.Impress 3 VS pell
应该是那个啊

#6

#7

在object inspector中可以看见属性。
方法可以用AX->察看。

#8

如果是自己加的控件

C＋＋ Builder在导入一个ActiveX控件后会在“Imports”目录中生成相应的头文件(＊.h)，只要把它打开看一下就一目了然了！

#1