我想做一个能够直接播放从文件夹拖到播放器的MP3文件,遇到了一个问题,就是用那个 dragdrop()函数,
procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer);
begin
mediaplayer1.FileName:=文件名;
try
mediaplayer1.Play;
except
.........
请问是不是这样子设计,是的话‘文件名’那里怎么填,如不是双该怎么设计??
谢谢!!!……^_^!!
procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer);
begin
mediaplayer1.FileName:=文件名;
try
mediaplayer1.Play;
except
.........
请问是不是这样子设计,是的话‘文件名’那里怎么填,如不是双该怎么设计??
谢谢!!!……^_^!!
解决方案 »
- 继续前面memo换行问题
- advstringgrid控件的紀錄的上一條,下一條怎麼做,在線等
- 如何程序控制打印机自动退纸及进纸?
- 我用并口制作了一个抢答器,但是不知道怎么用Delphi获取并口数据!在线等..
- 为什么D7的rave Report不能保存,一保存就出错。
- 关于stringgrid的小问题!
- 请问:在delphi中调用word,怎样在word中的表格中移动,如前移单元格,后移单元格?
- 在ClientDataset控件中已经把数据查询出来了,如何把它做成本地的paradox数据库表,谢谢!!
- 帮帮忙吧!!好吧!!高手们。
- 关于中国式报表Ereport打印memo型字段的问题
- 请教各位高手:如何将 DBGrid 中任意一格中的字符显示在 label 上?(等待急救~~~~~)
- 简单问题,关于dll
我把我写的源码给你。