home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 January / Chip_2000-01_cd.bin / zkuste / Svatky / _SETUP.1 / Vyroci.exe / 0 / RCDATA / TDATEENTERFORM / TDATEENTERFORM.txt
Encoding:
Text File  |  1999-11-25  |  8.1 KB  |  287 lines

  1. object DateEnterForm: TDateEnterForm
  2.   Left = 261
  3.   Top = 194
  4.   BorderIcons = [biSystemMenu, biHelp]
  5.   BorderStyle = bsDialog
  6.   Caption = 'Vyberte datum'
  7.   ClientHeight = 233
  8.   ClientWidth = 283
  9.   Font.Charset = EASTEUROPE_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Position = poScreenCenter
  15.   OnCreate = FormCreate
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Calendar: TCalendar
  19.     Left = 0
  20.     Top = 33
  21.     Width = 200
  22.     Height = 200
  23.     HelpContext = 201
  24.     Align = alClient
  25.     Font.Charset = EASTEUROPE_CHARSET
  26.     Font.Color = clWindowText
  27.     Font.Height = -13
  28.     Font.Name = 'MS Sans Serif'
  29.     Font.Style = []
  30.     ParentFont = False
  31.     PopupMenu = PopupMenu
  32.     StartOfWeek = 1
  33.     TabOrder = 0
  34.     OnChange = CalendarChange
  35.     OnDblClick = CalendarDblClick
  36.   end
  37.   object TPanel
  38.     Left = 0
  39.     Top = 0
  40.     Width = 283
  41.     Height = 33
  42.     HelpContext = 200
  43.     Align = alTop
  44.     BevelOuter = bvNone
  45.     ParentShowHint = False
  46.     ShowHint = True
  47.     TabOrder = 1
  48.     object TPanel
  49.       Left = 0
  50.       Top = 0
  51.       Width = 58
  52.       Height = 33
  53.       HelpContext = 200
  54.       Align = alLeft
  55.       BevelOuter = bvNone
  56.       TabOrder = 0
  57.       object PriorDayBtn: TSpeedButton
  58.         Tag = -1
  59.         Left = 29
  60.         Top = 4
  61.         Width = 25
  62.         Height = 25
  63.         Hint = 'o 1 den zp∩┐╜t'
  64.         Flat = True
  65.         Glyph.Data = {
  66.           F6000000424DF600000000000000760000002800000010000000100000000100
  67.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  68.           80000080000000808000800000008000800080800000C0C0C000808080000000
  69.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000000
  70.           000DD88888888888880DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD8FFFFFFFFFF
  71.           F80DD8FFFFFF0FFFF80DD8FFFFF00FFFF80DD8FFFF000FFFF80DD8FFF0000FFF
  72.           F80DD8FFFF000FFFF80DD8FFFFF00FFFF80DD8FFFFFF0FFFF80DD8FFFFFFFFFF
  73.           F80DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD88888888888880D}
  74.         OnClick = DateBtnClick
  75.         OnMouseDown = DataBtnDown
  76.         OnMouseUp = DataBtnUp
  77.       end
  78.       object PriorMonthBtn: TSpeedButton
  79.         Tag = -2
  80.         Left = 4
  81.         Top = 4
  82.         Width = 25
  83.         Height = 25
  84.         Hint = 'o 1 m∩┐╜s∩┐╜c zp∩┐╜t'
  85.         Flat = True
  86.         Glyph.Data = {
  87.           F6000000424DF600000000000000760000002800000010000000100000000100
  88.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  89.           80000080000000808000800000008000800080800000C0C0C000808080000000
  90.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000000
  91.           000DD88888888888880DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD8FFFFFFFFFF
  92.           F80DD8FFFF0FFFF0F80DD8FFF00FFF00F80DD8FF000FF000F80DD8F0000F0000
  93.           F80DD8FF000FF000F80DD8FFF00FFF00F80DD8FFFF0FFFF0F80DD8FFFFFFFFFF
  94.           F80DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD88888888888880D}
  95.         OnClick = DateBtnClick
  96.         OnMouseDown = DataBtnDown
  97.         OnMouseUp = DataBtnUp
  98.       end
  99.     end
  100.     object TPanel
  101.       Left = 196
  102.       Top = 0
  103.       Width = 87
  104.       Height = 33
  105.       HelpContext = 200
  106.       Align = alRight
  107.       BevelOuter = bvNone
  108.       TabOrder = 1
  109.       object NextDayBtn: TSpeedButton
  110.         Tag = 1
  111.         Left = 4
  112.         Top = 4
  113.         Width = 25
  114.         Height = 25
  115.         Hint = 'o 1 den vp∩┐╜ed'
  116.         Flat = True
  117.         Glyph.Data = {
  118.           F6000000424DF600000000000000760000002800000010000000100000000100
  119.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  120.           80000080000000808000800000008000800080800000C0C0C000808080000000
  121.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000000
  122.           000DD88888888888880DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD8FFFFFFFFFF
  123.           F80DD8FFFF0FFFFFF80DD8FFFF00FFFFF80DD8FFFF000FFFF80DD8FFFF0000FF
  124.           F80DD8FFFF000FFFF80DD8FFFF00FFFFF80DD8FFFF0FFFFFF80DD8FFFFFFFFFF
  125.           F80DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD88888888888880D}
  126.         OnClick = DateBtnClick
  127.         OnMouseDown = DataBtnDown
  128.         OnMouseUp = DataBtnUp
  129.       end
  130.       object NextMonthBtn: TSpeedButton
  131.         Tag = 2
  132.         Left = 29
  133.         Top = 4
  134.         Width = 25
  135.         Height = 25
  136.         Hint = 'o 1 m∩┐╜s∩┐╜c vp∩┐╜ed'
  137.         Flat = True
  138.         Glyph.Data = {
  139.           F6000000424DF600000000000000760000002800000010000000100000000100
  140.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  141.           80000080000000808000800000008000800080800000C0C0C000808080000000
  142.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000000
  143.           000DD88888888888880DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD8FFFFFFFFFF
  144.           F80DD8F0FFFF0FFFF80DD8F00FFF00FFF80DD8F000FF000FF80DD8F0000F0000
  145.           F80DD8F000FF000FF80DD8F00FFF00FFF80DD8F0FFFF0FFFF80DD8FFFFFFFFFF
  146.           F80DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD88888888888880D}
  147.         OnClick = DateBtnClick
  148.         OnMouseDown = DataBtnDown
  149.         OnMouseUp = DataBtnUp
  150.       end
  151.       object TodayBtn: TSpeedButton
  152.         Left = 58
  153.         Top = 4
  154.         Width = 25
  155.         Height = 25
  156.         Hint = 'zp∩┐╜t na dne∩┐╜n∩┐╜ datum'
  157.         Flat = True
  158.         Glyph.Data = {
  159.           F6000000424DF600000000000000760000002800000010000000100000000100
  160.           04000000000080000000CE0E0000C40E00001000000000000000000000000000
  161.           80000080000000808000800000008000800080800000C0C0C000808080000000
  162.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D00000000000
  163.           000DD88888888888880DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD8FFFFFFFFFF
  164.           F80DD8F0FFFFFFF0F80DD8F00FFFFF00F80DD8F000FFF000F80DD8F0000F0000
  165.           F80DD8F000FFF000F80DD8F00FFFFF00F80DD8F0FFFFFFF0F80DD8FFFFFFFFFF
  166.           F80DD8FFFFFFFFFFF80DD8FFFFFFFFFFF80DD88888888888880D}
  167.         OnClick = DateBtnClick
  168.         OnMouseDown = DataBtnDown
  169.         OnMouseUp = DataBtnUp
  170.       end
  171.     end
  172.     object DatePanel: TPanel
  173.       Left = 58
  174.       Top = 0
  175.       Width = 138
  176.       Height = 33
  177.       HelpContext = 200
  178.       Align = alClient
  179.       BevelOuter = bvNone
  180.       TabOrder = 2
  181.     end
  182.   end
  183.   object TPanel
  184.     Left = 200
  185.     Top = 33
  186.     Width = 83
  187.     Height = 200
  188.     Align = alRight
  189.     BevelOuter = bvNone
  190.     TabOrder = 2
  191.     object TPanel
  192.       Left = 0
  193.       Top = 139
  194.       Width = 83
  195.       Height = 61
  196.       Align = alBottom
  197.       BevelOuter = bvNone
  198.       TabOrder = 0
  199.       object OkBtn: TButton
  200.         Left = 4
  201.         Top = 4
  202.         Width = 75
  203.         Height = 25
  204.         HelpContext = 202
  205.         Caption = 'OK'
  206.         Default = True
  207.         ModalResult = 1
  208.         TabOrder = 0
  209.       end
  210.       object CancelBtn: TButton
  211.         Left = 4
  212.         Top = 32
  213.         Width = 75
  214.         Height = 25
  215.         HelpContext = 203
  216.         Cancel = True
  217.         Caption = 'Storno'
  218.         ModalResult = 2
  219.         TabOrder = 1
  220.       end
  221.     end
  222.   end
  223.   object ButtonTimer: TTimer
  224.     Enabled = False
  225.     OnTimer = ButtonTimerTimer
  226.     Left = 228
  227.     Top = 48
  228.   end
  229.   object PopupMenu: TPopupMenu
  230.     Left = 228
  231.     Top = 100
  232.     object PriorYearItem: TMenuItem
  233.       Tag = -3
  234.       Caption = '-1 &rok'
  235.       ShortCut = 16417
  236.       OnClick = DateBtnClick
  237.     end
  238.     object PriorMonthItem: TMenuItem
  239.       Tag = -2
  240.       Caption = '-1 &m∩┐╜s∩┐╜c'
  241.       ShortCut = 33
  242.       OnClick = DateBtnClick
  243.     end
  244.     object PriorWeekItem: TMenuItem
  245.       Tag = -4
  246.       Caption = '-1 &t∩┐╜den'
  247.       ShortCut = 38
  248.       OnClick = DateBtnClick
  249.     end
  250.     object PriorDayItem: TMenuItem
  251.       Tag = -1
  252.       Caption = '&-1 den'
  253.       ShortCut = 37
  254.       OnClick = DateBtnClick
  255.     end
  256.     object TodayItem: TMenuItem
  257.       Caption = '&Dne∩┐╜n∩┐╜ datum'
  258.       ShortCut = 36
  259.       OnClick = DateBtnClick
  260.     end
  261.     object NextDayItem: TMenuItem
  262.       Tag = 1
  263.       Caption = '&+1 den'
  264.       ShortCut = 39
  265.       OnClick = DateBtnClick
  266.     end
  267.     object NextWeekItem: TMenuItem
  268.       Tag = 4
  269.       Caption = '+1 t∩┐╜de&n'
  270.       ShortCut = 40
  271.       OnClick = DateBtnClick
  272.     end
  273.     object NextMonthItem: TMenuItem
  274.       Tag = 2
  275.       Caption = '+1 m∩┐╜s∩┐╜&c'
  276.       ShortCut = 34
  277.       OnClick = DateBtnClick
  278.     end
  279.     object NextYearItem: TMenuItem
  280.       Tag = 3
  281.       Caption = '+1 ro&k'
  282.       ShortCut = 16418
  283.       OnClick = DateBtnClick
  284.     end
  285.   end
  286. end
  287.