Delphi控件源码

开发平台：

Delphi

UMerg.dfm：源码内容

							object Form1: TForm1
  Left = 272
  Top = 211
  Width = 606
  Height = 403
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 113
    Height = 369
    Align = alLeft
    TabOrder = 0
    object Bevel1: TBevel
      Left = 5
      Top = 36
      Width = 102
      Height = 5
      Shape = bsTopLine
    end
    object Button1: TButton
      Left = 7
      Top = 4
      Width = 97
      Height = 25
      Caption = 'Make Template'
      TabOrder = 0
      OnClick = Button1Click
    end
    object CB1: TCheckBox
      Left = 8
      Top = 44
      Width = 97
      Height = 17
      Caption = 'Image 1'
      TabOrder = 1
      OnClick = CB1Click
    end
    object CB2: TCheckBox
      Left = 8
      Top = 64
      Width = 97
      Height = 17
      Caption = 'Image 2'
      TabOrder = 2
      OnClick = CB1Click
    end
    object Button2: TButton
      Left = 7
      Top = 86
      Width = 97
      Height = 25
      Caption = 'Merge'
      TabOrder = 3
      OnClick = Button2Click
    end
  end
  object Player: TShockwaveFlashEx
    Left = 113
    Top = 0
    Width = 485
    Height = 369
    Align = alClient
    TabOrder = 1
    ControlData = {
      6755665500030000203200002326000008000200000000000800020000000000
      080002000000000008000E000000570069006E0064006F00770000000B00FFFF
      0B00FFFF08000A0000004800690067006800000008000200000000000B00FFFF
      080002000000000008000E00000061006C007700610079007300000008001000
      0000530068006F00770041006C006C0000000B0000000B000000080002000000
      0000080002000000000008000200000000000D00000000000000000000000000
      000000000B000100}
  end
  object OD: TOpenPictureDialog
    Filter = 
      'All (*.jpg;*.jpeg;*.bmp)|*.jpg;*.jpeg;*.bmp|JPEG Image File (*.j' +
      'pg)|*.jpg|JPEG Image File (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp'
    Left = 220
    Top = 188
  end
end

						