如何将在程序中将系统的“打开文件”对话框自动关闭(50分)

  • 主题发起人 主题发起人 taser
  • 开始时间 开始时间
T

taser

Unregistered / Unconfirmed
GUEST, unregistred user!
一个控件,调用了Windows的文件打开对话框,我想在dephi中不用鼠标
点‘打开’按钮而在程序中让它自动打开文件后关闭(文件名对话框已获得)。
哪位高手知道如何做?愿听其详。
谢谢!
 
OpenDialog主要就是用来获得用户选择的文件名。
我猜你正真的目的应该是打开文件吧?用:
AssignFile(F,FileName);
Reset(F);
可打开文件
 
你说得不大清楚!

>>文件名对话框已获得
是已知文件路径名吗?如知道了何必用对话框。
 
找到该对话框句柄,找上面的"打开"按钮,然后给按钮发消息.
 
越看越不明白
 
cAKK的意思与我相符,但对话框是控件(无源代码)打开的windows标准对话框,
问题是在dephi里如何做到呢?
Thanks.
 
OpenDialog.Handle 是对话筐的 hwnd
GetDlgItem(OpenDialog.Handle, IDOK) 得到的是 “打开”按钮的hwnd
点击这个按钮就是送一个 BM_CLICK 给它
 
GetParent(OpenDialog.Handle) 是对话筐的 hwnd
GetDlgItem(GetParent(OpenDialog.Handle), IDOK) 得到的是 “打开”按钮的hwnd
点击这个按钮就是送一个 BM_CLICK 给它
 
找到句柄后就用sendmessage发送一个BM_Click就可以了.
 
多人接受答案了。
 
后退
顶部