myinputbox.lfm

object MyInputBox: TMyInputBox
  Left = 321
  Height = 81
  Top = 250
  Width = 320
  Caption = 'MyInputBox'
  ClientHeight = 81
  ClientWidth = 320
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  object Panel1: TPanel
    AnchorSideTop.Control = EInput
    AnchorSideTop.Side = asrBottom
    Left = 0
    Height = 40
    Top = 41
    Width = 320
    Align = alBottom
    BorderSpacing.Top = 8
    ClientHeight = 40
    ClientWidth = 320
    TabOrder = 0
    object Button1: TButton
      AnchorSideTop.Control = Panel1
      AnchorSideTop.Side = asrCenter
      AnchorSideRight.Control = Panel1
      AnchorSideRight.Side = asrBottom
      Left = 236
      Height = 25
      Top = 8
      Width = 75
      Anchors = [akTop, akRight]
      BorderSpacing.Around = 8
      Caption = 'rsOK'
      ModalResult = 1
      TabOrder = 0
    end
    object Button2: TButton
      AnchorSideTop.Control = Panel1
      AnchorSideRight.Control = Button1
      Left = 153
      Height = 25
      Top = 9
      Width = 75
      Anchors = [akTop, akRight]
      BorderSpacing.Around = 8
      Caption = 'rsFortryd'
      ModalResult = 2
      TabOrder = 1
    end
  end
  object EInput: TEdit
    AnchorSideLeft.Control = Label1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 65
    Height = 24
    Top = 8
    Width = 247
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Around = 8
    TabOrder = 1
    Text = 'EInput'
  end
  object Label1: TLabel
    AnchorSideTop.Control = Owner
    AnchorSideBottom.Control = EInput
    AnchorSideBottom.Side = asrBottom
    Left = 16
    Height = 16
    Top = 16
    Width = 41
    Anchors = [akLeft, akBottom]
    BorderSpacing.Left = 8
    Caption = 'Label1'
  end
end