object IntroForm: TIntroForm Left = 194 Top = 279 Width = 593 Height = 380 BorderIcons = [biSystemMenu, biMinimize] Caption = 'Velkommen' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter Scaled = False OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Baggrund: TLMDPanelFill Left = 0 Top = 0 Width = 585 Height = 353 UseDockManager = False Bevel.Mode = bmCustom FillObject.Style = sfBitmapList ImageList = BaggrundGrafik TabOrder = 0 object Dansk: TLMDMMButton Tag = 6 Left = 497 Top = 53 Width = 76 Height = 66 OnClick = SprogClick AllowMouseOver = True AllowTransparency = False ButtonFaceImageList = Knapper ForceTransparent = False GroupIndex = 2 ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 0000000002000000020000000200000002000000020000000200000001000000 0200000000000000} ButtonFaceTransColNew = {112F4400} end object Norsk: TLMDMMButton Tag = 20 Left = 497 Top = 123 Width = 76 Height = 65 OnClick = SprogClick AllowMouseOver = True AllowTransparency = False ButtonFaceImageList = Knapper ForceTransparent = False GroupIndex = 2 ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000050000000500000004000000 0000000003000000} ButtonFaceTransColNew = {11314800} end object Svensk: TLMDMMButton Tag = 29 Left = 497 Top = 193 Width = 76 Height = 65 OnClick = SprogClick AllowMouseOver = True AllowTransparency = False ButtonFaceImageList = Knapper ForceTransparent = False GroupIndex = 2 ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000080000000800000007000000 0000000006000000} ButtonFaceTransColNew = {11334C00} end object Finnsk: TLMDMMButton Tag = 11 Left = 497 Top = 263 Width = 76 Height = 65 OnClick = SprogClick AllowMouseOver = True AllowTransparency = False ButtonFaceImageList = Knapper ForceTransparent = False GroupIndex = 2 ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000B0000000B0000000A000000 0000000009000000} ButtonFaceTransColNew = {11334C00} end object SprogLabel: TLMDSimpleLabel Left = 496 Top = 32 Width = 81 Height = 20 Alignment = agCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -16 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False Caption = 'Sprog:' Options = [] end object AcceptKnap: TLMDMMButton Left = 39 Top = 276 Width = 183 Height = 53 Caption = 'Accept'#233'r' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -16 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = AcceptClick AllowAllUp = True AllowMouseOver = True ButtonFaceImageList = Knapper ForceTransparent = False ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000E000000020000000D000000 000000000C000000} ButtonFaceTransColNew = {10314800} end object AfbrydKnap: TLMDMMButton Left = 249 Top = 276 Width = 183 Height = 53 Caption = 'Afbryd' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -16 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = AfbrydKnapClick AllowAllUp = True AllowMouseOver = True ButtonFaceImageList = Knapper ForceTransparent = False ButtonFaceIndicesNew2 = { 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000110000000200000010000000 000000000F000000} ButtonFaceTransColNew = {11324900} end object IntroTekst: TLMDRichLabel Left = 0 Top = 8 Width = 481 Height = 273 AutoURLDetect = False Bevel.StyleInner = bvNone Bevel.StyleOuter = bvNone RichStorage = VelkommenTekst RichStorageItem = 0 Transparent = True end end object Knapper: TLMDGraphicList Graphics = < item Name = 'Dansk' Picture.Data = {} Index = 0 end item Name = 'DanskLys' Picture.Data = {} Index = 1 end item Name = 'DanskNede' Picture.Data = {} Index = 2 end item Name = 'Norsk' Picture.Data = {} Index = 3 end item Name = 'NorskLys' Picture.Data = {} Index = 4 end item Name = 'NorskNede' Picture.Data = {} Index = 5 end item Name = 'Svensk' Picture.Data = {} Index = 6 end item Name = 'SvenskLyhs' Picture.Data = {} Index = 7 end item Name = 'SvenskNede' Picture.Data = {} Index = 8 end item Name = 'Finsk' Picture.Data = {} Index = 9 end item Name = 'FinskLys' Picture.Data = {} Index = 10 end item Name = 'FinskNede' Picture.Data = {} Index = 11 end item Name = 'Accept' Picture.Data = {} Index = 12 end item Name = 'AcceptLys' Picture.Data = {} Index = 13 end item Name = 'AcceptNede' Picture.Data = {} Index = 14 end item Name = 'Afbryd' Picture.Data = {} Index = 15 end item Name = 'AfbrydLys' Picture.Data = {} Index = 16 end item Name = 'AfbrydNede' Picture.Data = {} Index = 17 end> Left = 416 Top = 232 end object BaggrundGrafik: TLMDGraphicList Graphics = < item Name = 'Baggrund' Picture.Data = {} Index = 0 end> Left = 376 Top = 232 end object VelkommenTekst: TLMDRichStorage Items = < item Index = 0 Name = 'Dansk' Lines.Strings = ( '{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Verdan' + 'a;}{\f1\fnil MS Sans Serif;}}' '{\colortbl ;\red0\green0\blue0;}' '\viewkind4\uc1\pard\qc\cf1\lang1030\b\f0\fs24 Velkommen til 100 ' + 'sjove spil for hele familien\b0\par' '\par' '\fs22 Denne cd er spr\'#39'e6ngfyldt med sp\'#39'e6ndende spil, \par' 'som du kan spille gratis uden begr\'#39'e6nsninger.\par' '\par' 'Komputer for alle har kontrolleret cd'#39'ens indhold grundigt for v' + 'irus og andre mulige problemer. Komputer for alle kan dog ikke g' + '\'#39'f8res ansvarlig for programmernes kvalitet og eventuelle probl' + 'emer, der m\'#39'e5tte opst\'#39'e5 som f\'#39'f8lge af installation eller b' + 'rug af programmerne p\'#39'e5 denne cd.\par' '\par' 'For at anvende CD'#39'en skal du f\'#39'f8rst \par' 'acceptere dette.\lang1049\f1\fs16\par' '}') end item Index = 1 Name = 'Norsk' Lines.Strings = ( '{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Verdan' + 'a;}{\f1\fswiss\fprq2\fcharset0 Verdana;}{\f2\fnil MS Sans Serif;' + '}}' '{\colortbl ;\red0\green0\blue0;}' '\viewkind4\uc1\pard\ri-30\qc\lang1023\b\f0\fs24 Velkommen til 10' + '0 spill for hele familien\par' '\b0\f1\fs22\par' 'Denne cd-en er fylt til randen av spennende spill som er gratis ' + 'og uten begrensninger.\par' '\par' 'Komputer for alle har kontrollert cd-ens innhold grundig for vir' + 'us og andre mulige problemer. Komputer for alle kan allikevel ik' + 'ke holdes ansvarlig for programmenes kvalitet og eventuelle prob' + 'lemer som m\'#39'e5tte oppst\'#39'e5 som f\'#39'f8lge av installasjon eller ' + 'bruk av programmene p\'#39'e5 cd-en.\par' '\par' 'Du m\'#39'e5 akseptere disse betingelsene\par' 'f\'#39'f8r du bruker cd-en.\cf1\lang1049\f2\fs16\par' '}') end item Index = 2 Name = 'Svensk' Lines.Strings = ( '{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Verdan' + 'a;}}' '{\colortbl ;\red0\green0\blue0;}' '\viewkind4\uc1\pard\qc\cf1\lang1053\b\f0\fs22 V\'#39'e4lkommen till ' + '100 kul spel f\'#39'f6r hela familjen\fs24\par' '\b0\fs20 Den h\'#39'e4r cd:n \'#39'e4r spr\'#39'e4ngfylld med sp\'#39'e4nnande s' + 'pel som du kan spela kostnadsfritt, helt utan begr\'#39'e4nsningar.\' + 'par' '\par' 'Komputer f\'#39'f6r allahar g\'#39'e5tt igenom inneh\'#39'e5llet noggrant f\' + #39'f6r att f\'#39'f6rs\'#39'e4kra oss om att det inte medf\'#39'f6ljer virus e' + 'ller andra skadliga program p\'#39'e5 denna cd. Komputer f\'#39'f6r alla' + ' kan dock inte g\'#39'f6ras ansvarig f\'#39'f6r programmens kvalitet ell' + 'er eventuella problem som kan uppst\'#39'e5 till f\'#39'f6ljd av install' + 'ation och anv\'#39'e4ndning av programmen som finns p\'#39'e5 denna cd. ' + 'All anv\'#39'e4ndning sker p\'#39'e5 egen risk. \'#39'c4r du os\'#39'e4ker b\'#39'f6' + 'r du se till att ha ordentliga s\'#39'e4kerhetskopior p\'#39'e5 \par' 'viktiga filer innan du installerar n\'#39'e5got fr\'#39'e5n denna cd.\pa' + 'r' '\par' 'F\'#39'f6r att anv\'#39'e4nda cd:n m\'#39'e5ste du f\'#39'f6rsta \par' 'acceptera ovanst\'#39'e5ende villkor.\lang1049\fs22\par' '}') end item Index = 3 Name = 'Finnsk' Lines.Strings = ( '{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fswiss\fprq2\fcharset' + '0 Verdana;}{\f1\fnil MS Sans Serif;}}' '{\colortbl ;\red0\green0\blue0;}' '\viewkind4\uc1\pard\qc\lang1035\b\f0\fs24 Tervetuloa 100 koko pe' + 'rheen pelin pariin\par' '\b0\par' '\fs22 T\'#39'e4m\'#39'e4 cd on t\'#39'e4ynn\'#39'e4 hauskoja pelej\'#39'e4, \par' 'joita voit pelata tai kokeilla maksutta.\par' '\par' 'Kompuutteri Kaikille on tarkistanut huolella cd:n sis\'#39'e4ll\'#39'f6n' + ' virusten ja muiden mahdollisten ongelmien varalta. Kompuutteri ' + 'Kaikille ei kuitenkaan ole vastuussa ohjelmien laadusta ja mahdo' + 'llisista ongelmista, joita t\'#39'e4ll\'#39'e4 cd:ll\'#39'e4 \par' 'olevien ohjelmien asennus ja k\'#39'e4ytt\'#39'f6 saattavat aiheuttaa.\p' + 'ar' '\par' 'Sinun tulee hyv\'#39'e4ksy\'#39'e4 n\'#39'e4m\'#39'e4 ehdot, \par' 'jotta voit k\'#39'e4ytt\'#39'e4\'#39'e4 cd:t\'#39'e4.\cf1\lang1049\f1\fs16\par' '}') end> Left = 456 Top = 232 end end