updateaction.xfm

Crlab公司用来连接MySQL数据库的控件

object UpdateActionForm: TUpdateActionForm
  Left = 356
  Top = 236
  Width = 235
  Height = 300
  HorzScrollBar.Range = 199
  VertScrollBar.Range = 131
  ActiveControl = rgAction
  AutoScroll = False
  Caption = 'UpdateAction'
  Color = clButton
  Font.Color = clText
  Font.Height = 11
  Font.Name = 'MS Sans Serif'
  Font.Pitch = fpVariable
  Font.Style = []
  ParentFont = False
  PixelsPerInch = 96
  TextHeight = 18
  TextWidth = 5
  object Panel1: TPanel
    Left = 5
    Top = 4
    Width = 217
    Height = 262
    BevelOuter = bvNone
    Color = 16591631
    ParentColor = False
    TabOrder = 0
    object Panel5: TPanel
      Left = 1
      Top = 1
      Width = 215
      Height = 128
      BevelOuter = bvNone
      TabOrder = 0
      object Label1: TLabel
        Left = 6
        Top = 15
        Width = 43
        Height = 18
        Caption = 'Message:'
      end
      object Label2: TLabel
        Left = 6
        Top = 1
        Width = 33
        Height = 18
        Caption = 'Record'
      end
      object lbField: TLabel
        Left = 64
        Top = 2
        Width = 141
        Height = 13
        AutoSize = False
        Caption = 'lbFileld'
      end
      object lbMessage: TLabel
        Left = 7
        Top = 29
        Width = 201
        Height = 95
        AutoSize = False
        Caption = 'lbMessage'
        WordWrap = True
      end
    end
    object Panel7: TPanel
      Left = 1
      Top = 130
      Width = 98
      Height = 131
      BevelOuter = bvNone
      TabOrder = 1
      object rgAction: TRadioGroup
        Left = 6
        Top = 1
        Width = 87
        Height = 126
        Items.Strings = (
          'Fail'
          'Abort'
          'Skip'
          'Retry'
          'Applied'
          'Default')
        Caption = 'UpdateAction'
        TabOrder = 0
      end
    end
    object Panel4: TPanel
      Left = 100
      Top = 130
      Width = 116
      Height = 89
      BevelOuter = bvNone
      TabOrder = 2
      object rgKind: TRadioGroup
        Left = 7
        Top = 2
        Width = 103
        Height = 83
        Items.Strings = (
          'Modify'
          'Insert'
          'Delete')
        Caption = 'UpdateKind'
        TabOrder = 0
      end
    end
    object Panel9: TPanel
      Left = 100
      Top = 220
      Width = 116
      Height = 41
      BevelOuter = bvNone
      TabOrder = 3
      object Panel2: TPanel
        Left = 16
        Top = 9
        Width = 84
        Height = 24
        BevelOuter = bvNone
        TabOrder = 0
        object btOk: TSpeedButton
          Left = 1
          Top = 1
          Width = 82
          Height = 22
          Caption = 'Ok'
          Flat = True
          Transparent = False
          OnClick = btOkClick
        end
      end
    end
  end
end