UC知道delphi 代码解释
来源：百度知道 编辑：UC知道 时间：2024/05/30 09:50:02
请帮小弟解释这几句代码
mediaplayer1.FileName:=Listbox1.Items[Listbox1.ItemIndex]
mediaplayer1.FileName:=(sender as Tmenuitem).Caption
listbox1.Count>1
还有:如何调用ListBox1DblClick
在按钮上调用这个ListBox1DblClick 的过程
mediaplayer1.FileName:=Listbox1.Items[Listbox1.ItemIndex]
mediaplayer1.FileName:=(sender as Tmenuitem).Caption
listbox1.Count>1
还有:如何调用ListBox1DblClick
在按钮上调用这个ListBox1DblClick 的过程
第一句：把当前选中的listbox的行的内容作为文件名传给媒体播放控件；
第二句：把当前点击的菜单的标题内容作为文件名传给媒体播放控件；
第三句：listbox的行数大于1（一般用于判断）
第四：直接在程序中调用过程名字就可以了，如：ListBox1DblClick(nil);
procedure TForm1.BtnClick(Sender: TObject);
begin
ListBox1DblClick(nil);
end;
双击调用 调用ListBox1DblClick
mediaplayer1.FileName:=Listbox1.Items[Listbox1.ItemIndex] 取Listbox1中的一行，行数由Listbox1.ItemIndex这个值决定
mediaplayer1.FileName:=(sender as Tmenuitem).Caption
取当前的对象的标题，给mediaplayer1.FileName属性