Subversion Repositories spacemission

Rev

Rev 3 | Rev 7 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3 Rev 4
1 
object InfoForm: TInfoForm
 1 
object InfoForm: TInfoForm
2 
  Left = 289
 2 
  Left = 289
3 
  Top = 184
 3 
  Top = 184
4 
  BorderIcons = [biSystemMenu]
 4 
  BorderIcons = [biSystemMenu]
5 
  BorderStyle = bsSingle
 5 
  BorderStyle = bsSingle
6 
  Caption = 'Informationen'
 6 
  Caption = 'Informationen'
7 
  ClientHeight = 193
 7 
  ClientHeight = 337
8 
  ClientWidth = 321
 8 
  ClientWidth = 385
9 
  Color = clBtnFace
 9 
  Color = clBtnFace
10 
  Font.Charset = DEFAULT_CHARSET
 10 
  Font.Charset = DEFAULT_CHARSET
11 
  Font.Color = clWindowText
 11 
  Font.Color = clWindowText
12 
  Font.Height = -12
 12 
  Font.Height = -12
13 
  Font.Name = 'MS Sans Serif'
 13 
  Font.Name = 'MS Sans Serif'
14 
  Font.Style = []
 14 
  Font.Style = []
15 
  OldCreateOrder = False
 15 
  OldCreateOrder = False
16 
  Position = poMainFormCenter
 16 
  Position = poMainFormCenter
17 
  OnCreate = FormCreate
 17 
  OnCreate = FormCreate
18 
  PixelsPerInch = 106
 18 
  PixelsPerInch = 106
19 
  TextHeight = 13
 19 
  TextHeight = 13
20 
  object HomeLbl: TLabel
 20 
  object HomeLbl: TLabel
21 
    Left = 32
 21 
    Left = 32
22 
    Top = 136
 22 
    Top = 136
23 
    Width = 48
 23 
    Width = 48
24 
    Height = 13
 24 
    Height = 13
25 
    Caption = 'Webseite:'
 25 
    Caption = 'Webseite:'
26 
    Transparent = True
 26 
    Transparent = True
27 
  end
 27 
  end
28 
  object Image: TImage
 28 
  object Image: TImage
29 
    Left = 8
 29 
    Left = 8
30 
    Top = 8
 30 
    Top = 8
31 
    Width = 65
 31 
    Width = 65
32 
    Height = 57
 32 
    Height = 57
33 
    Center = True
 33 
    Center = True
34 
    Stretch = True
 34 
    Stretch = True
35 
  end
 35 
  end
36 
  object FirmaLbl: TLabel
 36 
  object FirmaLbl: TLabel
37 
    Left = 88
 37 
    Left = 88
38 
    Top = 8
 38 
    Top = 8
39 
    Width = 74
 39 
    Width = 74
40 
    Height = 13
 40 
    Height = 13
41 
    Caption = 'ViaThinkSoft'
 41 
    Caption = 'ViaThinkSoft'
42 
    Font.Charset = DEFAULT_CHARSET
 42 
    Font.Charset = DEFAULT_CHARSET
43 
    Font.Color = clWindowText
 43 
    Font.Color = clWindowText
44 
    Font.Height = -11
 44 
    Font.Height = -11
45 
    Font.Name = 'MS Sans Serif'
 45 
    Font.Name = 'MS Sans Serif'
46 
    Font.Style = [fsBold]
 46 
    Font.Style = [fsBold]
47 
    ParentFont = False
 47 
    ParentFont = False
48 
    Transparent = True
 48 
    Transparent = True
49 
  end
 49 
  end
50 
  object NameLbl: TLabel
 50 
  object NameLbl: TLabel
51 
    Left = 104
 51 
    Left = 104
52 
    Top = 24
 52 
    Top = 24
53 
    Width = 66
 53 
    Width = 66
54 
    Height = 13
 54 
    Height = 13
55 
    Caption = 'SpaceMission'
 55 
    Caption = 'SpaceMission'
56 
    Transparent = True
 56 
    Transparent = True
57 
  end
 57 
  end
58 
  object VersionLbl: TLabel
 58 
  object VersionLbl: TLabel
59 
    Left = 232
 59 
    Left = 232
60 
    Top = 24
 60 
    Top = 24
61 
    Width = 35
 61 
    Width = 35
62 
    Height = 13
 62 
    Height = 13
63 
    Caption = 'Version'
 63 
    Caption = 'Version'
64 
    Transparent = True
 64 
    Transparent = True
65 
  end
 65 
  end
66 
  object EMailLbl: TLabel
 66 
  object EMailLbl: TLabel
67 
    Left = 32
 67 
    Left = 32
68 
    Top = 120
 68 
    Top = 120
69 
    Width = 32
 69 
    Width = 32
70 
    Height = 13
 70 
    Height = 13
71 
    Caption = 'E-Mail:'
 71 
    Caption = 'E-Mail:'
72 
    Transparent = True
 72 
    Transparent = True
73 
  end
 73 
  end
74 
  object CopyrightLbl: TLabel
 74 
  object CopyrightLbl: TLabel
75 
    Left = 8
 75 
    Left = 8
76 
    Top = 80
 76 
    Top = 80
77 
    Width = 137
 77 
    Width = 264
78 
    Height = 13
 78 
    Height = 13
