你如何理解OpenDialog(打开文件对话框)和SaveDialog(保存文件对话框)这两个组件的基本功能?它们负责文件的打开和保存吗?
正确答案
这两个组件对象并不执行打开或保存文件的操作。
答案解析
相似试题
(判断题)
若已在窗体中加入了一个通用对话框OpenDialog组件:要求在运行时,打开对话框时只显示扩展名为DOC的文件,则对通用对话框的Filter的属性进行设置,设置可以是:’Word DOC Files|*.DOC’。
(判断题)
OpenDialog组件的功能是指定一个文件名,并将文件内容加载到指定的编辑区中。
(填空题)
本程序由主窗体form1和子窗体form2组成,设计界面如下图所示: 主窗体Form1上建立的对象有Panel1、MediaPlayer1、OpenDialog1、Button1(打开文件)、Button2(播放)、Button3(暂停)、Button4(退出)。 子窗体Form2上建立的对象有Label1、BitBtm1(Yes)、BitBtm2(No)。 单击“打开文件”按钮,会弹出打开文件对话框。用户指定一个要播放的文件后,单击“播放”按钮可播放多媒体文件,单击“暂停”按钮可暂停播放。 单击“退出”按钮,会弹出确认对话框(Form2)。如果用户按“Yes”键,程序结束;如果按“No”键,返回主窗体。 下面是Unit1的代码部分,请在下划线处完成程序填空。
(填空题)
利用MediaPlayer 组件实现一个播放wav声音文件的播放器。用户可自己选择要打开的 wav文件,并在播放时有播放进度提示(如图)。首先在在窗体中添加1个MediaPlayer组件MediaPlayer1、1个标签组件Label1、2个按钮组件(“打开文件”-Button1,“退出”-Button2),1个时钟组件Timer1和1个OpenDialog组件OpenDialog1,一个gauge组件(用作播放进度显示)。进度提示条每隔0.1秒更新一次进度。将程序补充完整。 procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog1.Execute Then Begin MediaPlayer1.filename := OpenDialog1. (①) ; Label1.(②) := OpenDialog1.filename; MediaPlayer1.open; //打开声音文件 MediaPlayer1. (③) ; //开始播放 Timer1.enabled := (④) ; end; end; procedure TForm1.Timer1Timer(Sender: TObject); begin Timer1.Interval := (⑤) ; //每隔0.1秒更新一次进度 gauge1.maxvalue := MediaPlayer1.length; gauge1. (⑥) := MediaPlayer1.Position; //更改进度 end; procedure TForm1.Button2Click(Sender: TObject); begin close; end;
(判断题)
在对文件的操作中,reset是建立并打开一个新文件。
(填空题)
本程序由主窗体form1和子窗体form2组成,设计界面如下图所示: 主窗体上建立的对象有Panel1、Animate1、Button1(加载AVI文件)、Button2(退出)、Button3(播放)、Button4(停止)和OpenDialog1。 子窗体上建立的对象有Label1、BitBtm1(Yes)、BitBtm2(No)。 单击“加载AVI文件”按钮,会弹出打开文件对话框。用户指定一个.avi的文件后,动画文件加载到Animate1显示区中。单击“播放”按钮可播放动画,单击“停止”按钮可停止播放。 单击“退出”按钮,会弹出确认对话框(Form2)。如果用户按“Yes”键,程序结束;如果按“No”键,返回主窗体。 下面是Unit1的代码部分,请在下划线处完成程序填空。
(填空题)
本程序由主窗体form1和子窗体form2组成,设计界面如下图所示: 主窗体上建立的对象有Image1、Button1(加载图片)、Button2(退出)、OpenDialog1。子窗体上建立的对象有Label1、BitBtm1(Yes)、BitBtm2(No)。 单击“打开文件”按钮(Button1),会弹出打开文件对话框。用户指定一个图像文件后,图像加载到Image1显示区中。 单击“退出”按钮,会弹出确认对话框(Form2)。如果用户按“Yes”键,程序结束;如果按“No”键,返回主窗体。 下面是Unit1的代码部分,请在下划线处完成程序填空。 implementation {$R*.dfm} uses (①) procedure TForm1.Button1Click(Sender:TObject);//加载图片 begin if(②)then Image1.Picture.LoadFromFile(③) end procedure TForm1.Button2Click(Sender: TObject)//退出 begin if(④)=mrYes then(⑤) end; end.
(判断题)
异常也可以理解成是一种特殊的事件
(填空题)
使用窗体的()方法可以将一个窗体作为一个模式窗体(modal form)来打开。