home *** CD-ROM | disk | FTP | other *** search
- object EditForm: TEditForm
- Left = 509
- Top = 391
- Width = 710
- Height = 457
- Caption = 'EditForm'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu
- OldCreateOrder = False
- PixelsPerInch = 96
- TextHeight = 13
- object BagLabel: TLabel
- Left = 248
- Top = 323
- Width = 72
- Height = 16
- Caption = 'Baggrund:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 16
- Top = 347
- Width = 97
- Height = 16
- Caption = 'Programnavn:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label2: TLabel
- Left = 16
- Top = 371
- Width = 50
- Height = 16
- Caption = 'Folder:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label3: TLabel
- Left = 16
- Top = 395
- Width = 80
- Height = 16
- Caption = 'Installation:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label4: TLabel
- Left = 16
- Top = 323
- Width = 104
- Height = 16
- Caption = 'Antal lektioner:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label5: TLabel
- Left = 352
- Top = 339
- Width = 90
- Height = 16
- Caption = 'VidereTekst:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label6: TLabel
- Left = 16
- Top = 163
- Width = 139
- Height = 16
- Caption = 'KomponentNummer:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label7: TLabel
- Left = 248
- Top = 371
- Width = 94
- Height = 16
- Caption = 'P'#229' baggrund:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object TitelEdit: TEdit
- Left = 16
- Top = 8
- Width = 321
- Height = 32
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -21
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- Text = 'TitelEdit'
- end
- object UnderEdit: TMemo
- Left = 16
- Top = 40
- Width = 321
- Height = 57
- Lines.Strings = (
- 'UndertitelEdit')
- TabOrder = 1
- end
- object InOutEdit: TMemo
- Left = 16
- Top = 96
- Width = 321
- Height = 57
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
- 'InOutEdit')
- ParentFont = False
- TabOrder = 2
- end
- object KomponentSpinEdit: TLMDExtSpinEdit
- Left = 168
- Top = 160
- Width = 41
- Height = 21
- Cursor = crIBeam
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- Bevel.Mode = bmWindows
- Caret.BlinkRate = 500
- Caret.ImageIndex = 0
- Caret.ListIndex = 0
- TabOrder = 3
- OnChange = KomponentSpinEditModified
- Step = 1
- LargeStep = 10
- FractionStep = 0.100000000000000000
- MinValue = 1
- MaxValue = 20
- Value = 1
- DateTime = 0
- end
- object IndtastTekst: TMemo
- Left = 16
- Top = 192
- Width = 321
- Height = 121
- Lines.Strings = (
- 'IndtastTekst')
- TabOrder = 4
- OnChange = IndtastTekstChange
- end
- object ErTimer: TCheckBox
- Left = 560
- Top = 224
- Width = 73
- Height = 17
- Caption = 'Er timer'
- TabOrder = 5
- OnClick = ErTimerClick
- end
- object SletKomponentKnap: TButton
- Left = 560
- Top = 392
- Width = 89
- Height = 20
- Caption = 'Slet komponent'
- TabOrder = 6
- OnClick = SletKomponentKnapClick
- end
- object FindGrafik: TButton
- Left = 464
- Top = 168
- Width = 75
- Height = 20
- Caption = 'Find grafik'
- TabOrder = 7
- OnClick = FindGrafikClick
- end
- object LavBlink: TButton
- Left = 560
- Top = 168
- Width = 89
- Height = 20
- Caption = 'Lav blinker'
- TabOrder = 8
- OnClick = LavBlinkClick
- end
- object RClickGraphics: TButton
- Left = 352
- Top = 192
- Width = 89
- Height = 20
- Caption = 'Klik-billede'
- TabOrder = 9
- OnClick = RClickGraphicsClick
- end
- object PlacerGrafik: TButton
- Left = 464
- Top = 192
- Width = 75
- Height = 20
- Caption = 'Plac'#233'r grafik'
- TabOrder = 10
- OnClick = PlacerGrafikClick
- end
- object FindBlinkGrafik: TButton
- Left = 560
- Top = 192
- Width = 89
- Height = 20
- Caption = 'Blinker billede'
- TabOrder = 11
- OnClick = FindBlinkGrafikClick
- end
- object VisRegion: TCheckBox
- Left = 464
- Top = 144
- Width = 73
- Height = 17
- Caption = 'Vis region'
- TabOrder = 12
- OnClick = VisRegionClick
- end
- object HenvisL: TSpinEdit
- Left = 352
- Top = 264
- Width = 73
- Height = 22
- Enabled = False
- MaxValue = 20
- MinValue = 1
- TabOrder = 13
- Value = 1
- OnChange = HenvisLChange
- end
- object HenvisK: TSpinEdit
- Left = 352
- Top = 288
- Width = 73
- Height = 22
- Enabled = False
- MaxValue = 20
- MinValue = 1
- TabOrder = 14
- Value = 1
- OnChange = HenvisKChange
- end
- object VidereEdit: TMemo
- Left = 352
- Top = 360
- Width = 185
- Height = 49
- Lines.Strings = (
- 'VidereEdit')
- TabOrder = 15
- end
- object VindueEdit: TEdit
- Left = 248
- Top = 342
- Width = 97
- Height = 21
- TabOrder = 16
- Text = 'VindueEdit'
- end
- object FjernGrafik: TButton
- Left = 464
- Top = 312
- Width = 75
- Height = 20
- Caption = 'Fjern grafik'
- TabOrder = 17
- OnClick = FjernGrafikClick
- end
- object GemTekst: TButton
- Left = 448
- Top = 120
- Width = 75
- Height = 20
- Caption = 'Gem'
- TabOrder = 18
- OnClick = GemTekstClick
- end
- object Op: TButton
- Left = 352
- Top = 216
- Width = 41
- Height = 20
- Caption = 'Op'
- TabOrder = 19
- end
- object Ned: TButton
- Left = 400
- Top = 216
- Width = 41
- Height = 20
- Caption = 'Ned'
- TabOrder = 20
- end
- object FjernHenvis: TButton
- Left = 560
- Top = 72
- Width = 75
- Height = 20
- Caption = 'Fjern henvis'
- TabOrder = 21
- end
- object Henvis: TLMDCheckBox
- Left = 352
- Top = 248
- Width = 81
- Height = 17
- Caption = 'Henvis'
- DownGlyph = False
- Alignment.Alignment = agTopLeft
- Alignment.Spacing = 4
- TabOrder = 22
- OnClick = HenvisClick
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- end
- object NavnEdit: TEdit
- Left = 120
- Top = 344
- Width = 121
- Height = 21
- TabOrder = 23
- Text = 'NavnEdit'
- end
- object FolderEdit: TEdit
- Left = 120
- Top = 368
- Width = 121
- Height = 21
- TabOrder = 24
- Text = 'FolderEdit'
- end
- object InstallerEdit: TEdit
- Left = 120
- Top = 392
- Width = 121
- Height = 21
- TabOrder = 25
- Text = 'InstallerEdit'
- end
- object LektionSpinner: TSpinEdit
- Left = 192
- Top = 320
- Width = 49
- Height = 22
- MaxValue = 20
- MinValue = 1
- TabOrder = 26
- Value = 12
- OnChange = LektionSpinnerChange
- end
- object TekstSamler: TRichEdit
- Left = 344
- Top = 8
- Width = 193
- Height = 81
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- Lines.Strings = (
- 'TekstSamler')
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 27
- end
- object Udskriv: TButton
- Left = 344
- Top = 96
- Width = 97
- Height = 20
- Caption = 'Udskriv'
- TabOrder = 28
- OnClick = UdskrivClick
- end
- object SammelTekst: TButton
- Left = 448
- Top = 96
- Width = 97
- Height = 20
- Caption = 'Saml tekst'
- TabOrder = 29
- OnClick = SammelTekstClick
- end
- object Insert: TButton
- Left = 232
- Top = 160
- Width = 105
- Height = 20
- Caption = 'S'#230't ind'
- TabOrder = 30
- OnClick = InsertClick
- end
- object HopTil: TLMDCheckBox
- Left = 560
- Top = 248
- Width = 81
- Height = 17
- Caption = 'Hop til:'
- DownGlyph = False
- Alignment.Alignment = agTopLeft
- Alignment.Spacing = 4
- TabOrder = 31
- OnChange = HopTilChange
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- end
- object HopDest: TSpinEdit
- Left = 560
- Top = 272
- Width = 73
- Height = 22
- Enabled = False
- MaxValue = 20
- MinValue = 1
- TabOrder = 32
- Value = 1
- OnChange = HopDestChange
- end
- object RightClickNext: TLMDCheckBox
- Left = 560
- Top = 304
- Width = 81
- Height = 17
- Caption = 'H'#248'jrefrem'
- DownGlyph = False
- Alignment.Alignment = agTopLeft
- Alignment.Spacing = 4
- TabOrder = 33
- OnChange = RightClickNextChange
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- end
- object VindueEkstra: TEdit
- Left = 248
- Top = 390
- Width = 97
- Height = 21
- TabOrder = 34
- Text = 'VindueEkstra'
- end
- object UseRightCheck: TLMDCheckBox
- Left = 352
- Top = 168
- Width = 97
- Height = 17
- Caption = 'Brug h'#248'jre tast'
- DownGlyph = False
- Alignment.Alignment = agTopLeft
- Alignment.Spacing = 4
- TabOrder = 35
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- end
- object HarHilite: TLMDCheckBox
- Left = 560
- Top = 328
- Width = 81
- Height = 17
- Caption = 'Har hilite'
- DownGlyph = False
- Alignment.Alignment = agTopLeft
- Alignment.Spacing = 4
- TabOrder = 36
- OnChange = HarHiliteChange
- BackFX.AlphaBlend.Strength = 0.600000023841858100
- end
- object GemHenvis: TButton
- Left = 352
- Top = 312
- Width = 75
- Height = 20
- Caption = 'Gem Henvis'
- TabOrder = 37
- OnClick = GemHenvisClick
- end
- object GrafikX: TSpinEdit
- Left = 464
- Top = 240
- Width = 73
- Height = 22
- MaxValue = 500
- MinValue = 42
- TabOrder = 38
- Value = 42
- OnChange = GrafikPosChange
- end
- object GrafikY: TSpinEdit
- Left = 464
- Top = 264
- Width = 73
- Height = 22
- MaxValue = 500
- MinValue = 120
- TabOrder = 39
- Value = 120
- OnChange = GrafikPosChange
- end
- object GemGrafik: TButton
- Left = 464
- Top = 288
- Width = 75
- Height = 20
- Caption = 'Gem grafikpos.'
- TabOrder = 40
- OnClick = GemGrafikClick
- end
- object SprogGrafik: TCheckBox
- Left = 464
- Top = 216
- Width = 97
- Height = 17
- Caption = 'SprogGrafik'
- TabOrder = 41
- OnClick = SprogGrafikClick
- end
- object FindBillede: TOpenPictureDialog
- DefaultExt = 'jpg'
- Filter =
- 'All (*.jpg;*.jpeg;*.bmp;*.ico)|*.jpg;*.jpeg;*.png;*.bmp;*.ico|JP' +
- 'EG Image File (*.jpg)|*.jpg;*.jpeg|PNG Image File (*.png)|*.png|' +
- 'Windows Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico'
- Left = 432
- Top = 136
- end
- object FindFil: TOpenDialog
- DefaultExt = '*.jpg'
- Left = 400
- Top = 136
- end
- object MainMenu: TMainMenu
- Left = 568
- Top = 24
- end
- end
-