unit1.~dfm

Delphi_picture例程,是一个实用的图片变形的例子.

object Form1: TForm1
  Left = 329
  Top = 116
  Width = 458
  Height = 463
  Caption = #22270#20687#30340#21464#25442
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = #23435#20307
  Font.Style = [fsBold]
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 11
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 450
    Height = 385
    Align = alTop
    BevelInner = bvLowered
    BorderStyle = bsSingle
    TabOrder = 0
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 442
      Height = 377
      Align = alClient
      Stretch = True
    end
  end
  object B_load: TBitBtn
    Left = 8
    Top = 400
    Width = 97
    Height = 25
    Caption = #36733#20837'...'
    TabOrder = 1
    OnClick = B_loadClick
  end
  object B_ver: TBitBtn
    Left = 120
    Top = 400
    Width = 97
    Height = 25
    Caption = #22402#30452#38236#20687
    TabOrder = 2
    OnClick = B_verClick
  end
  object B_hor: TBitBtn
    Left = 232
    Top = 400
    Width = 97
    Height = 25
    Caption = #27700#24179#38236#20687
    TabOrder = 3
    OnClick = B_horClick
  end
  object B_transform: TBitBtn
    Left = 344
    Top = 400
    Width = 97
    Height = 25
    Caption = #26059#36716'180'#24230
    TabOrder = 4
    OnClick = B_transformClick
  end
  object OpenDialog1: TOpenDialog
    Filter = 'BMP Files(*.bmp)|*.bmp|All Files(*.*)|*.*'
    Left = 184
    Top = 104
  end
end