Text in Dualzahlen umwandeln

[countdown]

ich habe aber jetzt erstmal ein anderes Problem gelöst:
wenn ich das berücksichtig habe was ihr mir geraten habt war die Summe der Zahlen immer länger als der text bzw der schlüssel, da 9+5= 14 und dann auch 14 ausgegeben wurde.
Deshalb habe ich nun eine if-schleife eingebaut die verhindert dass zahlen >9 ausgegeben werden.wenn eine Zahl größer 9 ist wird sie minus 10 gerechnet und dann ausgegeben:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);

Var
schluessel,text:string;
b,zwischenwert:integer;
begin
text:= Label1.caption;
schluessel:=Label2.caption;

for b:=1 to length(Label1.caption) do
    begin
    zwischenwert:= ( StrToInt(text[b]) + StrToInt(schluessel[b]));
    if zwischenwert > 9
    then zwischenwert:= zwischenwert -10;
    label3.caption:= label3.caption + inttostr(zwischenwert);
     end;

 end;

für die entschlüsselung wird dann der verschlüsselte text minus den schlüssel genommen und sollte das ergebnis dann <0 sein wird +10 gerechnet so dürfte ich doch dann wieder auf meinen ausgangstext kommen oder?