lazarus-ccr/components/onguard/examples/exselapi/exselap1.lfm

object Form1: TForm1
  Left = 406
  Height = 266
  Top = 322
  Width = 357
  ActiveControl = Memo1
  Caption = 'ExSelAPI: '
  ClientHeight = 246
  ClientWidth = 357
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Menu = MainMenu1
  OnCreate = FormCreate
  LCLVersion = '0.9.27'
  object Memo1: TMemo
    Left = 16
    Height = 145
    Top = 8
    Width = 313
    Color = clAqua
    Lines.Strings = (
      '   This example uses the OgUsageCode and the OgSpecialCode'
      '   (via OnGuard API functions) to implement a limited use'
      '   "demo" application which allows only the required features.'
      '   The program can be run 3 times and then a special code'
      '   must be obtained to register the program and to enable'
      '   various features.  A machine modifier is used to prevent'
      '   the application from being copied and run on another'
      '   machine.  To obtain the release code you need to run the'
      '   companion example EXSLCODE.  The release codes will be '
      '   stored in a data file called EXSELECT.DAT'
    )
    ReadOnly = True
    TabOrder = 0
  end
  object ModifyBtn: TButton
    Left = 120
    Height = 25
    Top = 176
    Width = 113
    BorderSpacing.InnerBorder = 4
    Caption = 'Modify Features'
    OnClick = ModifyBtnClick
    TabOrder = 1
  end
  object MainMenu1: TMainMenu
    left = 32
    top = 168
    object FeaturesMenu: TMenuItem
      Caption = 'Features'
      object FeaturesRequired: TMenuItem
        Caption = 'Required'
        Checked = True
      end
      object FeaturesHelp: TMenuItem
        Caption = 'Help'
        Enabled = False
      end
      object FeaturesExamples: TMenuItem
        Caption = 'Examples'
        Enabled = False
      end
      object FeaturesDatabase: TMenuItem
        Caption = 'Database'
        Enabled = False
      end
      object FeaturesFax: TMenuItem
        Caption = 'Fax'
        Enabled = False
      end
      object FeaturesGoodies: TMenuItem
        Caption = 'Goodies'
        Enabled = False
      end
    end
  end
end