home *** CD-ROM | disk | FTP | other *** search
- object Vaerksted: TVaerksted
- Left = 151
- Top = 130
- Width = 728
- Height = 567
- Caption = 'Vaerksted'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Baggrund: TLMDBackPanel
- Left = 0
- Top = 0
- Width = 720
- Height = 540
- UseDockManager = False
- Bevel.Mode = bmCustom
- ImageList = BaggrundGrafik
- TabOrder = 0
- object Frem: TLMDMMButton
- Left = 41
- Top = 483
- Width = 30
- Height = 58
- ButtonLayout.Alignment = agCenterRight
- ButtonLayout.OffsetX = -15
- ButtonLayout.Spacing = 0
- Caption = ' '
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 3
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = FremClick
- AllowMouseOver = True
- AllowTransparency = False
- ButtonFaceImageList = KnapGrafik
- ForceTransparent = False
- Transparent = True
- ButtonFaceIndicesNew2 = {
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000030000000000000003000000
- 0000000001000000}
- ButtonFaceTransColNew = {FFFFFF00}
- end
- object HovedVindue: TImage
- Left = 42
- Top = 120
- Width = 431
- Height = 353
- Transparent = True
- end
- object IntroExit: TLabel
- Left = 42
- Top = 96
- Width = 431
- Height = 377
- AutoSize = False
- Caption = 'IntroExit'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Blinker: TShape
- Left = 448
- Top = 104
- Width = 89
- Height = 41
- Brush.Color = clYellow
- Pen.Style = psClear
- Pen.Width = 0
- Shape = stRoundRect
- Visible = False
- end
- object BlinkBillede: TImage
- Left = 392
- Top = 40
- Width = 81
- Height = 57
- AutoSize = True
- Transparent = True
- OnClick = BlinkKlik
- end
- object UnderTitel: TLabel
- Left = 42
- Top = 72
- Width = 431
- Height = 38
- AutoSize = False
- Caption = 'Undertitel'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Titel: TLabel
- Left = 42
- Top = 32
- Width = 431
- Height = 45
- AutoSize = False
- Caption = 'Titel'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -29
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object Tekst: TLabel
- Left = 500
- Top = 50
- Width = 197
- Height = 375
- AutoSize = False
- Caption = 'KomponentBeskrivelse'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Videre: TLabel
- Left = 500
- Top = 426
- Width = 199
- Height = 55
- AutoSize = False
- Caption = 'Forts'#230't-tekst'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object ProgramNavn: TLabel
- Left = 42
- Top = 0
- Width = 335
- Height = 33
- AutoSize = False
- Caption = 'ProgramNavn'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Installer: TLMDMMButton
- Left = 491
- Top = 494
- Width = 90
- Height = 30
- ButtonLayout.Alignment = agCenterRight
- ButtonLayout.OffsetX = -15
- ButtonLayout.Spacing = 0
- Caption = 'Installer'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 3
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = InstallerClick
- AllowMouseOver = True
- ButtonFaceImageList = KnapGrafik
- Transparent = True
- ButtonFaceIndicesNew2 = {
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000040000000000000004000000
- 0000000000000000}
- ButtonFaceTransColNew = {3E403D00}
- end
- object Tilbage: TLMDMMButton
- Left = 0
- Top = 484
- Width = 30
- Height = 58
- ButtonLayout.Alignment = agCenterRight
- ButtonLayout.OffsetX = -15
- ButtonLayout.Spacing = 0
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 3
- ParentFont = False
- Visible = False
- OnClick = TilbageClick
- AllowMouseOver = True
- AllowTransparency = False
- ButtonFaceImageList = KnapGrafik
- Transparent = True
- ButtonFaceIndicesNew2 = {
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000060000000000000006000000
- 0000000005000000}
- ButtonFaceTransColNew = {FFFFFF00}
- end
- object VisLektion: TLabel
- Left = 500
- Top = 0
- Width = 159
- Height = 33
- AutoSize = False
- Caption = 'LektionNummer'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object InstallForslag: TLabel
- Left = 500
- Top = 376
- Width = 205
- Height = 49
- AutoSize = False
- Caption = 'InstallerNu'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWhite
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Visible = False
- WordWrap = True
- end
- object Afslut: TLMDMMButton
- Left = 630
- Top = 510
- Width = 90
- Height = 30
- ButtonLayout.Alignment = agCenterRight
- ButtonLayout.OffsetX = -15
- ButtonLayout.Spacing = 0
- Caption = 'Afslut'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 3
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = AfslutClick
- AllowMouseOver = True
- ButtonFaceImageList = KnapGrafik
- Transparent = True
- ButtonFaceIndicesNew2 = {
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000040000000000000004000000
- 0000000000000000}
- ButtonFaceTransColNew = {3E403D00}
- end
- object Image1: TImage
- Left = 656
- Top = 304
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image2: TImage
- Left = 656
- Top = 296
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image3: TImage
- Left = 656
- Top = 288
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image4: TImage
- Left = 656
- Top = 280
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image5: TImage
- Left = 656
- Top = 272
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image6: TImage
- Left = 656
- Top = 264
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image7: TImage
- Left = 656
- Top = 200
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image8: TImage
- Left = 656
- Top = 192
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image9: TImage
- Left = 656
- Top = 184
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image10: TImage
- Left = 656
- Top = 176
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Region4: TLabel
- Tag = 4
- Left = 232
- Top = 80
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region5: TLabel
- Tag = 5
- Left = 240
- Top = 88
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region6: TLabel
- Tag = 6
- Left = 248
- Top = 96
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region7: TLabel
- Tag = 7
- Left = 256
- Top = 104
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region8: TLabel
- Tag = 8
- Left = 264
- Top = 112
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region9: TLabel
- Tag = 9
- Left = 272
- Top = 120
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region10: TLabel
- Tag = 10
- Left = 280
- Top = 128
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region1: TLabel
- Tag = 1
- Left = 208
- Top = 56
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region2: TLabel
- Tag = 2
- Left = 216
- Top = 64
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region3: TLabel
- Tag = 3
- Left = 224
- Top = 72
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Image11: TImage
- Left = 656
- Top = 168
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image12: TImage
- Left = 656
- Top = 160
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image13: TImage
- Left = 656
- Top = 152
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image14: TImage
- Left = 656
- Top = 88
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image15: TImage
- Left = 656
- Top = 80
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image16: TImage
- Left = 656
- Top = 72
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image17: TImage
- Left = 656
- Top = 64
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image18: TImage
- Left = 656
- Top = 40
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image19: TImage
- Left = 656
- Top = 48
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Image20: TImage
- Left = 656
- Top = 32
- Width = 57
- Height = 57
- AutoSize = True
- OnClick = ImageClick
- end
- object Region11: TLabel
- Tag = 11
- Left = 288
- Top = 136
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region12: TLabel
- Tag = 12
- Left = 296
- Top = 144
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region13: TLabel
- Tag = 13
- Left = 304
- Top = 152
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region14: TLabel
- Tag = 14
- Left = 312
- Top = 160
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region15: TLabel
- Tag = 15
- Left = 320
- Top = 168
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region16: TLabel
- Tag = 16
- Left = 328
- Top = 176
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region17: TLabel
- Tag = 17
- Left = 336
- Top = 184
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region18: TLabel
- Tag = 18
- Left = 344
- Top = 192
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region19: TLabel
- Tag = 19
- Left = 352
- Top = 200
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object Region20: TLabel
- Tag = 20
- Left = 360
- Top = 208
- Width = 89
- Height = 41
- AutoSize = False
- Caption = 'Region1'
- Transparent = True
- OnClick = RegionClick
- OnMouseDown = RightClick
- OnMouseEnter = EnterSection
- OnMouseLeave = LeaveSection
- end
- object GulPil: TImage
- Left = 41
- Top = 482
- Width = 30
- Height = 58
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image000.bmp>}
- ShowHint = False
- Transparent = True
- Visible = False
- OnClick = FremClick
- end
- object PlaceringsGrafik: TImage
- Left = 500
- Top = 200
- Width = 105
- Height = 105
- AutoSize = True
- Visible = False
- OnMouseDown = PlaceringsGrafikMouseDown
- OnMouseMove = PlaceringsGrafikMouseMove
- OnMouseUp = PlaceringsGrafikMouseUp
- end
- object Region: TShape
- Left = 500
- Top = 334
- Width = 65
- Height = 65
- Visible = False
- OnMouseDown = RegionMouseDown
- OnMouseMove = RegionMouseMove
- OnMouseUp = RegionMouseUp
- end
- object RightImage: TImage
- Left = 543
- Top = 272
- Width = 57
- Height = 57
- AutoSize = True
- OnMouseMove = RightImageMouseMove
- end
- object Udskriv: TLMDMMButton
- Left = 381
- Top = 494
- Width = 90
- Height = 30
- ButtonLayout.Alignment = agCenterRight
- ButtonLayout.OffsetX = -15
- ButtonLayout.Spacing = 0
- Caption = 'Udskriv'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 3
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = UdskrivClick
- AllowMouseOver = True
- ButtonFaceImageList = KnapGrafik
- Transparent = True
- ButtonFaceIndicesNew2 = {
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000040000000000000004000000
- 0000000000000000}
- ButtonFaceTransColNew = {3E403D00}
- end
- object DesignMode: TCheckBox
- Left = 200
- Top = 8
- Width = 81
- Height = 17
- Caption = 'DesignMode'
- TabOrder = 0
- OnClick = DesignModeClick
- end
- object FindProgram: TButton
- Left = 288
- Top = 8
- Width = 75
- Height = 17
- Caption = 'Find Program'
- TabOrder = 1
- OnClick = FindProgramClick
- end
- end
- object BaggrundGrafik: TLMDGraphicList
- Graphics = <
- item
- Picture.Data = {<image001.jpg>}
- Index = 0
- end>
- Left = 608
- Top = 8
- end
- object KnapGrafik: TLMDGraphicList
- Graphics = <
- item
- Picture.Data = {<image002.jpg>}
- Index = 0
- end
- item
- Name = 'NormalFrem'
- Picture.Data = {<image003.bmp>}
- Index = 1
- end
- item
- Name = 'GulFrem'
- Picture.Data = {<image004.bmp>}
- Index = 2
- end
- item
- Name = 'LysFrem'
- Picture.Data = {<image005.bmp>}
- Index = 3
- end
- item
- Name = 'FirkantLys'
- Picture.Data = {<image006.jpg>}
- Index = 4
- end
- item
- Name = 'NormalTilbage'
- Picture.Data = {<image007.bmp>}
- Index = 5
- end
- item
- Name = 'LysTilbage'
- Picture.Data = {<image008.bmp>}
- Index = 6
- end>
- Left = 576
- Top = 8
- end
- object Starter: TLMDStarter
- Left = 544
- Top = 8
- end
- object BlinkTimer: TTimer
- Enabled = False
- Interval = 5000
- OnTimer = BlinkTimerTimer
- Left = 512
- Top = 8
- end
- object ProgramFinder: TOpenDialog
- DefaultExt = '*.dtx'
- Left = 640
- Top = 8
- end
- object FindIniDlg: TOpenDialog
- DefaultExt = '*.dtx'
- Filter =
- 'DTX-filer (*.dtx)|*.dtx|Ini-filer (*.ini)|*.ini|Alle filtyper (*' +
- '.*)|*.*'
- Left = 672
- Top = 8
- end
- end
-