<font color=red>程序要调用 photoshop,要求是打开photoshop就自动打开一副指定的位图 </font> (

  • 主题发起人 主题发起人 cat.yy
  • 开始时间 开始时间
C

cat.yy

Unregistered / Unconfirmed
GUEST, unregistred user!
&lt;font color=red&gt;程序要调用 photoshop,要求是打开photoshop就自动打开一副指定的位图 &lt;/font&gt; (50分)<br />程序要调用 photoshop,要求是打开photoshop就自动打开一副位图 <br><br>那个函数能实现??
 
如果photoshop是自动化对象,就用createobject打开word和excel一样
 
怎么写呢??<br>我怎么知道她是不是呢?
 
这样不就OK了。<br>注意要引用shellapi.pas<br>procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp; shellexecute(0,nil,'photoshp.exe','c:/007.jpg','c:/',SW_SHOW);<br>end;<br>
 
ShellexecuteX好点
 
<br>跟我说说 shellexecute(),具体参数的意义吧,help看得稀里糊涂的
 
直接将文件名作为命令行参数传递给photoshop, 如:<br><br>photoshp picture.bmp
 
Iknow,怎么写 ??
 
是不是想这样子啊?<br>var<br>exec:string;<br>with topendialog.create(self) do <br>begin<br>&nbsp;filter:='bmp file(*.bmp)|*.bmp';<br>&nbsp;title:='打开一个文件';<br>&nbsp;if execute then <br>&nbsp; begin<br>&nbsp; &nbsp;exec:='photoshop '+flename;<br>&nbsp; &nbsp;winexec(pchar(exec),sw_show);//忘记shellexecute参数了,懒得打开帮助,只好用winexec<br>&nbsp; end;<br>end;
 
如果想偷懒的话就是用shellexecute呀, <br><br>ShellExecute(Application.handle, "open", PhotoShopPath, BitmapFilename, BitmapDir, SW_SHOWNORMAL);<br><br>等同于在命令行输入, 比如: <br>C:/&gt; c:/progra~1/adobe/photoshop/photoshp.exe c:/windows/setup.bmp<br><br>注意通常情况下应该对PhotoshopPath, Bitmapfilename等加双引号, 如:<br>PhotoShopPath:='"C:/program files/adobe/photoshop/photoshop.exe"';
 
ShellExecute(&lt;b&gt;Application.handle&lt;/b&gt;, ...<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ^^^^^^^^^^^^^^^^^^<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 我怎么获得呢?<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 具体含义??(我知道是被调应用程序句柄)<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 什么时候用 什么时候可以不用呢?
 
那个handle你看是永远看不会的,用几次就..很简单嘛
 
如果想程序写得好些,就用application.handle, 如果想捣一捣浆糊,用0也可以。<br>0是desktop的handle.<br><br>简单说吧,如果用了application.handle, 那么运行起来的photoshop是你的应用程序的<br>后代,虽然一点而也不象你的应用程序,而且不会跟你的应用程序同生共死。 ^_^<br><br>如果用0, 那么运行起来的photoshop是个孤儿,所以只有桌面(Desktop)这个孤儿院来收容啦。<br><br>理解?
 
多人接受答案了。
 
后退
顶部