79 
    Caption = '(C) 2001 - 2011 ViaThinkSoft'
 79 
    Caption = #169' Copyright 2001 - 2015 Daniel Marschall, ViaThinkSoft'
80 
    Transparent = True
 80 
    Transparent = True
81 
  end
 81 
  end
82 
  object Copyright2Lbl: TLabel
 82 
  object Copyright2Lbl: TLabel
83 
    Left = 8
 83 
    Left = 8
84 
    Top = 96
 84 
    Top = 96
85 
    Width = 117
 85 
    Width = 117
86 
    Height = 13
 86 
    Height = 13
87 
    Caption = 'Alle Rechte vorbehalten!'
 87 
    Caption = 'Alle Rechte vorbehalten!'
88 
    Transparent = True
 88 
    Transparent = True
89 
  end
 89 
  end
90 
  object URL2: TLabel
 90 
  object URL2: TLabel
91 
    Left = 152
 91 
    Left = 152
92 
    Top = 136
 92 
    Top = 136
93 
    Width = 117
 93 
    Width = 117
94 
    Height = 13
 94 
    Height = 13
95 
    Cursor = crHandPoint
 95 
    Cursor = crHandPoint
96 
    Caption = 'www.daniel-marschall.de'
 96 
    Caption = 'www.daniel-marschall.de'
97 
    Font.Charset = DEFAULT_CHARSET
 97 
    Font.Charset = DEFAULT_CHARSET
98 
    Font.Color = clBlue
 98 
    Font.Color = clBlue
99 
    Font.Height = -11
 99 
    Font.Height = -11
100 
    Font.Name = 'MS Sans Serif'
 100 
    Font.Name = 'MS Sans Serif'
101 
    Font.Style = [fsUnderline]
 101 
    Font.Style = [fsUnderline]
102 
    ParentFont = False
 102 
    ParentFont = False
103 
    Transparent = True
 103 
    Transparent = True
104 
    OnClick = URL2Click
 104 
    OnClick = WebsiteClick
105 
  end
 105 
  end
106 
  object URL1: TLabel
 106 
  object URL1: TLabel
107 
    Left = 152
 107 
    Left = 152
108 
    Top = 120
 108 
    Top = 120
109 
    Width = 155
 109 
    Width = 118
110 
    Height = 13
 110 
    Height = 13
111 
    Cursor = crHandPoint
 111 
    Cursor = crHandPoint
112 
    Caption = 'daniel-marschall@viathinksoft.de'
 112 
    Caption = 'info@daniel-marschall.de'
113 
    Font.Charset = DEFAULT_CHARSET
 113 
    Font.Charset = DEFAULT_CHARSET
114 
    Font.Color = clBlue
 114 
    Font.Color = clBlue
115 
    Font.Height = -11
 115 
    Font.Height = -11
116 
    Font.Name = 'MS Sans Serif'
 116 
    Font.Name = 'MS Sans Serif'
117 
    Font.Style = [fsUnderline]
 117 
    Font.Style = [fsUnderline]
118 
    ParentFont = False
 118 
    ParentFont = False
119 
    Transparent = True
 119 
    Transparent = True
120 
    OnClick = URL1Click
 120 
    OnClick = EMailClick
121 
  end
 121 
  end
122 
  object OkBtn: TButton
 122 
  object OkBtn: TButton
123 
    Left = 208
 123 
    Left = 270
124 
    Top = 160
 124 
    Top = 303
125 
    Width = 107
 125 
    Width = 107
126 
    Height = 25
 126 
    Height = 25
- 
 
 127 
    Cancel = True
127 
    Caption = 'OK'
 128 
    Caption = 'OK'
- 
 
 129 
    Default = True
128 
    TabOrder = 0
 130 
    TabOrder = 0
129 
    OnClick = OkBtnClick
 131 
    OnClick = OkBtnClick
130 
  end
 132 
  end
- 
 
 133 
  object MemoMitwirkende: TMemo
- 
 
 134 
    Left = 8
- 
 
 135 
    Top = 168
- 
 
 136 
    Width = 369
- 
 
 137 
    Height = 121
- 
 
 138 
    Lines.Strings = (
- 
 
 139
- 
 
 140 
        'SpaceMission wurde von Daniel Marschall aus einer Codevorlage vo' +
- 
 
 141 
        'n '
- 
 
 142
- 
 
 143 
        'Hiroyuki Hori heraus erstellt. Das Original ist ein Codebeispiel' +
- 
 
 144 
        ' f'#252'r DelphiX '
- 
 
 145 
      '2000.'
- 
 
 146 
      ''
- 
 
 147 
      'Musik von Savage Peachers Software, Grafikquellen unbekannt.'
- 
 
 148 
      ''
- 
 
 149 
      'Levels von Daniel Marschall, Patrick B'#252'ssecker und Andreas '
- 
 
 150 
      'K'#252'belsbeck.'
- 
 
 151 
      ''
- 
 
 152 
      'Entwickelt mit Borland Turbo Delphi.'
- 
 
 153 
      ''
- 
 
 154 
      'Verwendete Komponenten: DelphiX 2000.')
- 
 
 155 
    ReadOnly = True
- 
 
 156 
    ScrollBars = ssVertical
- 
 
 157 
    TabOrder = 1
- 
 
 158 
  end
131 
end
 159 
end