I have the following code that cuts the text I don't need from the amount of RAM in the system.
Quote:
function GetRamMemory: Integer;
var i: Integer;
s: String;
begin
s:=MbOrTb(RamInfo.TotalRam, 0);
for i:=length(s) downto 1 do
if not (s[i] in ['0','1','2','3','4','5','6','7','8','9']) then delete(s,i,1);
Result:=StrToInt(s);
end;
|
Is there a way around this by using some parameter in the FMX library to immediately remove the text from the RAM line in RamInfo.TotalRam?