Есть ли в Blackbox (или сторонних библиотеках)
функция преобразование REAL в строку по типу дельфийской

string s := FormatFloat('0.#', realValue);
если realValue = 1.5, то s = 1.5, а если realValue = 1.0, то s = '1',

А то RealToStringForm в конце добавляет '.0'.