Error: String and Integer

[Євгеній Бєлік]

Здравствуйте!
Есть одна загвоздочка:

var
...
 Ind, BufI: integer;
...
begin
...
BufI := Length(ExtractFileName(List.Strings[Ind])+1);
...

Тут проблема с типами. Вроде как лёгкая и понятная проблема, но уви не компилируется.

"Incompatible types: 'string' and 'Integer'"

В чём проблема?

[Кольша]

BufI := Length(ExtractFileName(List.Strings[Ind]))+1;