Bitte Hilfe für umrechnungsprogramm

[Larsi]

also erstmal solltest du das mal als code formatieren !!!
Dezimal := Dezimal + StrToInt(self.Text[i])*IntPower(2,length(self.Text)-1) muss man da das self.text nicht auch noch mit strtoint machen???
*IntPower(2,length(self.Text)-1) MFG Lars Wiltfang