Мультиселект в гриде и общая сумма.

Здравствуйте. Может кто подскажет как реализовать следущее. Есть в гриде какое-то кол-во позиций товаров/услуг, у каждой позиции есть своя цена. Выбрать позицию и сохранить её и её стоимость проблемы нет, а вот как сделать множественный выбор в гриде с сохранением и наименования и их стоимости. В голову приходит только через поле memo, может посоветуете варианты? Это надо для добавления позиций в заказ, в форме заказа на данный момент позиции отображаются тоже в гриде.
Добавление в мемо работает

procedure frmDictService_Button7_OnClick (Sender: TObject; var Cancel: boolean);
var
   i,c: integer;
   iColumn: integer;
begin
    iColumn := frmDictService.GridService.Columns.Count-2;
    c := frmDictService.GridService.RowCount - 1;
    for i :=0 to c do
    if frmDictService.GridService.Selected[i] then
  begin
    if Form1.Memo3.Lines.IndexOf(frmDictService.GridService.Cells[iColumn, i] + ', ' ) = -1 then
       Form1.Memo3.Lines.Add(frmDictService.GridService.Cells[iColumn, i] + ', ' ) else ShowMessage('Дубликат');
end;
    frmDictService.Close;

end;

А вот как их вставить в грид Form1.GridService из frmDictService.GridService не пойму.