remindpopup.dfm

一个朋友写的delphi的漂亮时钟

object FmRemindPop: TFmRemindPop
  Left = 0
  Top = 0
  BorderStyle = bsNone
  Caption = 'FmRemindPop'
  ClientHeight = 117
  ClientWidth = 309
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnClick = pnl1Click
  OnClose = FormClose
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object lblTxt: TLabel
    Left = 24
    Top = 27
    Width = 26
    Height = 13
    AutoSize = False
    Caption = 'lblTxt'
    Transparent = True
    Layout = tlCenter
    WordWrap = True
    OnClick = lblTxtClick
    OnMouseEnter = lblTxtMouseEnter
    OnMouseLeave = lblTxtMouseLeave
  end
  object lblTitle: TLabel
    Left = 8
    Top = 8
    Width = 30
    Height = 13
    Caption = 'lblTitle'
    Transparent = True
    OnClick = pnl1Click
  end
  object tmrShow: TTimer
    Enabled = False
    Interval = 100
    OnTimer = tmrShowTimer
    Left = 104
    Top = 24
  end
  object tmrHide: TTimer
    Enabled = False
    Interval = 100
    OnTimer = tmrHideTimer
    Left = 160
    Top = 24
  end
  object tmrExit: TTimer
    Enabled = False
    OnTimer = tmrExitTimer
    Left = 224
    Top = 24
  end
end