object messagebox: Tmessagebox
  Left = 322
  Top = 83
  BorderStyle = bsDialog
  Caption = 'messagebox'
  ClientHeight = 149
  ClientWidth = 305
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object msgtext: TLabel
    Left = 16
    Top = 11
    Width = 42
    Height = 13
    Caption = 'message'
  end
  object ok: TBitBtn
    Left = 115
    Top = 107
    Width = 75
    Height = 25
    TabOrder = 0
    OnClick = okClick
    Kind = bkOK
  end
end