主页 / coding / 问题 / 77642075
Accepted
ElektroStudios
Asked: 2023-12-12 03:51:43 +0800 CST

如何使用 ImageMagick 将图像正确居中以制作图标？

  • 772

在 Windows 下，使用 Batch-Script 或 Powershell 和ImageMagick，我只想创建一个适当的图标文件，就像您可以使用ToyCon或QuickAnyToIco程序创建的图标一样，即：

  • 图像层位于画布中央的图标
  • 它自动适应垂直或水平边缘，即图像自动缩小或放大。
  • 保持纵横比
  • 具有透明背景
  • 图标实际尺寸为 256x256px（图标内包含其他各种典型尺寸的任意图层：128x128、64x64、32x32、16x16 等）

这是一项简单的任务，任何用于 Windows 的传统图标转换器软件都可以完美完成。

现在，使用ImageMagick，icon:auto-resize参数 it 没有任何帮助，因为它拉伸图像以适应宽度和高度。

我读过ImageMagick 的文档，它有这两个修饰符：

-resize我注意到它们可以在和参数中指定的宽度和高度值中指定-extent。

和这个：

……为了-extent论证。

但我找不到正确使用或组合它们的方法，通过缩小和放大（保留纵横比）自动适应宽度或高度来使图像居中。我坚持认为，就像QuickAnyToIco程序一样。

这是一个示例命令，我尝试为图标创建 256x256 png 图层：

输入图像尺寸：513x458

命令是这样的：

Magick.exe convert "image.jpg" -resize "256>x256" -background white -gravity center -extent "256^x256^" -quality 100 "output.png"

结果输出图像是这样的：

在此输入图像描述

输出正常!!，这与任何优秀的图标转换器软件产生的结果相同。

现在，使用相同的命令和图像大小为 208x242 的图像，我得到以下输出图像：

在此输入图像描述

输出错误！！图像居中，但顶部和底部边缘不合适。

我期望得到这个结果图像（由任何好的图标转换器软件生成）：

在此输入图像描述

我可以使用这个命令来实现它：

Magick.exe convert "cover.jpg" -resize "256<x256" -background white -gravity center -extent "256^x256^" -quality 100 "output.png"

但它只适用于像这样的较小图像。同样的命令将生成另一个图像：

在此输入图像描述

笔记：

  • 白色背景只是一种方便的颜色，我选择它是为了更好地视觉呈现问题。

  • 上面示例中使用的原始输入图像：

    https://i.imgur.com/wiXntuD.jpg

https://i.imgur.com/QaWV1Oe.jpg
windows

2 个回答

  1. Best Answer

    使用 Windows 11 上的 ImageMagick v7，我使用此命令从几乎任何输入图像制作图标......

    magick image.jpg -gravity center -extent 1:1# ^
   -define icon:auto-resize="256,128,64,48,32,24,16" result.ico

    它以“-extent 1:1#”开头，将输入图像的画布扩展到 1:1 的比例。“#”标志告诉它根据需要添加画布以实现 1:1 的比例。

    该命令继续处理该方形图像，并使用 IM 的图标大小定义，它将输出一个包含指定大小的图标。

    • 2

  2. 我能想到的解决这个问题的唯一解决方案是一个脚本化解决方案来获取和评估输入图像的宽度和高度，然后决定是否在magick.exe<参数中使用“ ”或“ ”标志。>

    因此，这是一个PowerShell脚本，它将递归搜索 bmp、jpeg/jpg、png 和 webp 文件，并将它们转换为 ico。它似乎按预期工作，将图像居中并缩小或放大以适应最近的画布边缘，同时保持纵横比。

    $imageMagickFullPath = "C:\Program Files\ImageMagick-7.1.1-Q8\magick.exe"

$exts = @('.bmp', '.jpeg', '.jpg', '.png', '.webp')
$files = Get-ChildItem -LiteralPath (Get-Location) -Filter "*.*" -Recurse | Where-Object { $exts -contains $_.Extension.ToLower() }
$tempDir = [System.IO.Path]::GetTempPath()

Add-Type -AssemblyName System.Drawing

