unit_frmmain.dfm

在内存中动态运行可执行程序的演示

object FrmMain: TFrmMain
  Left = 349
  Top = 194
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'FrmMain'
  ClientHeight = 288
  ClientWidth = 259
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 24
    Top = 101
    Width = 42
    Height = 12
    Caption = 'EXE'#25991#20214
    Transparent = True
  end
  object SpeedButton1: TSpeedButton
    Left = 200
    Top = 96
    Width = 23
    Height = 22
    Caption = '...'
    OnClick = SpeedButton1Click
  end
  object Label2: TLabel
    Left = 48
    Top = 16
    Width = 108
    Height = 16
    Caption = 'DelphiUpx0.5'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 50
    Top = 16
    Width = 108
    Height = 16
    Caption = 'DelphiUpx0.5'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
    Transparent = True
  end
  object Bevel1: TBevel
    Left = 16
    Top = 68
    Width = 221
    Height = 9
    Shape = bsTopLine
    Style = bsRaised
  end
  object Label4: TLabel
    Left = 99
    Top = 48
    Width = 138
    Height = 12
    Caption = #20316#32773':'#38472#32463#38892'.2004,04,23.'
  end
  object Label5: TLabel
    Left = 96
    Top = 256
    Width = 132
    Height = 12
    Cursor = crHandPoint
    Caption = 'http://www.138soft.com'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsUnderline]
    ParentFont = False
    OnClick = Label5Click
  end
  object Edit_FileName: TEdit
    Left = 72
    Top = 97
    Width = 121
    Height = 20
    TabOrder = 0
    Text = 'Edit_FileName'
  end
  object Button1: TButton
    Left = 24
    Top = 207
    Width = 75
    Height = 25
    Cursor = crHandPoint
    Caption = #21387#32553
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 152
    Top = 207
    Width = 75
    Height = 25
    Cursor = crHandPoint
    Caption = #35299#21387
    TabOrder = 2
    OnClick = Button2Click
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 125
    Width = 201
    Height = 65
    TabOrder = 3
    object rbVcl: TRadioButton
      Left = 16
      Top = 16
      Width = 145
      Height = 17
      Caption = #35813'EXE'#20351#29992#20102'VCL'#31383#21475
      Checked = True
      TabOrder = 0
      TabStop = True
    end
    object rbSdk: TRadioButton
      Left = 16
      Top = 40
      Width = 145
      Height = 17
      Caption = #35813'EXE'#27809#26377#20351#29992'VCL'#31383#21475
      TabOrder = 1
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.exe|*.exe'
    Left = 160
    Top = 296
  end
end