图像魔术问题 [英] Image Magick Question

问题描述

嗨
我仍在努力使其发挥作用.

我已经使用IM 4很长时间了，但是我想对其进行升级，因为我真的很喜欢它.
这是我程序中的内容，我认为它可以与新版本一起使用，但是由于某些原因，它无法使用.你能告诉我我在做什么错吗?

Hi
I am still trying to get it to work.

I had been using IM 4 for a very long time but I want to upgrade it because I really like it.
Here is what I have in my program and I thought it would work with the new version but for some reason it doesn''t. Can you tell me what I am doing wrong?

S$ = "L:\Vbpros\ImgM\ImageMagick\convert -rotate 90 " + App.Path + "\Temp\Source.bmp " + App.Path + "\Temp\Result.jpg"

第一个目录是IM的安装位置，第二个目录是映像的位置，第三个目录是将其放置的位置.

The fist directory is where IM is installed, the second is where the Image is and the third is where it is to be placed.

pid = Shell(S$, 0)
               Rem This is how it's called 
Do
WaitForTerm pid
DoEvents
 If pid = 0 Then
Form1.Sam.Picture = LoadPicture(App.Path + "\Temp\Tmp.bmp")
          Rem This is how I get it back into My Program
  End If
 Loop Until pid = 0

推荐答案

= " +应用.Path + " + App.Path + \ Temp \ Result.jpg"

= "L:\Vbpros\ImgM\ImageMagick\convert -rotate 90 " + App.Path + "\Temp\Source.bmp " + App.Path + "\Temp\Result.jpg"

第一个目录是IM的安装位置，第二个目录是映像的位置，第三个目录是将其放置的位置.

The fist directory is where IM is installed, the second is where the Image is and the third is where it is to be placed.

pid = Shell(S

， 0 ) 雷姆(Rem)的 是' 称为的方式 做 WaitForTerm pid DoEvents 如果 pid = 0 >然后 Form1.Sam.Picture = LoadPicture(App.Path + " ) 雷姆(Rem)这 是我将它收回到我的程序中的方式 结束 如果 循环，直到pid = 0

, 0) Rem This is how it's called Do WaitForTerm pid DoEvents If pid = 0 Then Form1.Sam.Picture = LoadPicture(App.Path + "\Temp\Tmp.bmp") Rem This is how I get it back into My Program End If Loop Until pid = 0

尝试在命令提示符下使用相同的命令?唯一可能导致问题的是App.Path.尝试将路径用引号引起来，

Did you try using the same command from command prompt? The only thing that can cause problem is the App.Path. Try enclosing the path in quotes like,

S

这篇关于图像魔术问题的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！