TurboPower OnGuard Code

161 lines (160 with data), 4.8 kB

object KeyGenerateFrm: TKeyGenerateFrm
  Left = 351
  Top = 190
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Key Generation'
  ClientHeight = 235
  ClientWidth = 464
  Position = poScreenCenter
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [dkDesktop, dkiPhone, dkiPad]
  
  
  Left = 351
  Top = 190
  DesignerMobile = False
  DesignerWidth = 0
  DesignerHeight = 0
  DesignerDeviceName = ''
  DesignerOrientation = 0
  DesignerOSVersion = ''
  object Panel1: TPanel
    Height = 191.000000000000000000
    Position.X = 4.000000000000000000
    Position.Y = 6.000000000000000000
    Width = 455.000000000000000000
    TabOrder = 0
    object Label2: TLabel
      AutoSize = True
      Height = 19.000000000000000000
      Position.X = 8.000000000000000000
      Position.Y = 32.000000000000000000
      Text = 'Key Phrase:'
      Width = 59.000000000000000000
      WordWrap = False
    end
    object CopyBlockSb: TSpeedButton
      Height = 23.000000000000000000
      Position.X = 426.000000000000000000
      Position.Y = 131.000000000000000000
      StyleLookup = 'buttonstyle'
      Width = 23.000000000000000000
      WordWrap = True
      
    end
    object Label3: TLabel
      AutoSize = True
      Height = 19.000000000000000000
      Position.X = 8.000000000000000000
      Position.Y = 112.000000000000000000
      Text = 'Key:'
      Width = 24.000000000000000000
      WordWrap = False
    end
    object Label4: TLabel
      AutoSize = True
      Height = 19.000000000000000000
      Position.X = 8.000000000000000000
      Position.Y = 12.000000000000000000
      Text = 'Key Type:'
      Width = 50.000000000000000000
      WordWrap = False
    end
    object CopyByteKeySb: TSpeedButton
      Height = 23.000000000000000000
      Position.X = 426.000000000000000000
      Position.Y = 159.000000000000000000
      StyleLookup = 'buttonstyle'
      Width = 23.000000000000000000
      WordWrap = True
      
    end
    object KeyStringMe: TMemo
      Touch.InteractiveGestures = [igPan, igLongTap, igDoubleTap]
      Height = 49.000000000000000000
      Position.X = 8.000000000000000000
      Position.Y = 48.000000000000000000
      TabOrder = 1
      Width = 440.000000000000000000
      
    end
    object BlockKeyEd: TEdit
      Touch.InteractiveGestures = [igLongTap, igDoubleTap]
      TabOrder = 3
      ReadOnly = True
      Position.X = 8.000000000000000000
      Position.Y = 132.000000000000000000
      Width = 415.000000000000000000
      Height = 21.000000000000000000
      KillFocusByReturn = False
      
    end
    object GenerateBtn: TButton
      Enabled = False
      Height = 25.000000000000000000
      Position.X = 344.000000000000000000
      Position.Y = 9.000000000000000000
      TabOrder = 2
      Text = 'Generate key'
      Width = 103.000000000000000000
      
    end
    object KeyTypeCb: TComboBox
      DisableFocusEffect = False
      Height = 21.000000000000000000
      Position.X = 64.000000000000000000
      Position.Y = 8.000000000000000000
      TabOrder = 0
      Width = 169.000000000000000000
      
      object TListBoxItem
        Height = 19.000000000000000000
        Text = 'Random'
        Width = 19.000000000000000000
      end
      object TListBoxItem
        Height = 19.000000000000000000
        Text = 'Standard Text'
        Width = 19.000000000000000000
      end
      object TListBoxItem
        Height = 19.000000000000000000
        Text = 'Case-sensitive Text'
        Width = 19.000000000000000000
      end
    end
    object ByteKeyEd: TEdit
      Touch.InteractiveGestures = [igLongTap, igDoubleTap]
      TabOrder = 4
      ReadOnly = True
      Position.X = 8.000000000000000000
      Position.Y = 160.000000000000000000
      Width = 415.000000000000000000
      Height = 21.000000000000000000
      KillFocusByReturn = False
      
    end
  end
  object CancelBtn: TButton
    Height = 25.000000000000000000
    ModalResult = 2
    Position.X = 384.000000000000000000
    Position.Y = 204.000000000000000000
    TabOrder = 2
    Text = 'Cancel'
    Width = 75.000000000000000000
    WordWrap = True
  end
  object OKBtn: TButton
    Default = True
    Height = 25.000000000000000000
    ModalResult = 1
    Position.X = 305.000000000000000000
    Position.Y = 204.000000000000000000
    TabOrder = 1
    Text = 'OK'
    Width = 75.000000000000000000
    WordWrap = True
  end
end