我操作系统的 信息
ie 的版本信息
还有我怎样在delphi中调用另外一个应用程序
ie 的版本信息
还有我怎样在delphi中调用另外一个应用程序
解决方案 »
- Tbookmarklist的问题
- 对treeview控件如何使用代码添加第一个节点??望各位大大帮忙解决
- 本地数据库采用delphi+access开发,大家有何见意?
- 请问:为什么我做的VCL控件在“Standard”控件页中看不见?
- 关于ADOQuery1.LoadFromFile
- 如何在分线程里创建控件?
- Delphi题目
- 哪里有比较好的奥斯卡经典电影可以下载???
- 请问项目中使用了report builder,在分发程序的时候需要捆绑哪些文件?
- 一个问题,怎样在PC:PageControl上增加TabSheet…有人回答可还不行.
- 关于datetimepicker的问题,请高手帮忙~
- 大家生蛋快乐。
getsyseminfo();
shellexec();
SysInfo: TSYSTEMINFO;
Lbl_CPUName:Tlabel;
GetSystemInfo(SysInfo);//获得CPU信息
case SysInfo.dwProcessorType of
PROCESSOR_INTEL_386:Lbl_CPUName.Caption:=format('%d%s',[SysInfo.dwNumber Of Processors,'Intel80386']);
PROCESSOR_INTEL_486:Lbl_CPUName.Caption:=format('%d%s',[SysInfo.dwNumber Of Processors, 'Intel 80486']);
PROCESSOR_INTEL_PENTIUM:Lbl_CPUName.Caption:=format('%d%s',[SysInfo.dwNum
berOfProcessors, 'Intel Pentium']);
PROCESSOR_MIPS_R4000:Lbl_CPUName.Caption:=format('%d%s',[SysInfo.dwNumberOfProcessors, 'MIPS R4000']);
PROCESSOR_ALPHA_21064:Lbl_CPUName.Caption:=format('%d%s',[SysInfo.dwNumberOfProcessors, 'ALPHA 21064']);
end;//把CPU信息显示在Lbl_CPUName中。(
"open","notepad.exe", \\可执行程序
sFileName, \\可执行程序的参数,这里是要打开的文件名
NULL,SW_SHOWNORMAL); \\打开窗口的方式
LPCSTR lpCmdLine, // address of command line
UINT uCmdShow // window style for new application
);
这个也可以的