Inkompatible Typen Char und String obwohl nirgends ein Char

[Meflin]

Moin,
ich habe folgendes Codestückchen:

Delphi-Quellcode:

  for i := 0 to strBuchliste.Count - 1 do begin
    for x := 0 to CharCount(strBuchliste[i], ',') + 1 do begin
      subString := Explode(',', strBuchListe[i])[x];
      arrBuecher[i, x] := subString;
    end;
  end;

strBuchliste ist TStringList
subString ist string
arrBuecher ist array of array of string
explode ist die funktion aus der codelib, returned ein TStringDynArray
bei
arrBuecher[i, x] := subString; meldet er nun: Inkompatible Typen Char und String. Aber wo zur Hölle ist da ein Char? ich bin schon am verzweifeln...

*MFG*