如何判断OpenDialog1.Execute重新打开了一个文件？(20分)

E

eryu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #1

当用OpenDialog1.Execute判断打开某个文件后，通常会进行一些操作，
现在我想当OpenDialog1.Execute重新打开了一个文件后，一些设置恢复成默认状态。
请问如何判断OpenDialog1.Execute重新打开了一个文件呢？

 

春

春意

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #2

不知方法行不行，定义两个全局变量var a,b:string;
procedure TForm1.Button1Click(Sender: TObject);
begin
b:=a;
if OpenDialog1.Execute then
a:=OpenDialog1.filename;
if a<>b then
begin
//自己写程序
end;
end;

 

E

eryu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #3

首先有个问题，不一定要两次打开的文件不一样，即使一样也可以。

 

Z

zw84611

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #4

不懂你的意思。

 

E

eryu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #5

比如说当打开一个媒体文件后，播放器准备就绪，点下按钮后开始播放，当重新打开一个文件
后，播放器应当停止当前播放，并成“准备就绪”状态。

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #6

OpenDialog 并不是打开一个文件。
而只是从这个对话框中获得一个文件名。
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
if not OpenDialog1.Execute then
exit;
s:=OpenDialog1.filename;
if fileExists(s) then

begin
....
end;
end;

 

R

resun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #7

楼上最后一位说的对，只要OpenDialog1.Execute=true,那么就获得了一个新的文件名(只是
得到一个文件名)。

 

E

eryu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #8

请问这句话是什么意思？fileExists(s) ？
是不是判断晃否为上次打开的那个文件？
假如不需要判断两次获得的文件是否一样，只要是重新获得一个文件名的话，就……

 

W

wm1010

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #9

fileExists(s) , 這個都不知道,判断文件是否存在.

 

E

eryu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #10

接受答案了.