foreach ($file in $files) {
    Write-Host "Converting to icon: $($file.FullName)"

    $fileName = [System.IO.Path]::GetFileNameWithoutExtension($file.Name)
    $outIconFilePath = $file.Directory.FullName + "\" + $fileName + ".ico"
    $layerFilePaths = @()

    $image  = [System.Drawing.Image]::FromFile($file.FullName)
    $width  = $image.Width
    $height = $image.Height
    $image.Dispose()

    # Create icon layers.
    $sizes = @(256, 128, 96, 64, 32, 24, 16)
    foreach ($size in $sizes) {
        $layerFilePath = Join-Path -Path $tempDir -ChildPath "icon_layer-$sizex$size.png"
        $layerFilePaths += $layerFilePath

        if ($width -gt $size) {
            $args = "convert `"$($file.FullName)`" -resize $size>x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
        } elseif ($width -le $size) {
            if ($height -lt $size) {
                $args = "convert `"$($file.FullName)`" -resize $size<x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
            } elseif ($height -gt $size) {
                $args = "convert `"$($file.FullName)`" -resize $size>x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
            } else { # ($height -eq $size)
                $args = "convert `"$($file.FullName)`" -resize       x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
            }
        }

        $procStartInfo = New-Object System.Diagnostics.ProcessStartInfo
        $procStartInfo.FileName = $imageMagickFullPath
        $procStartInfo.Arguments = $args
        $procStartInfo.UseShellExecute = $false
        $process = New-Object System.Diagnostics.Process
        $process.StartInfo = $procStartInfo
        $process.Start() | Out-Null
        $process.WaitForExit()
    }

    # Combine layers to create the icon file.
    $procStartInfo = New-Object System.Diagnostics.ProcessStartInfo
    $procStartInfo.FileName = $imageMagickFullPath
    $procStartInfo.Arguments = (($layerFilePaths | ForEach-Object { "`"$_`"" }) -join ' ') + " " + "`"$outIconFilePath`""
    $procStartInfo.UseShellExecute = $false
    $process = New-Object System.Diagnostics.Process
    $process.StartInfo = $procStartInfo
    $process.Start() | Out-Null
    $process.WaitForExit()
}

Write-Host "operation Completed."
Write-Host ""
Write-Host "Press any key to exit..."
[System.Console]::ReadKey($true)
Exit(0)

    上面代码中最重要且相关的部分是这个条件块：

    if ($width -gt $size) {
    $args = "convert `"$($file.FullName)`" -resize $size>x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
} elseif ($width -le $size) {
    if ($height -lt $size) {
        $args = "convert `"$($file.FullName)`" -resize $size<x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
    } elseif ($height -gt $size) {
        $args = "convert `"$($file.FullName)`" -resize $size>x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
    } else { # ($height -eq $size)
        $args = "convert `"$($file.FullName)`" -resize       x$size -background transparent -gravity center -extent $size^x$size^ -quality 100 `"$layerFilePath`""
    }
}

    更新：

    @GeeMack使用 PowerShell 的解决方案：

    $magickFilePath = "C:\Program Files\ImageMagick-7.1.1-Q8\magick.exe"

$magickArgs = @('-define icon:auto-resize="256,128,96,64,48,32,24,16"',
                '-background transparent',
                '-gravity center',
                '-extent 1:1#', 
                '-quality 100'
               )

$exts = @('.bmp', '.jpeg', '.jpg', '.png', '.webp')
$files = Get-ChildItem -LiteralPath (Get-Location) -Filter "*.*" -Recurse | Where-Object { $exts -contains $_.Extension.ToLower() }

foreach ($file in $files) {
    Write-Host "Converting to icon: $($file.FullName)"

    $fileName = [System.IO.Path]::GetFileNameWithoutExtension($file.Name)
    $outIconFilePath = $file.Directory.FullName + "\" + $fileName + ".ico"

    $procStartInfo = New-Object System.Diagnostics.ProcessStartInfo
    $procStartInfo.FileName = $magickFilePath
    $procStartInfo.Arguments = "`"$($file.FullName)`" $($magickArgs -join ' ') `"$outIconFilePath`""
    $procStartInfo.UseShellExecute = $false
    $process = New-Object System.Diagnostics.Process
    $process.StartInfo = $procStartInfo
    $process.Start() | Out-Null
    $process.WaitForExit()
}

Write-Host "operation Completed."
Write-Host ""
Write-Host "Press any key to exit..."
[System.Console]::ReadKey($true)
Exit(0)
    • 0

相关问题