_Input:=memo1.Lines[i];
_Input:='Строка в DOS кодировке';
Incompatible types: 'String' and 'PAnsiChar'
_Input := PChar(memo1.Lines[i]);