steminfo(sysinfo);
label16.caption:=inttostr(sysinfo.dwProcessorType);
x:=getsystemmetrics(0);
y:=getsystemmetrics(1);
label17.caption:=inttostr(x)+''*''+inttostr(y);
globalmemorystatus(meminfo);
label11.caption:=inttostr(meminfo.dwTotalPhys)+''字节'';
label19.caption:=inttostr(meminfo.dwAvailPhys)+''字节'';
label12.caption:=inttostr(meminfo.dwTotalVirtual)+''字节'';
label13.caption:=inttostr(meminfo.dwAvailVirTual)+''字节'';
getdiskfreespace(''c:\'',c2,c3,c4,c5);
label14.caption:=inttostr(c5*c2*c3)+''字节'';
label15.caption:=inttostr(c4*c2*c3)+''字节'';
end;
end.

　

---- 以上程序在中文WINDOWS98，WINDOWS95，DEPHI 3.0软件环境下运行通过。