DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: melqui
今日帖子: 14
在线用户: 25
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 emailx45 (emailx45) ▲▲▲▲△ -
普通会员
2022/1/3 11:32:34
标题:
Easy way to test your CPUs using Threads: TTask(), TParallel.For 浏览:2214
加入我的收藏
楼主: ...
implementation
...
uses
  System.Diagnostics,
  System.Threading;
....
// Timer "interval = 10"

procedure TForm2.Timer1Timer(Sender: TObject);
begin
  if (ProgressBar1.Position + 1) > ProgressBar1.Max then
    ProgressBar1.Position := 0;
  //
  ProgressBar1.Position := ProgressBar1.Position + 1;
end;


procedure TForm2.Button2Click(Sender: TObject);
var
  MyTotal    : integer;
  MyStopWatch: tstopwatch;
begin
  Button2.Enabled := false; // avoid repeated clicks...
  //
  MyTotal     := 0;
  MyStopWatch := tstopwatch.StartNew;
  TTask.Run(
    procedure
    var
      MyTmpZ: integer;
    begin
      tparallel.For(1, 1000, { }
        procedure(i: int64)
        var
          MyTmpX: integer;
        begin
          for MyTmpX := 0 to 100000000 do; // 100.000.000 iterations for simulating a long-time of processing... OMG my CPU go to 100% or more... :)
          //
          InterlockedIncrement(MyTotal);
          MyTmpZ := MyTmpX;
      end);
      //
      MyStopWatch.Stop;
      //
      Label1.Caption := MyTmpZ.ToString + ' -> ' + MyTotal.ToString + ' in ' + MyStopWatch.Elapsed.Duration.ToString;
      //
      Button2.Enabled := true;
    end);
