Vielleicht ist es eine Option den mathematischen Ausdruck für die Anzeige etwas aufzulockern:
Delphi-Quellcode:
function TermToStr(const s: String): String;
const
OP = '+-*/';
var
i: Integer;
begin
Result := s;
for i := Length(s) downto 1 do
if Pos(s[i], OP) > 0 then
begin
Insert(' ', Result, Succ(i));
Insert(' ', Result, i);
end;
end;
Gute Nacht
marabu