Hallo zusammen,
wieso entsteht aus einer Rechnung mit zwei Single Variablen ein Extended?
Delphi-Quellcode:
uses
.., System.Math, System.Rtti;
..
var
lSingle1: Single;
lSingle2: Single;
lInteger: Integer;
lValue: TValue;
begin
lSingle1 := 13.5;
lSingle2 := 0.9;
lInteger := Ceil( lSingle1 / lSingle2); // Ergibt 16 da mit Extended gearbeitet wird.
lInteger := Ceil( Single( lSingle1 / lSingle2)); // Ergibt 15 da mit Single gearbeitet wird.
lValue := ( lSingle1 / lSingle2);
Showmessage( lValue.TypeInfo.Name);