home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 December / Chip_2002-12_cd1.bin / ctenari / Srubar / _SETUP.1 / Videoteka.exe / 0 / RCDATA / TFUPRAVIT / TFUPRAVIT.txt
Encoding:
Text File  |  2002-11-02  |  12.4 KB  |  554 lines
  1. object FUpravit: TFUpravit
  2.   Left = 205
  3.   Top = 87
  4.   Width = 716
  5.   Height = 556
  6.   BorderIcons = [biSystemMenu]
  7.   Caption = '∩┐╜pravy'
  8.   Color = clBtnFace
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   OldCreateOrder = False
  15.   Position = poScreenCenter
  16.   WindowState = wsMaximized
  17.   OnCloseQuery = FormCloseQuery
  18.   OnShow = FormShow
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object Label12: TLabel
  22.     Left = 232
  23.     Top = 8
  24.     Width = 85
  25.     Height = 19
  26.     Caption = 'Kazeta ∩┐╜∩┐╜slo:'
  27.     Font.Charset = EASTEUROPE_CHARSET
  28.     Font.Color = clWindowText
  29.     Font.Height = -16
  30.     Font.Name = 'Times New Roman'
  31.     Font.Style = [fsBold, fsItalic]
  32.     ParentFont = False
  33.   end
  34.   object DBText1: TDBText
  35.     Left = 328
  36.     Top = 8
  37.     Width = 62
  38.     Height = 19
  39.     AutoSize = True
  40.     DataField = 'Cislo_kazety'
  41.     DataSource = DM.DS1
  42.     Font.Charset = EASTEUROPE_CHARSET
  43.     Font.Color = clBlue
  44.     Font.Height = -16
  45.     Font.Name = 'Times New Roman'
  46.     Font.Style = [fsBold]
  47.     ParentFont = False
  48.   end
  49.   object Panel1: TPanel
  50.     Left = 72
  51.     Top = 40
  52.     Width = 657
  53.     Height = 185
  54.     BevelInner = bvSpace
  55.     BevelOuter = bvLowered
  56.     TabOrder = 0
  57.     object Bedit: TSquareButton
  58.       Left = 520
  59.       Top = 72
  60.       Width = 113
  61.       Height = 17
  62.       Cursor = crHandPoint
  63.       Caption = 'Upravit kazetu'
  64.       Color = clBtnFace
  65.       ColorBorder = clBlack
  66.       Enabled = True
  67.       OnClick = BEditClick
  68.       ColorOverCaption = clWhite
  69.       Alignment = taLeftJustify
  70.       ColorOverBorder = clBlack
  71.       BorderWidth = 2
  72.       DownBorderColor = clWhite
  73.       ShowHint = True
  74.       ParentShowHint = False
  75.       Font.Charset = DEFAULT_CHARSET
  76.       Font.Color = clMaroon
  77.       Font.Height = -11
  78.       Font.Name = 'Arial'
  79.       Font.Style = []
  80.     end
  81.     object BOk: TSquareButton
  82.       Left = 520
  83.       Top = 120
  84.       Width = 113
  85.       Height = 17
  86.       Cursor = crHandPoint
  87.       Caption = 'Ulo∩┐╜it zm∩┐╜ny'
  88.       Color = clBtnFace
  89.       ColorBorder = clBlack
  90.       Enabled = True
  91.       OnClick = BOkClick
  92.       ColorOverCaption = clWhite
  93.       Alignment = taLeftJustify
  94.       ColorOverBorder = clBlack
  95.       BorderWidth = 2
  96.       DownBorderColor = clWhite
  97.       ShowHint = True
  98.       ParentShowHint = False
  99.       Font.Charset = DEFAULT_CHARSET
  100.       Font.Color = clMaroon
  101.       Font.Height = -11
  102.       Font.Name = 'Arial'
  103.       Font.Style = []
  104.     end
  105.     object BCancel: TSquareButton
  106.       Left = 520
  107.       Top = 96
  108.       Width = 113
  109.       Height = 17
  110.       Cursor = crHandPoint
  111.       Caption = 'Zp∩┐╜t zm∩┐╜ny'
  112.       Color = clBtnFace
  113.       ColorBorder = clBlack
  114.       Enabled = True
  115.       OnClick = BCancelClick
  116.       ColorOverCaption = clWhite
  117.       Alignment = taLeftJustify
  118.       ColorOverBorder = clBlack
  119.       BorderWidth = 2
  120.       DownBorderColor = clWhite
  121.       ShowHint = True
  122.       ParentShowHint = False
  123.       Font.Charset = DEFAULT_CHARSET
  124.       Font.Color = clMaroon
  125.       Font.Height = -11
  126.       Font.Name = 'Arial'
  127.       Font.Style = []
  128.     end
  129.     object DBN1: TDBNavigator
  130.       Left = 512
  131.       Top = 8
  132.       Width = 136
  133.       Height = 25
  134.       Cursor = crHandPoint
  135.       DataSource = DM.DS1
  136.       VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
  137.       Flat = True
  138.       Hints.Strings = (
  139.         'Prvn∩┐╜'
  140.         'P∩┐╜edchoz∩┐╜'
  141.         'N∩┐╜sleduj∩┐╜c∩┐╜'
  142.         'Posledn∩┐╜')
  143.       ParentShowHint = False
  144.       ShowHint = True
  145.       TabOrder = 0
  146.     end
  147.     object Panel3: TPanel
  148.       Left = 8
  149.       Top = 8
  150.       Width = 497
  151.       Height = 145
  152.       BevelOuter = bvNone
  153.       Enabled = False
  154.       TabOrder = 1
  155.       object Label3: TLabel
  156.         Left = 14
  157.         Top = 8
  158.         Width = 62
  159.         Height = 13
  160.         Caption = 'D∩┐╜lka kazety'
  161.         FocusControl = EditDelka_kazety
  162.       end
  163.       object Label13: TLabel
  164.         Left = 80
  165.         Top = 24
  166.         Width = 31
  167.         Height = 16
  168.         Caption = 'minut'
  169.         Font.Charset = DEFAULT_CHARSET
  170.         Font.Color = clWindowText
  171.         Font.Height = -13
  172.         Font.Name = 'MS Sans Serif'
  173.         Font.Style = []
  174.         ParentFont = False
  175.       end
  176.       object Label2: TLabel
  177.         Left = 14
  178.         Top = 54
  179.         Width = 32
  180.         Height = 13
  181.         Caption = 'Titulek'
  182.         FocusControl = EditTitulek
  183.       end
  184.       object Label10: TLabel
  185.         Left = 14
  186.         Top = 96
  187.         Width = 49
  188.         Height = 13
  189.         Caption = 'Pozn∩┐╜mky'
  190.       end
  191.       object EditDelka_kazety: TDBEdit
  192.         Left = 14
  193.         Top = 21
  194.         Width = 65
  195.         Height = 21
  196.         DataField = 'Delka_kazety'
  197.         DataSource = DM.DS1
  198.         MaxLength = 4
  199.         TabOrder = 0
  200.         OnKeyPress = EditDelka_kazetyKeyPress
  201.       end
  202.       object EditTitulek: TDBEdit
  203.         Left = 14
  204.         Top = 69
  205.         Width = 476
  206.         Height = 21
  207.         DataField = 'Titulek'
  208.         DataSource = DM.DS1
  209.         TabOrder = 1
  210.       end
  211.       object EditPoznamky: TDBEdit
  212.         Left = 14
  213.         Top = 110
  214.         Width = 475
  215.         Height = 21
  216.         DataField = 'Poznamky'
  217.         DataSource = DM.DS1
  218.         TabOrder = 2
  219.       end
  220.     end
  221.   end
  222.   object Panel2: TPanel
  223.     Left = 72
  224.     Top = 224
  225.     Width = 657
  226.     Height = 265
  227.     BevelInner = bvRaised
  228.     BevelOuter = bvLowered
  229.     TabOrder = 1
  230.     object BZpet: TSquareButton
  231.       Left = 520
  232.       Top = 144
  233.       Width = 113
  234.       Height = 17
  235.       Cursor = crHandPoint
  236.       Caption = 'Zp∩┐╜t zm∩┐╜ny'
  237.       Color = clBtnFace
  238.       ColorBorder = clBlack
  239.       Enabled = True
  240.       OnClick = BZpetClick
  241.       ColorOverCaption = clWhite
  242.       Alignment = taLeftJustify
  243.       ColorOverBorder = clBlack
  244.       BorderWidth = 2
  245.       DownBorderColor = clWhite
  246.       ShowHint = True
  247.       ParentShowHint = False
  248.       Font.Charset = DEFAULT_CHARSET
  249.       Font.Color = clMaroon
  250.       Font.Height = -11
  251.       Font.Name = 'Arial'
  252.       Font.Style = []
  253.     end
  254.     object BUlozit: TSquareButton
  255.       Left = 520
  256.       Top = 168
  257.       Width = 113
  258.       Height = 17
  259.       Cursor = crHandPoint
  260.       Caption = 'Ulo∩┐╜it zm∩┐╜ny'
  261.       Color = clBtnFace
  262.       ColorBorder = clBlack
  263.       Enabled = True
  264.       OnClick = BUlozitClick
  265.       ColorOverCaption = clWhite
  266.       Alignment = taLeftJustify
  267.       ColorOverBorder = clBlack
  268.       BorderWidth = 2
  269.       DownBorderColor = clWhite
  270.       ShowHint = True
  271.       ParentShowHint = False
  272.       Font.Charset = DEFAULT_CHARSET
  273.       Font.Color = clMaroon
  274.       Font.Height = -11
  275.       Font.Name = 'Arial'
  276.       Font.Style = []
  277.     end
  278.     object BUpravit: TSquareButton
  279.       Left = 520
  280.       Top = 72
  281.       Width = 113
  282.       Height = 17
  283.       Cursor = crHandPoint
  284.       Caption = 'Upravit film'
  285.       Color = clBtnFace
  286.       ColorBorder = clBlack
  287.       Enabled = True
  288.       OnClick = BUpravitClick
  289.       ColorOverCaption = clWhite
  290.       Alignment = taLeftJustify
  291.       ColorOverBorder = clBlack
  292.       BorderWidth = 2
  293.       DownBorderColor = clWhite
  294.       ShowHint = True
  295.       ParentShowHint = False
  296.       Font.Charset = DEFAULT_CHARSET
  297.       Font.Color = clMaroon
  298.       Font.Height = -11
  299.       Font.Name = 'Arial'
  300.       Font.Style = []
  301.     end
  302.     object BSmazat: TSquareButton
  303.       Left = 520
  304.       Top = 120
  305.       Width = 113
  306.       Height = 17
  307.       Cursor = crHandPoint
  308.       Caption = 'Smazat film'
  309.       Color = clBtnFace
  310.       ColorBorder = clBlack
  311.       Enabled = True
  312.       OnClick = BSmazatClick
  313.       ColorOverCaption = clWhite
  314.       Alignment = taLeftJustify
  315.       ColorOverBorder = clBlack
  316.       BorderWidth = 2
  317.       DownBorderColor = clWhite
  318.       ShowHint = True
  319.       ParentShowHint = False
  320.       Font.Charset = DEFAULT_CHARSET
  321.       Font.Color = clMaroon
  322.       Font.Height = -11
  323.       Font.Name = 'Arial'
  324.       Font.Style = []
  325.     end
  326.     object BPridat: TSquareButton
  327.       Left = 520
  328.       Top = 96
  329.       Width = 113
  330.       Height = 17
  331.       Cursor = crHandPoint
  332.       Caption = 'P∩┐╜idat film'
  333.       Color = clBtnFace
  334.       ColorBorder = clBlack
  335.       Enabled = True
  336.       OnClick = BPridatClick
  337.       ColorOverCaption = clWhite
  338.       Alignment = taLeftJustify
  339.       ColorOverBorder = clBlack
  340.       BorderWidth = 2
  341.       DownBorderColor = clWhite
  342.       ShowHint = True
  343.       ParentShowHint = False
  344.       Font.Charset = DEFAULT_CHARSET
  345.       Font.Color = clMaroon
  346.       Font.Height = -11
  347.       Font.Name = 'Arial'
  348.       Font.Style = []
  349.     end
  350.     object DBN2: TDBNavigator
  351.       Left = 504
  352.       Top = 16
  353.       Width = 144
  354.       Height = 25
  355.       Cursor = crHandPoint
  356.       DataSource = DM.DS2
  357.       VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
  358.       Flat = True
  359.       Hints.Strings = (
  360.         'Prvn∩┐╜'
  361.         'P∩┐╜edchoz∩┐╜'
  362.         'N∩┐╜sleduj∩┐╜c∩┐╜'
  363.         'Posledn∩┐╜')
  364.       ParentShowHint = False
  365.       ShowHint = True
  366.       TabOrder = 0
  367.     end
  368.     object Panel4: TPanel
  369.       Left = 8
  370.       Top = 8
  371.       Width = 465
  372.       Height = 249
  373.       BevelOuter = bvNone
  374.       TabOrder = 1
  375.       object Label4: TLabel
  376.         Left = 8
  377.         Top = 8
  378.         Width = 55
  379.         Height = 13
  380.         Caption = 'N∩┐╜zev filmu'
  381.       end
  382.       object Label6: TLabel
  383.         Left = 8
  384.         Top = 56
  385.         Width = 22
  386.         Height = 13
  387.         Caption = 'Hraj∩┐╜'
  388.       end
  389.       object Label9: TLabel
  390.         Left = 8
  391.         Top = 104
  392.         Width = 22
  393.         Height = 13
  394.         Caption = '∩┐╜∩┐╜nr'
  395.       end
  396.       object Label15: TLabel
  397.         Left = 8
  398.         Top = 152
  399.         Width = 140
  400.         Height = 13
  401.         Caption = 'Index (po∩┐╜ad∩┐╜ filmu na kazet∩┐╜)'
  402.       end
  403.       object Label7: TLabel
  404.         Left = 8
  405.         Top = 200
  406.         Width = 49
  407.         Height = 13
  408.         Caption = 'Pozn∩┐╜mky'
  409.       end
  410.       object Label5: TLabel
  411.         Left = 152
  412.         Top = 104
  413.         Width = 52
  414.         Height = 13
  415.         Caption = 'D∩┐╜lka filmu'
  416.       end
  417.       object Label14: TLabel
  418.         Left = 280
  419.         Top = 122
  420.         Width = 31
  421.         Height = 16
  422.         Caption = 'minut'
  423.         Font.Charset = DEFAULT_CHARSET
  424.         Font.Color = clWindowText
  425.         Font.Height = -13
  426.         Font.Name = 'MS Sans Serif'
  427.         Font.Style = []
  428.         ParentFont = False
  429.       end
  430.       object Label8: TLabel
  431.         Left = 368
  432.         Top = 104
  433.         Width = 79
  434.         Height = 13
  435.         Caption = 'Form∩┐╜t nahr∩┐╜vky'
  436.       end
  437.       object DBEdit8: TDBEdit
  438.         Left = 8
  439.         Top = 24
  440.         Width = 441
  441.         Height = 21
  442.         DataField = 'Nazev_filmu'
  443.         DataSource = DM.DS2
  444.         TabOrder = 0
  445.       end
  446.       object DBEdit2: TDBEdit
  447.         Left = 8
  448.         Top = 72
  449.         Width = 441
  450.         Height = 21
  451.         DataField = 'Hraji'
  452.         DataSource = DM.DS2
  453.         TabOrder = 1
  454.       end
  455.       object DBEdit5: TDBEdit
  456.         Left = 8
  457.         Top = 120
  458.         Width = 129
  459.         Height = 21
  460.         DataField = 'Zanr'
  461.         DataSource = DM.DS2
  462.         TabOrder = 2
  463.       end
  464.       object cb1: TComboBox
  465.         Left = 8
  466.         Top = 120
  467.         Width = 129
  468.         Height = 21
  469.         ItemHeight = 13
  470.         Sorted = True
  471.         TabOrder = 3
  472.         Visible = False
  473.         OnExit = cb1Exit
  474.         Items.Strings = (
  475.           'a')
  476.       end
  477.       object DBEdit9: TDBEdit
  478.         Left = 8
  479.         Top = 168
  480.         Width = 121
  481.         Height = 21
  482.         DataField = 'Index_'
  483.         DataSource = DM.DS2
  484.         TabOrder = 6
  485.         OnEnter = DBEdit9Enter
  486.         OnKeyPress = DBEdit9KeyPress
  487.       end
  488.       object DBEdit3: TDBEdit
  489.         Left = 8
  490.         Top = 216
  491.         Width = 441
  492.         Height = 21
  493.         DataField = 'Poznamky'
  494.         DataSource = DM.DS2
  495.         TabOrder = 7
  496.       end
  497.       object DBEdit1: TDBEdit
  498.         Left = 152
  499.         Top = 120
  500.         Width = 121
  501.         Height = 21
  502.         DataField = 'Delka'
  503.         DataSource = DM.DS2
  504.         TabOrder = 4
  505.         OnKeyPress = DBEdit1KeyPress
  506.       end
  507.       object DBEdit4: TDBEdit
  508.         Left = 392
  509.         Top = 120
  510.         Width = 57
  511.         Height = 21
  512.         DataField = 'SP_LP'
  513.         DataSource = DM.DS2
  514.         TabOrder = 8
  515.       end
  516.       object cb2: TComboBox
  517.         Left = 392
  518.         Top = 120
  519.         Width = 57
  520.         Height = 21
  521.         ItemHeight = 13
  522.         TabOrder = 5
  523.         Text = 'SP'
  524.         Visible = False
  525.         OnExit = cb2Exit
  526.         Items.Strings = (
  527.           'SP'
  528.           'LP'
  529.           'EP')
  530.       end
  531.     end
  532.   end
  533.   object EditCislo_kazety: TDBEdit
  534.     Left = 424
  535.     Top = 0
  536.     Width = 121
  537.     Height = 21
  538.     DataField = 'Cislo_kazety'
  539.     DataSource = DM.DS1
  540.     TabOrder = 2
  541.     Visible = False
  542.   end
  543.   object EditPujcka: TDBEdit
  544.     Left = 560
  545.     Top = 8
  546.     Width = 121
  547.     Height = 21
  548.     DataField = 'Pujcka'
  549.     DataSource = DM.DS1
  550.     TabOrder = 3
  551.     Visible = False
  552.   end
  553. end
  554.