conv.inc

来自「一个编译器修改的例子」· INC 代码 · 共 12 行

function StringToInt(str : string) : int;
function IntToString(i : int) : string;

function StringToReal(str : string) : real;
function RealToString(r : real) : string;

function IntToReal(i : int) : real;
function RealToInt(r : real) : int;

function IntToChar(i : int) : char;
function CharToInt(c : char) : int;