Komisches problem mit Char, String und Integer

[Green]

also ich hab folgendes problem:

Text is ein string; Text[i] damit dann ein Char.
Jetzt will ich aus dem Text[i] ein Integer machen, wozu ich ne funktion geschrieben hab:

Delphi-Quellcode:

function CharToInt(C: Char):integer;
begin
  if C = '0' then Result := 0;
  if C = '1' then Result := 1;
  if C = '2' then Result := 2;
  if C = '3' then Result := 3;
  if C = '4' then Result := 4;
  if C = '5' then Result := 5;
  if C = '6' then Result := 6;
  if C = '7' then Result := 7;
  if C = '8' then Result := 8;
  if C = '9' then Result := 9;
end;

so und jetzt hab ich nen array of TColor, bei dem das 8. Feld so ausieht:
IrcColors[8] := rgb(255, 255, 0); wenn ich jetzt die SelAttributes.Color so setze:
RTE.SelAttributes.Color := IrcColors[8]; dann geht das, aber sobald ich das so mache:
RTE.SelAttributes.Color := IrcColors[CharToInt(Text[i])]; gehts einfach nicht mehr, also s kommt kein fehler oder so, aber s wird einfach kein Gelb zugewiesen und Ja ich bin mir sicher das Text[i] eine ziffer von 0-9 ist, aber es geht einfach trotdem nit...

kann mir jemand erklären was ich falsch mach? ich find den fehler absolut nit...

mfG Green