home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / tenpack.lzh / ALRMDEMO.DFM / ALRMDEMO.txt next >
Text File  |  1995-05-18  |  3KB  |  94 lines
  1. object DemoAlarm: TDemoAlarm
  2.   Left = 178
  3.   Top = 144
  4.   BorderStyle = bsSingle
  5.   Caption = 'Alarm Component'
  6.   ClientHeight = 273
  7.   ClientWidth = 427
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Icon.Data = {<image000.ico>}
  13.   PixelsPerInch = 96
  14.   Position = poScreenCenter
  15.   Visible = True
  16.   TextHeight = 16
  17.   object Label1: TLabel
  18.     Left = 64
  19.     Top = 61
  20.     Width = 79
  21.     Height = 16
  22.     Caption = 'Set Alarm for:'
  23.     Font.Color = clBlack
  24.     Font.Height = -13
  25.     Font.Name = 'MS Sans Serif'
  26.     Font.Style = []
  27.     ParentFont = False
  28.   end
  29.   object Label4: TLabel
  30.     Left = 120
  31.     Top = 167
  32.     Width = 252
  33.     Height = 79
  34.     AutoSize = False
  35.     Caption = 
  36.       'Get your users'#39' attention with the Alarm component.  Just set th' +
  37.       'e Alarmtime property to the desired time, call the SetAlarm meth' +
  38.       'od and your done.  The alarm '#39'goes off'#39' by triggering the AlarmN' +
  39.       'otify event.  '
  40.     Font.Color = clBlack
  41.     Font.Height = -11
  42.     Font.Name = 'MS Sans Serif'
  43.     Font.Style = [fsBold]
  44.     ParentFont = False
  45.   end
  46.   object BitBtn1: TBitBtn
  47.     Left = 167
  48.     Top = 86
  49.     Width = 89
  50.     Height = 71
  51.     Caption = '&Set Alarm'
  52.     Font.Color = clBlack
  53.     Font.Height = -13
  54.     Font.Name = 'MS Sans Serif'
  55.     Font.Style = []
  56.     ParentFont = False
  57.     TabOrder = 0
  58.     OnClick = BitBtn1Click
  59.     Glyph.Data = {
  60.       78010000424D7801000000000000760000002800000020000000100000000100
  61.       04000000000000000000120B0000120B00000000000000000000000000000000
  62.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  63.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
  64.       00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
  65.       0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
  66.       903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
  67.       9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
  68.       03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
  69.       77037F3377777773337F088887707888870373F3337773F33373307880707088
  70.       7033373FF737F73FF733337003303300733333777337FF777333333333000333
  71.       33333333337773333333333333333333333333333333333333330000}
  72.     NumGlyphs = 2
  73.   end
  74.   object Edit1: TEdit
  75.     Left = 152
  76.     Top = 57
  77.     Width = 121
  78.     Height = 24
  79.     Font.Color = clBlack
  80.     Font.Height = -13
  81.     Font.Name = 'MS Sans Serif'
  82.     Font.Style = []
  83.     ParentFont = False
  84.     TabOrder = 1
  85.   end
  86.   object Alarm1: TAlarm
  87.     Enabled = False
  88.     Interval = 0
  89.     OnAlarmNotify = Alarm1AlarmNotify
  90.     Left = 95
  91.     Top = 25
  92.   end
  93. end
  94.