Hello,
I found in lr_class.pas this:
// if space was found, advance to next no space char
while (s[last] = ' ') and (last < Length(s)) do
and changed to:
// if space was found, advance to next no space char
while (UTF8Copy(s,last,1) = ' ') and (last < UTF8Length(s)) do
but it did not help