Moin Ramox,
erst einmal herzlich willkommen hier in der Delphi-PRAXiS.
Wenn ich das richtig sehe, fehlt ein ; hinter dem end.
Der Rest sieht syntaktisch richtig aus.
[EDIT]
Ausserdem müsste es
Code:
win[j]:=strtoint(copy(helpstr,1,pos('#',helpstr)[color=red][b]-1[/b][/color]));
heissen, da sonst StrToInt vor die Wand läuft.
Das steht ohne -1 am Ende des per Copy erzeugten Strings.
[/EDIT]