end;
此帖子包含附件:
PNG 图像
大小:160.1K
----------------------------------------------
The higher the degree, the greater the respect given to the humblest!RAD 11.3
作者:
男 supersk (supersk) ★☆☆☆☆ -
盒子活跃会员
2022/1/5 8:25:38
1楼: 按此在新窗口浏览图片
----------------------------------------------
-
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/5 13:39:00
2楼: 楼主用的是8年前的英特尔桌面高端处理器i7 4770K四核八线程/三级缓存8MB,可以安装Windows XP/7/8/8.1/10/11系统,那是相当的不错。综合性能和现在的i3 10100(F)/i3 10105(F)四核八线程差不多。但是性能和即将上市的英特尔12代酷睿桌面处理器i3 12100四核八线程/三级缓存12MB相差甚远了!从2011年开始到2017年,英特尔不断的挤牙膏,不断的换插槽,性能却提升不了多少,从2017年之后竞争对手AMD才重新崛起,推出了性能比不错的Ryzen系列桌面处理器,这才让英特尔慌了,8代i3迅速升级成四核四线程,到了10代i3立马就是四核八线程,12代i3改进了工艺,三级缓存翻倍了达到12MB,单核性能和多核性能提升很大。
此帖子包含附件:
PNG 图像
大小:33.1K
----------------------------------------------
-
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/5 13:49:07
3楼: i3 10100四核八线程/三级缓存6MB
此帖子包含附件:
PNG 图像
大小:39.5K
----------------------------------------------
-
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/5 13:53:24
4楼: i3 10105F四核八线程/三级缓存6MB
此帖子包含附件:
PNG 图像
大小:35.4K
----------------------------------------------
-
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/5 13:58:52
5楼: i3 12100四核八线程/三级缓存12MB
此帖子包含附件:
PNG 图像
大小:140.1K
----------------------------------------------
-
作者:
男 adongtan (aaabbb) ▲▲▲▲▲ -
普通会员
2022/1/5 14:18:50
6楼: 看看我的最威武~~~
此帖子包含附件:
PNG 图像
大小:29.4K
----------------------------------------------
-
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/6 9:39:56
7楼: @adongtan
你用凌动处理器D525做软件开发?(─.─||)
----------------------------------------------
-
作者:
男 emailx45 (emailx45) ▲▲▲▲△ -
普通会员
2022/1/6 21:49:33
8楼: 各位同事,您好
这是我目前的电脑,所以它是我目前唯一的电脑。 它是2014年组装的,我今天还在用。
i7 4770K、海盗船 16GB 内存(双通道)、华硕 Sabertooth Z87、120GB 海盗船 SSD。
----------------------------------------------
The higher the degree, the greater the respect given to the humblest!RAD 11.3
作者:
男 yxsoft (yxsoft) ★☆☆☆☆ -
盒子活跃会员
2022/1/6 23:28:32
9楼: 看看我的
此帖子包含附件:
PNG 图像
大小:36.0K
----------------------------------------------
Great!
作者:
男 merced (merced) ★☆☆☆☆ -
普通会员
2022/1/7 9:38:37
10楼: to rtcode:
i7 4770K的电脑上如果不对安装iso动些手脚的话是不能装Windows 11的,会被拦在硬件检测环节
----------------------------------------------
-
作者:
男 adongtan (aaabbb) ▲▲▲▲▲ -
普通会员
2022/1/7 14:08:34
11楼: 安装WINDOWS11直接提取esd安装啊。I3 4130都跑得很欢~~~
----------------------------------------------
-
作者:
男 fb4819 (方明) ★☆☆☆☆ -
盒子活跃会员
2022/1/8 20:46:26
12楼: 刚从i5-2300换到i7-12700KF,Delphi感觉提升不大,android studio编译速度快了贼多
此帖子包含附件:
PNG 图像
大小:25.7K
----------------------------------------------
vvvvvvvvvv
作者:
男 ken0137 (顺眼即佛) ★☆☆☆☆ -
普通会员
2022/1/9 9:44:36
13楼: emailx45
你厉害的,我这台电脑是2013年的组装机,用的是差不多的4770用的,而且还不是拿来做开发的,只是家用,今年开始陆续挂了CPU和内存,这两样看起来最不容易坏的东西,实在是背
此帖子包含附件:
JPEG 图像
大小:118.4K
----------------------------------------------
只会简单使用,并未精通深入
作者:
男 vkow (vkow) ★☆☆☆☆ -
普通会员
2022/1/9 10:38:50
14楼: @ken0137 (顺眼即佛)
你把CPU用坏的?牛。
----------------------------------------------
-
作者:
男 keymark (嬲) ▲▲▲△△ -
普通会员
2022/1/9 11:25:27
15楼: 主板有问题吧?还是(清灰)拆坏了?
也有可能是rp爆发
----------------------------------------------
[alias]  co = clone --recurse-submodules  up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/>http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
男 rtcode (rtcode) ▲▲△△△ -
普通会员
2022/1/9 12:22:43
16楼: 12代酷睿桌面处理器要比10代、11代的贵好几百呢,不过性能确实很强。不着急的话,还是等下半年的13代酷睿桌面处理器吧。
----------------------------------------------
-
作者:
男 ddrfan (若苗瞬) ▲▲▲▲▲ -
普通会员
2022/1/10 0:12:00
17楼: 凑个热闹……
应该是2019年升级的家里台式电脑。
此帖子包含附件:
PNG 图像
大小:165.3K
----------------------------------------------
Bye bye DDRFAN...
作者:
男 ddrfan (若苗瞬) ▲▲▲▲▲ -
普通会员
2022/1/10 0:22:03
18楼: i9-9900k ES(最后一个修订吧?),反正我没发现运算错误。
16GB x 4 @2666 忘了牌子内存。
ASRock B365M Pro4(可能是这个名字)
WD SN750 512GB(SSD) + 2TB Toshiba(HDD) + 4TB WD(HDD)
NV2060S->3060(12GB)很魔幻的还赚了200元。运行机器学习类只稍快了一点。
其它配件应该不重要了。。。
----------------------------------------------
Bye bye DDRFAN...
作者:
男 ken0137 (顺眼即佛) ★☆☆☆☆ -
普通会员
2022/1/10 9:07:12
19楼: @keymark @vkow
修电脑的说是给换了个CPU就能正常启动了,后面换了E3
内存也是半年后出现了一样的情况,
现在证明那个时候微星的主板真是好,到现在还没有一点问题
~~~~~~~~~~
家用电脑凑合用用没事的,单位电脑还是要用好点的,还要经常换新的
此帖子包含附件:
JPEG 图像
大小:79.8K
----------------------------------------------
只会简单使用,并未精通深入
作者:
男 keymark (嬲) ▲▲▲△△ -
普通会员
2022/1/10 10:39:45
20楼: 这个主板坏两次 内存  看上去主板没事 实际是个有坑的主板
违背了供电 参数就会烧元件芯片
电学里电压U(单位V),电功率P(单位W),电流I(单位A)的关系是:P=UI
1瓦=1伏特×1安培(1W=1V×1A)
P=U·I。对于纯电阻电路,计算电功率还可以用公式P=I^2*R和P=U^2 /R。(R指电阻,单位欧姆)。

----------------------------------------------
[alias]  co = clone --recurse-submodules  up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/>http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行863.2813毫秒 RSS