home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / tenpack.lzh / PCAL.DFM / PCAL.txt
Encoding:
Text File  |  1995-09-30  |  5.6 KB  |  165 lines
  1. object popup: Tpopup
  2.   Left = 241
  3.   Top = 103
  4.   BorderIcons = []
  5.   BorderStyle = bsDialog
  6.   Caption = 'Select a Date'
  7.   ClientHeight = 154
  8.   ClientWidth = 129
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Serif'
  12.   Font.Style = []
  13.   KeyPreview = True
  14.   PixelsPerInch = 96
  15.   OnKeyUp = FormKeyUp
  16.   OnShow = FormShow
  17.   TextHeight = 13
  18.   object SpeedButton1: TSpeedButton
  19.     Left = 0
  20.     Top = 1
  21.     Width = 19
  22.     Height = 21
  23.     Glyph.Data = {
  24.       78010000424D7801000000000000760000002800000020000000100000000100
  25.       04000000000000000000120B0000120B00000000000000000000000000000000
  26.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  27.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  28.       3333333333333333333333333333333333333333333333333333333333333333
  29.       3333333333333FF3333333333333003333333333333F77F33333333333009033
  30.       333333333F7737F333333333009990333333333F773337FFFFFF330099999000
  31.       00003F773333377777770099999999999990773FF33333FFFFF7330099999000
  32.       000033773FF33777777733330099903333333333773FF7F33333333333009033
  33.       33333333337737F3333333333333003333333333333377333333333333333333
  34.       3333333333333333333333333333333333333333333333333333333333333333
  35.       33333333333333333333333333333333333333333333333333330000}
  36.     Layout = blGlyphRight
  37.     NumGlyphs = 2
  38.     OnClick = SpeedButton1Click
  39.   end
  40.   object SpeedButton2: TSpeedButton
  41.     Left = 110
  42.     Top = 1
  43.     Width = 19
  44.     Height = 21
  45.     Glyph.Data = {
  46.       78010000424D7801000000000000760000002800000020000000100000000100
  47.       04000000000000000000120B0000120B00000000000000000000000000000000
  48.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  49.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  50.       3333333333333333333333333333333333333333333333333333333333333333
  51.       3333333333333333333333333333333333333333333FF3333333333333003333
  52.       3333333333773FF3333333333309003333333333337F773FF333333333099900
  53.       33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
  54.       99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
  55.       33333333337F3F77333333333309003333333333337F77333333333333003333
  56.       3333333333773333333333333333333333333333333333333333333333333333
  57.       33333333333333333333333333333333333333333333333333330000}
  58.     NumGlyphs = 2
  59.     OnClick = SpeedButton2Click
  60.   end
  61.   object SpeedButton3: TSpeedButton
  62.     Left = 0
  63.     Top = 21
  64.     Width = 19
  65.     Height = 21
  66.     Glyph.Data = {
  67.       78010000424D7801000000000000760000002800000020000000100000000100
  68.       04000000000000000000120B0000120B00000000000000000000000000000000
  69.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  70.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  71.       3333333333333333333333333333333333333333333333333333333333333333
  72.       3333333333333FF3333333333333003333333333333F77F33333333333009033
  73.       333333333F7737F333333333009990333333333F773337FFFFFF330099999000
  74.       00003F773333377777770099999999999990773FF33333FFFFF7330099999000
  75.       000033773FF33777777733330099903333333333773FF7F33333333333009033
  76.       33333333337737F3333333333333003333333333333377333333333333333333
  77.       3333333333333333333333333333333333333333333333333333333333333333
  78.       33333333333333333333333333333333333333333333333333330000}
  79.     NumGlyphs = 2
  80.     OnClick = SpeedButton3Click
  81.   end
  82.   object SpeedButton4: TSpeedButton
  83.     Left = 110
  84.     Top = 21
  85.     Width = 19
  86.     Height = 21
  87.     Glyph.Data = {
  88.       78010000424D7801000000000000760000002800000020000000100000000100
  89.       04000000000000000000120B0000120B00000000000000000000000000000000
  90.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  91.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  92.       3333333333333333333333333333333333333333333333333333333333333333
  93.       3333333333333333333333333333333333333333333FF3333333333333003333
  94.       3333333333773FF3333333333309003333333333337F773FF333333333099900
  95.       33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
  96.       99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
  97.       33333333337F3F77333333333309003333333333337F77333333333333003333
  98.       3333333333773333333333333333333333333333333333333333333333333333
  99.       33333333333333333333333333333333333333333333333333330000}
  100.     NumGlyphs = 2
  101.     OnClick = SpeedButton4Click
  102.   end
  103.   object Panel1: TPanel
  104.     Left = 19
  105.     Top = 1
  106.     Width = 92
  107.     Height = 21
  108.     BevelInner = bvRaised
  109.     BevelOuter = bvNone
  110.     BorderStyle = bsSingle
  111.     Caption = 'Panel1'
  112.     Color = clInactiveCaption
  113.     Ctl3D = True
  114.     Font.Color = clMaroon
  115.     Font.Height = -11
  116.     Font.Name = 'MS Serif'
  117.     Font.Style = [fsBold]
  118.     ParentCtl3D = False
  119.     ParentFont = False
  120.     TabOrder = 0
  121.   end
  122.   object Panel2: TPanel
  123.     Left = 19
  124.     Top = 21
  125.     Width = 92
  126.     Height = 21
  127.     BevelInner = bvRaised
  128.     BevelOuter = bvNone
  129.     BorderStyle = bsSingle
  130.     Caption = 'Panel1'
  131.     Color = clInactiveCaption
  132.     Ctl3D = True
  133.     Font.Color = clMaroon
  134.     Font.Height = -11
  135.     Font.Name = 'MS Serif'
  136.     Font.Style = [fsBold]
  137.     ParentCtl3D = False
  138.     ParentFont = False
  139.     TabOrder = 1
  140.   end
  141.   object StringGrid1: TStringGrid
  142.     Left = 1
  143.     Top = 41
  144.     Width = 128
  145.     Height = 114
  146.     Color = clBtnFace
  147.     ColCount = 7
  148.     DefaultColWidth = 17
  149.     DefaultRowHeight = 15
  150.     FixedColor = clInactiveBorder
  151.     FixedCols = 0
  152.     Font.Color = clBlack
  153.     Font.Height = -9
  154.     Font.Name = 'MS Serif'
  155.     Font.Style = [fsBold]
  156.     ParentFont = False
  157.     RowCount = 7
  158.     ScrollBars = ssNone
  159.     TabOrder = 2
  160.     OnClick = StringGrid1Click
  161.     OnMouseUp = StringGrid1MouseUp
  162.     OnSelectCell = StringGrid1SelectCell
  163.   end
  164. end
  165.