基于delphi7的闹钟系统 object frmMain: TfrmMain Left = 394 Top = 429 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'frmMain' ClientHeight = 203 ClientWidth = 544 Color = clBtnFace Font.Charset = GREEK_CHARSET Font.Color = clWindowText Font.Height = -11 Fon