Цитата:
|
Сообщение от lmikle
While Idx < Length(Src) Do
|
Если Length(Src)=Idx, то ничего не выведется.
поэтому после цикла while надо будет добавить проверку
Код:
if Idx=Length(Src) then Memo1.Lines.Add(Copy(Src,Idx,wLen));
Например Src='a', и Idx=1 то условие while не выполниться и строка не выведется.