delphi如何添加“浏览按钮”选择所需的多媒体文件并将文件的路径就自动的添加并显示到edit1

我最近做毕业设计,做了一个图书管理系统,我想在这个系统里添加一个娱乐的功能,此功能的是在一个窗体里面实现的,此窗体只是一个中转平台,通过它来调用添加本地计算机上的多媒体文... 我最近做毕业设计,做了一个图书管理系统,我想在这个系统里添加一个娱乐的功能,
此功能的是在一个窗体里面实现的,此窗体只是一个中转平台,通过它来调用添加本地计算机上的多媒体文件(视频,音乐等),此窗体的界面如下:

edit1 浏览添加按钮 确定

具体要求:在点击 “浏览添加按钮” 后,会弹出文件打开对话框,然后你可以选择自己需要的多媒体文件,随后文件的路径就自动的添加并显示到edit1,然后点击
“确定”按钮后,就可以播放多媒体文件了,现在我的问题是如何实现“ 浏览添加按钮”的功能,让其文件的路径显示在edit1,

(说明:因为我是delphi的初学者,对于各组件还很不熟悉,像"浏览添加按钮"从那个组件安装都不太清楚,希望各位大侠能不吝赐教,在下不胜感激!)
展开
 我来答
風中薔薇花
2008-05-29 · 超过20用户采纳过TA的回答
知道答主
回答量:42
采纳率:0%
帮助的人:0
展开全部
添加一个button3为浏览添加按钮,添加OpenDialog1控件用于打开文件
procedure TForm1.Button3Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
edit1.Text :=opendialog1.FileName;
end;
end;
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式