delphi – 为什么tmediaplayer会延迟更改tpanel上的标题?

前端之家收集整理的这篇文章主要介绍了delphi – 为什么tmediaplayer会延迟更改tpanel上的标题?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我是一名新手程序员,如果这对你们所有人来说听起来非常基本,那么道歉.
我有一个程序看起来(基本上)像这样:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  panel1.caption:='This is a sentence';
  with MediaPlayer1 do
  begin
    filename:='f:\untitled.wma';
    open;
    wait:=true;
    play;
    close;
  end;
end;

问题是,在媒体播放器播放声音文件之前,panel1上的标题不会改变;我需要改变标题,让玩家同时开始玩.我怎样才能确保这一点?

我认为该过程将按顺序执行每行代码,这意味着panel1的标题发生变化,然后媒体播放器开始行动.我哪里出错了?

解决方法

设置标题添加刷新调用,即:
panel1.caption:='This is a sentence'; 
Refresh;

猜你在找的Delphi相关文章