Delphi 10.3版本获取windows系统版本和CPU信息


本文整理自网络,侵删。

 Delphi 10.3版本获取windows系统版本和CPU信息

procedure TForm1.Button1Click(Sender: TObject);
var
 mm:TRegistry;
 cpu:string;
begin
   mm:=TRegistry.Create;
   with mm do
   begin
     RootKey:=HKEY_LOCAL_MACHINE;
     if OpenKeyReadOnly('\Hardware\Description\System\CentralProcessor\0') then
     begin
      cpu := ReadString('ProcessorNameString');
      Memo1.Lines.Add('处理器:'+cpu);
    end;
   end;
   Memo1.Lines.Add('系统版本:'+TOSVersion.ToString);
end;

需要引用 System.Win.Registry单元

相关阅读 >>

Delphi字符串拆分(字符数限制)

Delphi创建桌面快捷方式及锁定任务栏等功能

Delphi richedit的内容保存为图片

Delphi 通得进程id获取主窗口句柄

Delphi 打造mygetprocaddress函数(Delphi源码)

Delphi 返回整数的四种情况

Delphi 2010/xe下隐藏程序在系统任务栏的图标

Delphi 判断一个数组的长度用 length 还是 sizeof ?

Delphi winapi: extracticon - 获取 exe、dll 或 ico 文件中的图标

Delphi twebbrowser也能响应回车键

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...