sguruapp@gmail.com
facebook vk instagram Одноклассники youtube

Удалить строки из MEMO, содержащие определённый символ-(ы) - Delphi


var
i: Integer;
begin

for i := Memo1.Lines.Count - 1 downto 0 do

if Pos('Молоко', Memo1.Lines[i]) = 0 then Memo1.Lines.Delete(i);
end;

Возврат к списку

обучись профессии будущего

Хочешь стать успешным разработчиком
приложений? Тогда добро пожаловать к нам.

обучись профессии будущего