Kannst du doch einfach selber machen mit:
Result:=Copy(EingabeString,Position,1)='1' // oder ='0'
Result:=EingabeString[Position]='1' // oder ='0'
Aber natürlich immer besser gleich binär zu arbeiten und keine Strings zu verwenden.
Ein Therapeut entspricht 1024 Gigapeut.