Интерактивное задание формы для расчета данных

[Алексей_2012]

Здравствуйте! Есть проект, который мне уже запарил мозг, извините за подробности, я его уже почти доделал, осталось только экспорт данных в word, и пункт настройки, а так же автозаполнение таблицы, вопрос возник с пунктом настройки, в общем суть такая:

В edit пишется допустим столбец3*столбец4, исходя из этого заполняю массив с номерами столбцов (от 1 до colcount) затем через функцию pos ищу новые цифры в edit и в массиве а, заполняя массив Б, затем

В этом то и проблема, нужно в cells подставить номера столбцов, а проблема потому, что в коде можно написать cells[3,ii]*cells[4,ii], но нельзя в коде добавить программно cells[5,ii] , который может попасться в массиве Б, есть ли выход из данной ситуации? Скидываю свой проект, посмотрите, пожалуйста, сделал только заполнение массива А, потом взбесился и сюда решил написать, сейчас организую поиск и выборку в массив Б, а вы, если можете, то подскажите, пожалуйста, как поступить,

з.ы. расчеты находятся на форм2, кнопка bitbtn1.caption=рассчитать) Спасибо заранее!

з.з.ы: чтобы открылась форм2, надо создать смету, сохраниться она с папкой где по (потом доработаю чтоб хранилась на системном диске, в дали от глаз)

[Sibedir]

Введи еще переменных (c1, c2, c3... : integer), в которых будут храниться номера столбцов с исходными данными. Получишь: cells[c1,ii]*cells[c2,ii].

Добавлено ------------------------------------------------------------------------------------------
Был у меня в D7 компонент работающий по принципу таблицы Excel. В XE3 я его не нашел чёт, но в сети думаю такие имеются.

[Аватар]

Тогда уж лучше массив

[Алексей_2012]

да, придумал с массивом, который содержит в себе номера позиции из строки form3.edit5.text, заполненным через pos, допустим так:

var i,j:word;
summ:real; a:array of word;
begin
setlength(A,colcount);
summ:=0;
for i:=0 to pozi-1 do
 for j:=1 to rowcount-1 do
summ:=summ*strtofloat(cells[a[i],j]);
a:=nil;

делфи под рукой пока нет, написал сюда чтоб не забыть, ну и спросить, может ли сработать?

зы, забыл еще спросить, а может быть такой компонент в Delphi XE5 есть? И еще, почему-то stringgrid в делфи xe5 убрал разделитель столбцов, то есть стало не оч красиво, +подключен модуль xpman