調整圖像大小並保持縱橫比

Question

我正在嘗試制作放大/縮小按鈕，但無論出於何種原因，我都無法弄清楚如何保持縱橫比並將圖像大小調整為 - 比如說 90% 或 110%

問題是我試圖做到這一點，當您單擊縮小按鈕 4 次，然后單擊放大按鈕 4 次時，圖像將是其原始大小。 沒有定義寬度，因為我試圖使新寬度為現有寬度的 90%/110%，但顯然乘以 0.9 和 1.1 並不能正確執行。

我目前有以下代碼..

    Dim source As New Bitmap(PictureBox1.Image)
    Dim NewWidth As Integer = source.Width * 0.9
    Dim NewHeight As Integer = NewWidth * (source.Height / source.Width)

任何幫助表示贊賞。 我敢肯定我只是又想多了，但希望得到一些指導:)

Answer 1

最好的方法是從原始圖像的副本開始每個調整大小操作。 讓您的按鈕代表總縮放系數（例如，為 + 添加 0.1 縮放並為 - 減去 0.1 縮放）。

您希望每次都從原始圖像開始，否則連續操作會由於放大和縮小固有的插值而迅速扭曲圖像。