d (lpDisplayDevice. DeviceString);;:=memo2 . Lines; (tmp);
Лістинг 2.2.1
Інформація про дату BIOS виходить за допомогою процедури наведеному в лістингу 2.2.2
procedure TForm1.BIOSInfo (OS: string); p: pointer;: string [255]; OS=«NT» then begin with TRegistry. Create doRootKey:=HKEY_LOCAL_MACHINE; OpenKeyReadOnly
(«HARDWARE DESCRIPTION System») BIS. Caption:=(«SystemBiosDate») Free;; try [0]:=# 8;:=Pointer ($ 0FFFF5); (p ^, s [1], 8);. Caption:=(s, 1,2) + «/» + Copy (s, 4,2) + «/» + Copy (s, 7,2); BIS. Caption:=«XX.XX.XXXX»;
end;;
лістинг 2.2.2
У лістингу 2.2.3 приведений код отримання основної інформації про комп'ютер: імені комп'ютера, імені користувача, типі процесора.
procedure TForm1. InfopC; Size: cardinal;: PChar;: boolean;: TSystemInfo;:=MAX_COMPUTERNAME_LENGTH + 1;:=StrAlloc (Size);:=GetComputerName (PRes, Size); BRes then NamePC. Caption:=StrPas (PRes);:=MAX_COMPUTERNAME_LENGTH + 1;:=StrAlloc (Size);:=GetUserName (PRes, Size); BRes then NameUser. Caption:=StrPas (PRes); (lpSystemInfo);. Caption:=«класу x» + IntToStr
(lpSystemInfo.dwProcessorType);
end;
лістинг 2.2.3
програма процесор збір система
Вся отримана інформація оновлюється за допомогою компонента Timer з часом в 1 сек. Після отримані значення присвоюються Label ам і виводяться на форму.
Висновок
В даний час комп'ютери впроваджуються в усі галузі людської діяльності. Вони допомагають автоматизувати процеси, на виконання яких потрібно багато часу.
Даний курсовий проект є актуальним і відповідає пред'явленим до нього вимогам. Була розроблена і написана, мовою програмування високого рівня Borland Delphi 7 програма, що дозволяє здійснити перегляд відомостей про ресурси системи персонального комп'ютера.
Інтерфейс розробленої програми сумісний з Windows-інтерфейсом завдяки тому, що програма, в якій розроблялася курсова робота, - Delphi 7 - надає таку можливість і підтримує саме Windows - інтерфейс. Всі пункти курсового завдання були виконані, розроблене програмне засіб виконує поставлене перед ним завдання.
Звичайно, розроблена програма не планує конкурувати з програмами, які вже досить давно полегшили нам завдання з'ясування необхідних параметрів комп'ютера, не витрачаючи на це зайвого часу, приклад такої програми прекрасно демонструє SiSoftware Sandra.
Удосконалення подібних програм відкриває перед нами безліч можливостей, з кожним днем ??комп'ютерна галузь продовжує розвиватися, і будь-яке зведення про систему не залишиться непоміченим.
