已阅读5页,还剩18页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Text;using System.Windows.Forms;namespace 时钟 public partial class Form1 : Form /指?针?坐?标 private static float hour_x = 0, hour_y = 0; private static float minute_x = 0, minute_y = 0; private static float second_x = 0, second_y = 0; private float radii = 200; /将?角?度转a成弧?度 2 * 3.1415926 / 360 = 0.01745329 const float radian = 0.01745329F; public Form1() InitializeComponent(); /指?定当窗口大小?改?变?时重?绘?整?个?窗口 this.SetStyle(ControlStyles.ResizeRedraw, true); private void Form1_Load(object sender, EventArgs e) /创建定时器对?象 Timer timer = new Timer(); /启?动定时器 timer.Start(); /设定定时器事?件t的?触发函数y timer.Tick += new EventHandler(TickEvent); /设定定时器的?间?隔?时间?为a 1000 毫秒? timer.Interval = 1000; protected override void OnPaint(PaintEventArgs e) base.OnPaint(e); /创建画-刷,?并设定画-刷的?颜?色? SolidBrush brush = new SolidBrush(Color.FromArgb(255, 0, 255); Pen pen = new Pen(Color.Black); /得?到?窗口长宽两?边?最?短的?一?边?,作为a圆2的?外a切D矩?形?的?边?长 radii = this.ClientRectangle.Width this.ClientRectangle.Height ? this.ClientRectangle.Width : this.ClientRectangle.Height; radii -= 10; /把?窗口的?原-点?移?到?新?坐?标 e.Graphics.TranslateTransform(this.ClientRectangle.Width / 2 - radii / 2, this.ClientRectangle.Height / 2 - radii / 2); /画-圆2 e.Graphics.DrawEllipse(pen, 0, 0, radii, radii); /时钟刻度坐?标 float x = 0.00F, y = 0.00F; /画-出?时钟的?刻度 for (float i = 0.00F; i 12 ? DateTime.Now.Hour - 12 : DateTime.Now.Hour; hour_x = (float)(radii2 - 70) * (float)Math.Sin(hour * 30 + DateTime.Now.Minute * (30f / 60f) * radian); hour_y = (float)(radii2 - 70) * (float)Math.Cos(hour * 30 + DateTime.Now.Minute * (30f / 60f) * radian); pen.Color = Color.FromArgb(0, 255, 0); g.DrawLine(pen, 0, 0, hour_x, -hour_y); /画-出?分?针? minute_x = (float)(radii2-30) * (float)Math.Sin(DateTime.Now.Minute * 6 * radian); minute_y = (float)(radii2-30) * (float)Math.Cos(DateTime.Now.Minute * 6 * radian); pen.Color = Color.FromArgb(0, 0, 255); g.DrawLine(pen, 0, 0, minute_x, -minute_y); /画-出?秒?针? second_x = (float)(radii2-8) * (float)Math.Sin(DateTime.Now.Second * 6 * radian); second_y = (float)(radii2-8) * (float)Math.Cos(DateTime.Now.Second * 6 * radian); pen.Color = Color.FromArgb(0, 255, 255); g.DrawLine(pen, 0, 0, second_x
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025安徽合肥市鼎信数智技术集团股份有限公司社会招聘补招3人备考题库完整答案详解
- 2025年滁州来安县城市基础设施开发有限公司选聘经理层管理人员1名备考题库附答案详解(达标题)
- 2026中再资产管理股份有限公司校园招聘备考题库附答案详解(典型题)
- 2025年合肥某国有企业派遣制人员招聘1人备考题库含答案详解(模拟题)
- 2025北京振远护卫有限公司招聘备考题库及答案详解(新)
- 2026国家移民管理局出入境管理信息技术研究所招聘备考题库附答案详解(满分必刷)
- 2025湖南省兵器工业集团股份有限公司市场化选聘湖南酷睿科技有限公司总经理(职业经理人)1人备考题库及答案详解(必刷)
- 2025年长白朝鲜族自治县长发城市发展集团有限公司公开招聘备考题库(9人)及一套完整答案详解
- 浙江国企招聘-中国长江三峡集团有限公司浙江分公司2025年社会招聘4人备考题库(第二批)及完整答案详解1套
- 社会实践:参观爱国主义教育基地观后感
- 巡察考试试题及答案
- QMD1590-TE IG100氮气灭火系统安装、使用、操作及维护说明书
- T/CECS 10386-2024排水工程微型顶管用高性能硬聚氯乙烯管及连接件
- 《先天性胆总管扩张》课件
- 员工物品退还协议书
- 学生心理健康一生一策档案表
- 线束组装流程
- 2025睿实消防自动跟踪定位射流灭火系统说明书
- 配电室维保方案
- 旅行社委托招徕合同
- 《欧洲文艺复兴设计》课件
评论
0/150
提交评论