关于opendialog(50分)

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #1

我是个dilphi的初学者，在编辑opendialog时，代码如下：
begin
if opendialog1.execult then
begin
open(opendialog1.filename);
end;
end;
为什么只能打开对话框，而只能显示该框，不能执行打开该框内所选的文件？

 

L

LanFairy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #2

Opendialog1的filter为 *.txt, 这是一个打开文件文件的例子
with OpenDialog1 do if Execute then
begin
Memo1.Lines.LoadFromFile(filename);
end;

 

J

jinrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #3

你应看看书，网上电子书很多，你没有listbox等，你要显示在哪？

 

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #4

我是想用open或其它命令将选中的文件打开（如同windows 中open命令一样），而不是用listbox显示
还有，jinrui这位朋友老师执行您的代码后也没达到我的要求！！
我是个初学者，刚刚学习了三个多星期，这是我第二次来，感觉真的很好！！
谢谢大家的帮助！！！

 

热

热血

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #5

有Open这个函数吗

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #6

你的表达能力，唉，看样子这个是你要的了。

uses Shellapi;
　　...


begin
if opendialog1.execulte then
begin
ShellExecute(handle,nil,pchar(opendialog1.filename),nil,nil,sw_shownormal);
end;
end;

 

K

kingqc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #7

用winexc(o.filename)

 

S

Sachow

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #8

哎哟，OpenDialog有execult函数吗？我只见到有Execute呀！？
...PChar(OpenDialog1.FileName)+''...

 

B

beta

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #9

if opendialog1.execute then
winexec(opendialog1.filename);

 

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #10

我在执行shellexecute总有错误提示:undeclared identifier:shellexecute
（我已加了uses Shellapi;）

 

飘

飘摇客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #11

begin
if opendialog1.execult then
begin
RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName);
end;
end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #12

maginn：报这个错误？？我想问你，你在哪里uses Shellapi; 了？
　　

 

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #13

我在implementation 的后面加的，我好像很笨哦！
thank u please tell me again!!

and thank the"漂摇客“i understand urs!!

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #14

Shellapi加到interface下面的uses里。

 

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #15

i wang to ask u another question :
if i want to change the file'stype ,i add the code:
opendialog1.filter:='all file|*.*';
opendialog1.filter:='markup files|*.htm;*.html';

is the code right?
thank u very much!!
ur code is ok!!

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #16

正确，opendialog1.filter:='markup files|*.htm;*.html';
是控制打开对话框只能看到*.htm;*.html文件

 

M

maginn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #17

thanks to the comrade helped me!!