L littlegirl Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-21 #1 各位大虾，帮帮忙！<br> 在delphi中如何做到，点击一个文件名后，调用该文件缺省打开方式打开，如果运行<br>缺省打开方式的程式无，则调用“打开方式”板选择程序打开。
B bpearl Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-21 #3 ShellExecute(handle, "open", name_of_file, NULL, NULL, SW_SHOWNORMAL);<br>
江 江南草 Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-23 #4 你的意思是在你自己的程序（文件管理/浏览程序？）里模拟？还是单在windows里的<br>exploer或者桌面上？<br>这应该是shell里的编程问题，关键是取得桌面的一个popupmenu的句柄，然后，<br>送鼠标点击。。
你的意思是在你自己的程序（文件管理/浏览程序？）里模拟？还是单在windows里的<br>exploer或者桌面上？<br>这应该是shell里的编程问题，关键是取得桌面的一个popupmenu的句柄，然后，<br>送鼠标点击。。
C cnaoszh Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-23 #5 用TOleContainer<br>if OpenDialog1.Execute then<br> begin<br> FileName:=OpenDialog1.FileName;<br> wordOleContainer.CreateObjectFromFile(FileName, False);<br> wordOleContainer.DoVerb(0);<br> end;
用TOleContainer<br>if OpenDialog1.Execute then<br> begin<br> FileName:=OpenDialog1.FileName;<br> wordOleContainer.CreateObjectFromFile(FileName, False);<br> wordOleContainer.DoVerb(0);<br> end;
T tomboy Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-25 #7 ShellExecute(handle, "open", name_of_file, NULL, NULL, SW_SHOWNORMAL);<br>江南草的东西太复杂了，
H hwj Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-25 #8 shellexecute如何使用，我的delphi 5里没有帮助文件，而且使用时也没有提示! why?
L littlegirl Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-25 #9 我是littlegirl,谢谢帮助我。<br><br>用ShellExecute不完全吧.如打开test.jds文件而我电脑里没有缺省打开此文件的程序jdatastore,<br>所以ShellExecute(handle, 'open', 'C:/TEMP/test.jds', nil, nil, SW_SHOWNORMAL)<br>打不开它，此时希望调用windows的"打开方式"板，选择其它程序打开。<br><br><br>用TOleContainer<br>if OpenDialog1.Execute then<br> begin<br> FileName:=OpenDialog1.FileName;<br> wordOleContainer.CreateObjectFromFile(FileName, False);<br> wordOleContainer.DoVerb(0);<br> end;<br><br>运行到 wordOleContainer.DoVerb(0)这句就地址冲突.<br><br>如能提供帮助，万分感激!<br>
我是littlegirl,谢谢帮助我。<br><br>用ShellExecute不完全吧.如打开test.jds文件而我电脑里没有缺省打开此文件的程序jdatastore,<br>所以ShellExecute(handle, 'open', 'C:/TEMP/test.jds', nil, nil, SW_SHOWNORMAL)<br>打不开它，此时希望调用windows的"打开方式"板，选择其它程序打开。<br><br><br>用TOleContainer<br>if OpenDialog1.Execute then<br> begin<br> FileName:=OpenDialog1.FileName;<br> wordOleContainer.CreateObjectFromFile(FileName, False);<br> wordOleContainer.DoVerb(0);<br> end;<br><br>运行到 wordOleContainer.DoVerb(0)这句就地址冲突.<br><br>如能提供帮助，万分感激!<br>
飞 飞来石 Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-23 #11 ShellExecute(handle, "open", name_of_file, NULL, NULL, SW_SHOWNORMAL);<br>例如：<br>（打开txt文本文件）<br>ShellExecute 0&, nil, 'Text.txt', nil, 0, handle;<br>（访问网站）<br>ShellExecute 0&, nil,'www.pchome.net', nil, 0, handle;<br>别忘给我加分喔<br>
ShellExecute(handle, "open", name_of_file, NULL, NULL, SW_SHOWNORMAL);<br>例如：<br>（打开txt文本文件）<br>ShellExecute 0&, nil, 'Text.txt', nil, 0, handle;<br>（访问网站）<br>ShellExecute 0&, nil,'www.pchome.net', nil, 0, handle;<br>别忘给我加分喔<br>
小 小人物 Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-24 #12 自己做个对话框不好吗,干吗一定要用 windows的"打开方式"板呢？<br><br>
