problem mit stringkonvertierung

[billi]

Hallo,
ich weis absolut nicht mehr weiter: Für meine Facharbeit will ich eine generische Baumklasse schreiben. Soweit auch ganz gut, nur wenn ich strings verwende, bekomme ich nur eine leere Rückgabe bzw. einen rechteckigen Kasten (über showmessage). Mit Real und integer Werten läuft es.
Meineserachtens liegt das Problem hier (ansonsten ist die Behandlung von strings, integern und reals gleich...):

Delphi-Quellcode:

function wandeln(var x):tstring;
begin
 case datentyp of
      0 : result := IntToStr(integer(x));
      1 : result := tString(x);
      2 : result := FloatToStr(real(x));
 end;
end;

tstring ist dabei "normal" string. Diese function übergebe ich an eine andere procedure die damit arbeitet(bei der übergabe zur anderen unit ändere ich den namen zu Wandle um):

Delphi-Quellcode:

function tbaum.postorder: tausgabe;
begin
 if Inhalt = NIL then result := ''
  else
   if l = nil then
     if r = nil then result := WandleUm(inhalt^)
     else result := WandleUm(inhalt^) + r.postorder
   else
     if r = nil then result := WandleUm(inhalt^) + l.postorder
     else result := l.postorder + r.postorder + WandleUm(inhalt^);
  showmessage(result);
end;

Weil das ganz ev. etwas undurchsichtig ist, mein projet auch als Anhang.
ICh freu mich über jeden Tipp,
Vielen Dank,
Markus