Delphi. Очистка поля Memo #325598

подскажите...как в Delphi7 произвести по кнопке "Очистить" очистку поля Memo..но сделать это так,чтобы первые 2 строчки (у меня они называются "Список сотрудников"..2-я строчка... прочерк...) оставались..

сейчас стоит просто Form1.Memo2.Lines.Clear; но это полностью очищает поле ((

А свойство Lines?

Line1 :=  Memo2.Lines[0]; Line2 :=  Memo2.Lines[1]; Memo2.Clear; Memo2.Lines[0]:=Line1; Memo2.Lines[1]:=Line2; Типа като так, в синтаксисе тока не уверен =)

Может Lines[0].Clear

или for I:=2 to Memo2.Lines.Count do Memo2.Lines[i]:='';

псиб..сделали...но немного проще...  Form1.Memo2.Lines.Clear;  Form1.Memo2.Lines.Add('Список Сотрудников');  Form1.Memo2.Lines.Add('-------------------------------------');

(3,5) омг tmp := ''; if Memo2.Lines.count > 0 then  tmp := Memo2.Lines[0]; if Memo2.Lines.count > 1 then  tmp := tmp + #13#10 + Memo2.Lines[0]; Memo2.Lines.Text := tmp

(7+)tmp := tmp + #13#10 + Memo2.Lines[0]; читать как tmp := tmp + #13#10 + Memo2.Lines[1]; правильно поставленный вопрос - половина решения :-(

Скорее всего не покатит Вот так не надо писать программы try Line1 :=  Memo2.Lines[0]; Line2 :=  Memo2.Lines[1]; Memo2.Clear; Memo2.Lines.Add(Line1); Memo2.Lines.Add(Line2); except ShowMessage('Ошибка! Поле не заполнено'); end;

ROLF