Chip 1998 February/CHIP_2_98.iso/software/share/news/wclock/wclocks.exe/0/RCDATA/TCLOCKFORM/TCLOCKFORM.txt

Text File | 1997-12-05 | 4KB | 184 lines

object ClockForm: TClockForm
  Left = 10
  Top = 447
  BorderIcons = []
  BorderStyle = bsNone
  Caption = 'World Clocks'
  ClientHeight = 86
  ClientWidth = 222
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  PopupMenu = PopupMenu
  Position = poScreenCenter
  ShowHint = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnKeyUp = FormKeyUp
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnMouseUp = FormMouseUp
  PixelsPerInch = 96
  TextHeight = 13
  object MainPanel: TPanel
    Left = 0
    Top = 0
    Width = 222
    Height = 86
    Align = alClient
    TabOrder = 0
    object Bevel2: TBevel
      Left = 1
      Top = 32
      Width = 220
      Height = 1
      Align = alTop
      Shape = bsTopLine
      Style = bsRaised
    end
    object TimePanel: TPanel
      Left = 1
      Top = 1
      Width = 220
      Height = 31
      Align = alTop
      BevelOuter = bvNone
      Color = cl3DDkShadow
      TabOrder = 0
      object TimeLabel: TLabel3D
        Left = 12
        Top = 0
        Width = 185
        Height = 31
        About.Strings = (
          'Component: TLabel3D'
          'Version: 1.2'
          'Author: Chirag Dalal'
          'Address:'
          '   6/54, Varma Nagar, Old Nagardas Road,'
          '   Andheri (East), Bombay - 400 069,'
          '   Maharashtra, India.'
          'E-mail: [e-mail]')
        Align = alLeft
        AutoSize = False
        BevelInner = bvNone
        BevelOuter = bvNone
        BorderStyle = bsNone
        BorderWidth = 0
        Caption = 'Label'
        Color = clCaptionText
        Font.Color = clCaptionText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
        OnMouseDown = FormMouseDown
        OnMouseMove = FormMouseMove
        OnMouseUp = FormMouseUp
      end
      object Bevel1: TBevel
        Left = 216
        Top = 0
        Width = 2
        Height = 31
        Shape = bsRightLine
        Style = bsRaised
      end
      object WindowPanel: TPanel
        Left = 0
        Top = 0
        Width = 12
        Height = 31
        Align = alLeft
        BevelOuter = bvNone
        Color = clActiveCaption
        TabOrder = 0
        OnMouseDown = FormMouseDown
        OnMouseMove = FormMouseMove
        OnMouseUp = FormMouseUp
      end
    end
    object InfoPanel: TPanel
      Left = 1
      Top = 33
      Width = 220
      Height = 52
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      object InfoLabel: TLabel3D
        Left = 0
        Top = 0
        Width = 220
        Height = 52
        About.Strings = (
          'Component: TLabel3D'
          'Version: 1.2'
          'Author: Chirag Dalal'
          'Address:'
          '   6/54, Varma Nagar, Old Nagardas Road,'
          '   Andheri (East), Bombay - 400 069,'
          '   Maharashtra, India.'
          'E-mail: [e-mail]')
        Align = alClient
        BevelInner = bvNone
        BevelOuter = bvNone
        BorderStyle = bsNone
        BorderWidth = 0
        ShowAccelChar = False
      end
    end
  end
  object PopupMenu: TPopupMenu
    Left = 64
    Top = 40
    object NewClock: TMenuItem
      Caption = '&New'
      ShortCut = 16462
      OnClick = NewClockClick
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object ConfigureClock: TMenuItem
      Caption = '&Configure...'
      ShortCut = 16451
      OnClick = ConfigureClockClick
    end
    object AboutWorldClocks: TMenuItem
      Caption = 'About...'
      ShortCut = 0
      OnClick = AboutWorldClocksClick
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object CloseClock: TMenuItem
      Caption = 'C&lose'
      ShortCut = 16499
      OnClick = CloseClockClick
    end
    object ExitWorldClocks: TMenuItem
      Caption = 'E&xit'
      ShortCut = 32883
      OnClick = ExitWorldClocksClick
    end
  end
  object ThreadedTimer: TThreadedTimer
    Enabled = False
    Interval = 200
    OnTimer = ThreadedTimerTimer
    ThreadPriority = tpNormal
    Left = 32
    Top = 40
  end
end