Приветствую всех любителей AutoIt!
Подскажите пожалуйста как округлить до целого числа размер HDD
Допустим у меня hdd1 стоит 160Gb а скрипт выдает 150. Как это исправить? и возможно ли?
Заранее благодарен....
Подскажите пожалуйста как округлить до целого числа размер HDD
Код:
$oService = ObjGet('winmgmts:\\.\root\cimv2')
Dim $hard[1][2] = [[0]]
$Hdd = $oService.ExecQuery('SELECT Model, Size FROM Win32_DiskDrive')
If IsObj($oService) Then
If IsObj($Hdd) Then
For $Property In $Hdd
$hard[0][0] += 1
ReDim $hard[$hard[0][0] + 1][2]
$hard[$hard[0][0]][0] = $Property.Model ; Модель жеских дисков $hdd[0][0]
$hard[$hard[0][0]][1] = Round ($Property.Size / 1073741824, -1) ; Размер жеских дисков $hdd[0][1]
Next
EndIf
MsgBox (0, $hard[1][0], $hard[1][1])
EndIf
Допустим у меня hdd1 стоит 160Gb а скрипт выдает 150. Как это исправить? и возможно ли?
Заранее благодарен....