object FormNapo: TFormNapo Left = 240 Top = 310 Width = 608 Height = 430 Caption = 'Napoleon'#39's grave' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Poyta: TPoyta Left = 0 Top = 0 Width = 353 Height = 389 Align = alLeft Caption = ' ' Color = 2015526 TabOrder = 0 object Pakka7_3: TSaantoPakka Left = 32 Top = 264 Width = 89 Height = 105 BevelOuter = bvNone Caption = '7' Color = clGreen TabOrder = 0 Puoli = Kuva MaxKortteja = 7 OnFull = PakkaFull Speed = 400 Eka = 7 Ero = 1 Lopetus = 0 Jatko = 0 end object PakkaApu_1: TSaantoPakka Left = 136 Top = 32 Width = 89 Height = 105 BevelOuter = bvNone Caption = 'Apu' Color = clGreen TabOrder = 1 Puoli = Kuva MaxKortteja = 1 Speed = 400 Eka = -20 Ero = -30 Lopetus = 0 Jatko = 0 end object Pakka7_1: TSaantoPakka Left = 32 Top = 32 Width = 89 Height = 105 BevelOuter = bvNone Caption = '7' Color = clGreen TabOrder = 2 Puoli = Kuva MaxKortteja = 7 OnFull = PakkaFull Speed = 400 Eka = 7 Ero = 1 Lopetus = 0 Jatko = 0 end object PakkaApu_2: TSaantoPakka Left = 32 Top = 148 Width = 89 Height = 105 BevelOuter = bvNone Caption = 'Apu' Color = clGreen TabOrder = 3 Puoli = Kuva MaxKortteja = 1 Speed = 400 Eka = -20 Ero = -30 Lopetus = 0 Jatko = 0 end object PakkaKeski: TSaantoPakka Left = 136 Top = 148 Width = 89 Height = 105 BevelOuter = bvNone Caption = '6' Color = clGreen TabOrder = 4 Puoli = Kuva MaxKortteja = 24 OnFull = PakkaFull Speed = 400 Eka = 6 Ero = -1 Lopetus = 1 Jatko = 6 end object PakkaApu_4: TSaantoPakka Left = 136 Top = 264 Width = 89 Height = 105 BevelOuter = bvNone Caption = 'Apu' Color = clGreen TabOrder = 5 Puoli = Kuva MaxKortteja = 1 Speed = 400 Eka = -20 Ero = -30 Lopetus = 0 Jatko = 0 end object Pakka7_4: TSaantoPakka Left = 240 Top = 264 Width = 89 Height = 105 BevelOuter = bvNone Caption = '7' Color = clGreen TabOrder = 6 Puoli = Kuva MaxKortteja = 7 OnFull = PakkaFull Speed = 400 Eka = 7 Ero = 1 Lopetus = 0 Jatko = 0 end object PakkaApu_3: TSaantoPakka Left = 240 Top = 148 Width = 89 Height = 105 BevelOuter = bvNone Caption = 'Apu' Color = clGreen TabOrder = 7 Puoli = Kuva MaxKortteja = 1 Speed = 400 Eka = -20 Ero = -30 Lopetus = 0 Jatko = 0 end object Pakka7_2: TSaantoPakka Left = 240 Top = 32 Width = 89 Height = 105 BevelOuter = bvNone Caption = '7' Color = clGreen TabOrder = 8 Puoli = Kuva MaxKortteja = 7 OnFull = PakkaFull Speed = 400 Eka = 7 Ero = 1 Lopetus = 0 Jatko = 0 end end object Panel1: TPanel Left = 353 Top = 0 Width = 247 Height = 389 Align = alClient Caption = ' ' Color = 2015526 TabOrder = 1 object IJakoPakka: TImage Left = 160 Top = 264 Width = 89 Height = 113 OnClick = IJakoPakkaClick end object KasiPakka: TSaantoPakka Left = 32 Top = 264 Width = 89 Height = 105 BevelOuter = bvNone Caption = 'Käsipakka' Color = clGreen TabOrder = 0 Puoli = Kuva Speed = 400 Eka = -20 Ero = -20 Lopetus = 0 Jatko = 0 end object Pakka6: TSaantoPakka Left = 32 Top = 32 Width = 89 Height = 105 BevelOuter = bvNone Caption = '6-pakka' Color = clGreen TabOrder = 1 Puoli = Kuva Speed = 400 Eka = 6 Ero = 0 Lopetus = 0 Jatko = 0 end object JakoPakka: TAJakoPakka Left = 160 Top = 264 Width = 73 Height = 97 BevelOuter = bvNone Enabled = False Caption = ' ' ParentColor = True TabOrder = 2 Puoli = Selka OnInsert = JakoPakkaInsert OnFull = JakoPakkaFull end end object MainMenu1: TMainMenu Left = 8 Top = 8 object File1: TMenuItem Caption = '&File' object New1: TMenuItem Caption = '&New' OnClick = New1Click end object Exit1: TMenuItem Caption = 'E&xit' end end object Help1: TMenuItem Caption = '&Help' object About1: TMenuItem Caption = '&About' OnClick = About1Click end end end end