用delphi调用realone播放rm 我会,但我该如何知知道第一个rm文件播放完毕
解决方案 »
- cxDateEdit控件有没有办法处理成只显示到月份的办法??
- Delphi怎么设置日期格式,如Sunday,November 27,2005?
- 1st class 3000 / 4000 pro for Delphi 7
- 如何修改文件的扩展名呢,把.bmp,改为.jpg,如何写这段代码呢?
- DELPHI中定义通用的SQL函数?
- 怎样在dbgrid表里做这种编辑字段????
- 谁有DELPHI5.0的注册码,在线等待!!!!!!!!!!!!!!!!!!!!
- delphi记录删除
- 如何取得汉字的拼音
- 请问,怎样获得其他程序中编辑框的句柄?
- ★★★★★Delphi中的怪现象★★★★★
- dll文件中2个窗体中控件的相互传值
procedure TForm1.RealAudio1PlayStateChange(Sender: TObject;
lNewState: Integer);
begin
Caption := Caption + IntToStr(lNewState)+ ',';
end;
OnPlayStateChange是RealAudio接口的播放状态事件句柄,当它的播放状态改变时,
就通过这个句柄把lNewState以整数的形式(为什么是整数?因为它是自动化兼容类型)
传递出来,我的那段代码就是演示RealAudio在播放过程中的lNewState状态变化时,
lNewState值的变化。其实,在事件中,lNewState=0时,就是播放完毕了。