object DIAboutForm: TDIAboutForm
  Left = 200
  Top = 102
  BorderStyle = bsDialog
  Caption = 'Info'
  ClientHeight = 253
  ClientWidth = 343
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 15
    Top = 15
    Width = 43
    Height = 37
    Picture.Data = {<image000.ico>}
  end
  object PNameLabel: TLabel
    Left = 65
    Top = 15
    Width = 3
    Height = 13
  end
  object PCopyrightLabel: TLabel
    Left = 65
    Top = 30
    Width = 210
    Height = 13
    Caption = '(C) Copyright 1997 Peter Beyersdorf, L�beck'
  end
  object PBLabel: TLabel
    Left = 15
    Top = 65
    Width = 78
    Height = 13
    Caption = 'Peter Beyersdorf'
  end
  object StrasseLabel: TLabel
    Left = 15
    Top = 80
    Width = 74
    Height = 13
    Caption = 'Engelsgrube 29'
  end
  object StadtLabel: TLabel
    Left = 15
    Top = 95
    Width = 80
    Height = 13
    Caption = 'D-23552 L�beck'
  end
  object PhoneLabel: TLabel
    Left = 15
    Top = 135
    Width = 115
    Height = 13
    Caption = 'Phone: +49 511 559211'
  end
  object FaxLabel: TLabel
    Left = 15
    Top = 150
    Width = 101
    Height = 13
    Caption = 'Fax: +49 511 559213'
  end
  object EmailLabel: TLabel
    Left = 150
    Top = 65
    Width = 173
    Height = 13
    Caption = 'EMail: peter@beyersdorf.com'
  end
  object CISIDLabel: TLabel
    Left = 150
    Top = 80
    Width = 138
    Height = 13
    Caption = 'CompuServe ID: 100407,124'
  end
  object CISNameLabel: TLabel
    Left = 150
    Top = 95
    Width = 148
    Height = 13
    Caption = 'CompuServe Name: Beyersdorf'
  end
  object WWWLabel: TLabel
    Left = 150
    Top = 135
    Width = 166
    Height = 13
    Caption = 'Get latest version from my web-site:'
  end
  object httpLabel: TLabel
    Left = 150
    Top = 149
    Width = 172
    Height = 13
    Caption = 'http://www.beyersdorf.com/'
  end
  object LandLabel: TLabel
    Left = 15
    Top = 110
    Width = 42
    Height = 13
    Caption = 'Germany'
  end
  object RegNameLabel: TLabel
    Left = 15
    Top = 180
    Width = 3
    Height = 13
  end
  object Bevel1: TBevel
    Left = 8
    Top = 55
    Width = 328
    Height = 5
    Shape = bsTopLine
  end
  object Bevel2: TBevel
    Left = 8
    Top = 170
    Width = 328
    Height = 5
    Shape = bsTopLine
  end
  object Bevel3: TBevel
    Left = 8
    Top = 200
    Width = 328
    Height = 5
    Shape = bsTopLine
  end
  object OKButton: TButton
    Left = 14
    Top = 216
    Width = 99
    Height = 25
    Cancel = True
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
end