[helper999999]

пишу функцию, выдает ошибку

Код:

1	incompatible types

в этой строке:

Код:

1	result:=Copy(str, 1, str[i]);

Как исправить?

[icWasya]

На вскидку

Код:

1	result:=Copy(str, 1, StrToInt(str[i]));

если в str[i] - какая-нибудь цыфра, а иначе смотреть, какого типа result, что именно записано в строке, и возможно код всей функции.

[Kailon]

Сообщение от helper999999

пишу функцию, выдает ошибку

Код:

в этой строке:

Код:

Как исправить?

Ну, во-первых прочитать про функцию Copy.
Во-вторых, str[i], вернет Вам символ.
В-третьих, Copy(Откуда копировать, С какой позиции, Сколько копировать)