[poli-smen]

Сообщение от StudentMarat

Так вот, как добавить данные я разобрался, привожу код:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(edit1.text+'*'+edit2.text);
end;

А как сделать, чтобы эти данные добавлялись с нумерацией

Код:

Memo1.Lines.Add(IntToStr(Memo1.Lines.Count + 1) + ' ' + Edit1.Text + '*' + Edit2.Text);