задача с компонентом Memo

[Severe007]

Дан одномерный массив слов,каждое из которых записано в формате XX-YY.
Часть XX состоит из букв,а часть YY -из цифр.
Выбрать элементы с заданной частью XX и у них найти сумму частей YY.
Если элементов с заданной частью XX нет, вывести в компонент вывода строку "Элементов нет".

[Severe007]

ну помогите хотябы с началом,хоть чуть-чуть)))

[OlegVE]

Здравствуйте
Используйте в цикле Pos (найдёте нужные ХХ), Copy (получите число в виде строки из УУ) и StrToInt(преобразуете, полученный на предыдущем шаге, результат).

   for i := 0 to (Memo1.Lines.Count-1) do // Узнаём количество строк в нашем Memo1
    begin
     strVar := Memo1.Lines[i];            // Читаем отдельные строки здесь и обрабатываем
     if Pos ... then 
     begin
      Copy...
      StrToInt...
      ПеременнаяДляСуммирования := ПеременнаяДляСуммирования + ПеременнаяИзStrToInt;
     end;
    end;

До свидания

Добавка
Извините, переключился с Pascal и не сразу включился См. выше. Исправил и добавил .

[Severe007]

А что такое strVar?

[OlegVE]

Просто любая, придуманная Вами, переменная строкового типа.
Вообще-то Вы просили только направление... потому я и стал помогать, так что для начала разберитесь с предложенными процедурами, потом составьте свой код (хотя я думал, что Вы это подразумевали)...

[Severe007]

Можно по подробней