home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 February / Chip_2001-02_cd1.bin / oddech / prsi / prsi.exe / 0 / RCDATA / TFORM1 / TFORM1.txt
Text File  |  1999-04-26  |  4KB  |  166 lines

  1. object Form1: TForm1
  2.   Left = 298
  3.   Top = 102
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Karetn∩┐╜ hra PR∩┐╜∩┐╜'
  7.   ClientHeight = 502
  8.   ClientWidth = 783
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Menu = MainMenu1
  15.   Position = poScreenCenter
  16.   OnClose = FormClose
  17.   OnCreate = FormCreate
  18.   OnDestroy = FormDestroy
  19.   OnShow = FormShow
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object Label1: TLabel
  23.     Left = 160
  24.     Top = 0
  25.     Width = 119
  26.     Height = 44
  27.     Caption = 'Label1'
  28.     Font.Charset = EASTEUROPE_CHARSET
  29.     Font.Color = clNavy
  30.     Font.Height = -37
  31.     Font.Name = 'Arial'
  32.     Font.Style = [fsBold]
  33.     ParentFont = False
  34.     Visible = False
  35.   end
  36.   object LabelB: TLabel
  37.     Left = 288
  38.     Top = 0
  39.     Width = 103
  40.     Height = 36
  41.     Caption = 'Label1'
  42.     Font.Charset = EASTEUROPE_CHARSET
  43.     Font.Color = clNavy
  44.     Font.Height = -32
  45.     Font.Name = 'Arial'
  46.     Font.Style = [fsBold, fsItalic]
  47.     ParentFont = False
  48.     Visible = False
  49.   end
  50.   object ubrus1: TImage
  51.     Left = 120
  52.     Top = 0
  53.     Width = 100
  54.     Height = 100
  55.     Visible = False
  56.   end
  57.   object Panel1: TPanel
  58.     Left = 0
  59.     Top = 0
  60.     Width = 783
  61.     Height = 502
  62.     Align = alClient
  63.     BevelInner = bvLowered
  64.     TabOrder = 0
  65.     object ImP: TImage
  66.       Left = 2
  67.       Top = 2
  68.       Width = 779
  69.       Height = 498
  70.       Align = alClient
  71.       OnMouseDown = ImPMouseDown
  72.       OnMouseMove = ImPMouseMove
  73.       OnMouseUp = ImPMouseUp
  74.     end
  75.     object Panel2: TPanel
  76.       Left = 0
  77.       Top = 0
  78.       Width = 185
  79.       Height = 76
  80.       BevelInner = bvRaised
  81.       BevelOuter = bvLowered
  82.       Color = clOlive
  83.       TabOrder = 0
  84.       Visible = False
  85.       OnMouseUp = ImPMouseUp
  86.       object Label2: TLabel
  87.         Left = 8
  88.         Top = 2
  89.         Width = 67
  90.         Height = 15
  91.         Caption = 'Volba Barvy'
  92.         Font.Charset = EASTEUROPE_CHARSET
  93.         Font.Color = clSilver
  94.         Font.Height = -12
  95.         Font.Name = 'Arial'
  96.         Font.Style = [fsBold]
  97.         ParentFont = False
  98.       end
  99.       object Shape1: TShape
  100.         Left = 2
  101.         Top = 2
  102.         Width = 181
  103.         Height = 72
  104.         Align = alClient
  105.         Brush.Style = bsClear
  106.         OnMouseMove = Shape1MouseMove
  107.         OnMouseUp = ImPMouseUp
  108.       end
  109.       object Image1: TImage
  110.         Left = 8
  111.         Top = 24
  112.         Width = 168
  113.         Height = 42
  114.         OnMouseDown = Image1MouseDown
  115.         OnMouseMove = Image1MouseMove
  116.         OnMouseUp = ImPMouseUp
  117.       end
  118.     end
  119.   end
  120.   object MainMenu1: TMainMenu
  121.     Left = 64
  122.     Top = 8
  123.     object Program1: TMenuItem
  124.       Caption = '&Program'
  125.       OnClick = Program1Click
  126.       object Nastaven1: TMenuItem
  127.         Caption = 'Nastaven∩┐╜'
  128.         OnClick = Nastaven1Click
  129.       end
  130.       object Autor: TMenuItem
  131.         Caption = 'Program'
  132.         OnClick = AutorClick
  133.       end
  134.       object Informace1: TMenuItem
  135.         Caption = 'Informace'
  136.         OnClick = Informace1Click
  137.       end
  138.       object N1: TMenuItem
  139.         Caption = '-'
  140.       end
  141.       object Konec1: TMenuItem
  142.         Caption = 'Konec'
  143.         OnClick = Konec1Click
  144.       end
  145.     end
  146.     object Hra1: TMenuItem
  147.       Caption = '&Hra'
  148.       OnClick = Hra1Click
  149.       object Novhra1: TMenuItem
  150.         Caption = 'Nov∩┐╜ hra'
  151.         OnClick = Novhra1Click
  152.       end
  153.       object Ukonci: TMenuItem
  154.         Caption = 'Ukon∩┐╜i hru'
  155.         OnClick = UkonciClick
  156.       end
  157.     end
  158.   end
  159.   object Timer1: TTimer
  160.     Interval = 100
  161.     OnTimer = Timer1Timer
  162.     Left = 32
  163.     Top = 96
  164.   end
  165. end
  166.