CompToDouble
Moduł: System
function CompToDouble(Value: Comp): Double; cdecl;Konwertuje wartość typu Comp na liczbę typu Double:
var
Foo : Comp;
Bar : Double;
begin
Foo := 100;
Bar := CompToDouble(Foo);
Writeln(Bar);
end.Zobacz też: