windows获取时间-提取电脑系统时间
1.Delphi中提取系统时间的函数
2.求PC On&Off Time(系统运行时间统计) V3.1 绿色英文版网盘
3.C# 如何写代码提取电脑开机时间
4.VB编程求助:制作一个提取系统时间并正确走时的时钟
5.c++ 提取系统时间 问题
Delphi中提取系统时间的函数
一般用Now函数
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := TimeToStr(Now); //时间
Label2.Caption := DateToStr(Now); //日期
Label3.Caption := DateTimeToStr(Now); //日期+时间
end;
其他一些有用的时间函数
use DateUtils;(此单元里有许多关于时间的函数)。我今天就只看了这么多了,还有许多读自己去看吧。
里面有太多的关于时间的函数了,如:输入一个时间,可以提取date或time部分,此月有多少天,比较两个时间的’大小’,…..自己看帮助。
function CompareDate(const A, B: TDateTime): TValueRelationship;比较A,B日期哪个时间先发生?还是同时发生?
function CompareDateTime(const A, B: TDateTime): TValueRelationship
function DaysBetween(const ANow, AThen: TDateTime): Integer;两时间相隔多少天?
function DaysInAMonth(const AYear, AMonth: Word): Word;某年某月有多少天
function DaysInAYear(const AYear: Word): Word;某年有多少天。
function DaysInMonth(const AValue: TDateTime): Word;某月有多少天
procedure DecodeDateMonthWeek(const AValue: TDateTime; out AYear, AMonth, AWeekOfMonth, ADayOfWeek: Word);对应out参数:哪年,哪月,此月的第几周,是周几。
function EncodeDateDay(const AYear, ADayOfYear: Word): TDateTime;输入某年,此年第几天,out得到此天日期。
DayOfWeek(TDateTime)某个时间是星期几?
DayOfTheYear(TDateTime)一年的第几天。
function DayOfTheMonth(const AValue: TDateTime): Word;第几天of the Month.
function DateOf(const AValue: TDateTime): TDateTime;提取时间部分
这个方法可以完成你的要求。用法可见帮助示例。
procedure DecodeDateTime(const AValue: TDateTime; out AYear, AMonth, ADay,
AHour, AMinute, ASecond, AMilliSecond: Word); (注它必须引用DateUtils单元);
它把时间的各个部分都分离出来了。与之对应的函数为:
function EncodeDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word):TDateTime;
function IncMinute (const AValue: TDateTime; const ANumberOfMinute: Int64 = 1): TDateTime;
例:IncMinute(now,N);增加N分钟在NOW的基础上。可以为负。
求PC On&Off Time(系统运行时间统计) V3.1 绿色英文版网盘
链接:
提取码:ryfs?
软件名称:PCOn&OffTime(系统运行时间统计)V3.1绿色英文版
语言:简体中文
大小:347.35KB
类别:系统工具
介绍:PCOn/OffTime是款简单实用的电脑系统运行时间统计工具,它可以帮助用户记录下电脑系统或者虚拟机系统的运行时间,能够告诉你3周内电脑开关机的时间,并且你无需天天开着它进行统计,因为运行后立刻能够看到,软件界面简洁,操作简单,非常方便。
C# 如何写代码提取电脑开机时间
private void button1_Click(object sender, EventArgs e)
{
int hm = System.Environment.TickCount;
double h = hm / 3600000.0;
double m =double.Parse("0."+h.ToString("F6").Substring(h.ToString().IndexOf(".")+1))*60;
double s = double.Parse("0." + m.ToString("F6").Substring(m.ToString().IndexOf(".") + 1)) * 60;
string h1 = ((int)h).ToString();
string m1 = ((int)m).ToString();
string s1 = ((int)s).ToString();
if ((int)h < 10) h1 = "0"+h1;
if ((int)m < 10) m1 = "0"+m1;
if ((int)s < 10) s1 = "0"+s1;
string nowtime = DateTime.Now.TimeOfDay.ToString().Substring(0,8);
string span = h1 + ":" + m1 + ":" + s1;
TimeSpan spantime = Convert.ToDateTime(nowtime).Suract(Convert.ToDateTime(span));
MessageBox.Show("您的开机时间是: "+spantime.ToString());
}
给分吧,用了我一个多小时才写出来,嘿嘿
VB编程求助:制作一个提取系统时间并正确走时的时钟
Private
Sub
Timer1_Timer()
miao
=
Second(Time)
+
1
miao
=
61
-
miao
fen
=
Minute(Time)
fen
=
60
-
fen
shi
=
Hour(Time)
If
shi
>=
12
Then
shi
=
shi
-
12
'因为一天之内时针要走二十四个钟头,也就是要走两圈,所以将下午和晚上的时间减去十二,就可以确定时针准确的位置
shi
=
(12
-
shi
-
(1
-
fen
/
59))
*
5
Cls
Dim
a
a
=
Form1.ScaleHeight
/
2
Form1.Width
=
Form1.ScaleHeight
+
150
'画刻度
Form1.Circle
(Form1.ScaleHeight
/
2,
a),
a
-
a
*
0.02
Form1.Circle
(Form1.ScaleHeight
/
2,
a),
a
*
0.03
Dim
x
As
Double
Dim
y
As
Double
For
i
=
0
To
60
x
=
(1
-
Sin(i
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.05)
+
a
*
0.05
y
=
(1
-
Cos(i
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.05)
+
a
*
0.05
X1
=
(1
-
Sin(i
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.07)
+
a
*
0.07
Y1
=
(1
-
Cos(i
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.07)
+
a
*
0.07
Line
(x,
y)-(X1,
Y1),
QBColor(3)
Next
i
For
i
=
0
To
11
x
=
(1
-
Sin(i
/
12
*
2
*
3.1415926))
*
(a
-
a
*
0.05)
+
a
*
0.05
y
=
(1
-
Cos(i
/
12
*
2
*
3.1415926))
*
(a
-
a
*
0.05)
+
a
*
0.05
X1
=
(1
-
Sin(i
/
12
*
2
*
3.1415926))
*
(a
-
a
*
0.1)
+
a
*
0.1
Y1
=
(1
-
Cos(i
/
12
*
2
*
3.1415926))
*
(a
-
a
*
0.1)
+
a
*
0.1
Line
(x,
y)-(X1,
Y1),
QBColor(1)
Next
i
'画秒针的线
x
=
(1
-
Sin(miao
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.1)
+
a
*
0.1
y
=
(1
-
Cos(miao
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.1)
+
a
*
0.1
Line
(a,
a)-(x,
y),
QBColor(12)
'画介针的线
x
=
(1
-
Sin(fen
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.2)
+
a
*
0.2
y
=
(1
-
Cos(fen
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.2)
+
a
*
0.2
Line
(a,
a)-(x,
y),
QBColor(5)
'画时针的线
x
=
(1
-
Sin((shi)
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.3)
+
a
*
0.3
y
=
(1
-
Cos((shi)
/
60
*
2
*
3.1415926))
*
(a
-
a
*
0.3)
+
a
*
0.3
Line
(a,
a)-(x,
y),
QBColor(6)
End
Sub
这是写给你的代码,添加个时钟控件,设置好Interval,把代码粘贴进去就可以了。
c++ 提取系统时间 问题
asctime()将参数timeptr所指的tm结构中的信息转换成真实世界所使用的时间日期表示方法,然后将结果以字符串形态返回。此函数已经由时区转换成当地时间,字符串格式为:"Wed Jan 30 21:49:08 1993\n"(这个格式看你当地的设置)
就是说函数将timeptr变成char后,里面存的东西有一定格式。然后你再处理进行字符串解析。你可以通过debug把asctime()返回的char[23]看看里面各是什么值,看了就知道为什么要那么操作了。23不是24小时,是返回的char长度。4 5 6分别是数组下标,通过下标获取每个位置代表的东西。那个公式你看了char[23]里的东西后看看第8 9位置分别表示的什么。而且这不叫公式,别人的代码处理而已。自己设计的,这里应该是判断年份。J很明显是一月的意思。Jan是一月份的简称。他截取出那个表示月份的字符,然后进行比较,判断是几月。而4位置是J,5位置是a,表示一月(January),4是J,5是u,6是n,则表示June六月(June),如果不是,就只可能是七月Jul(July)。此外,5月May,3月March也要额外判断。4月April和八月August要一起判断,其他的2月February,9 September,10 October,11 November,12 December,直接判断第一个字母。
天啊。累死我了。经常听过加悬赏。 从没见过。
声明:本站所有文章资源内容,如无特殊说明或标注,均为采集网络资源。如若本站内容侵犯了原著者的合法权益,可联系本站删除。