Графический редактор в Delphi Опции

[SeregaR1Val]

Добрый день! Необходимо написать графический редактор следующего вида:
Окно разбито на 2 части, в левой вводятся параметры фигуры, в правой она отрисовывается. Например: для начала задан прямоугольник высотой 50 и шириной 100. Указываем высоту - 25, на ней ширина 50 и фигура должна преобразоваться, приняв форму песочных часов и далее в этом духе. Надеюсь нормально объяснил...

Программу еще не начал, код писать не прошу, необходима консультация в том, какие элементы выбрать для разработки, TPaintBox или TImage и т.д. и как лучше всё это отрисовывать, может кто может дать совет?

[IUnknown]

Так... Во-первых, Buffer типа TImage, можно убрать, он не используется. Только жрет место. И много жрет, ты резервируешь для него достаточно большой размер памяти (увеличением Width и Height). Итого: процедура Tf_main.BitBtn1Click

// ...

  Img:=TBitmap.Create;
//  buffer:=TBitmap.Create;
  img.Width:=l+400;
//  buffer.Width:=l+400;
  img.Height:=h+400;
//  buffer.Height:=h+400;

// ...

А что касается Chart-а - так программа совершенно права. Смотри:

, то есть, условие:

if (GridResult.Cells[1, i]<>'') and (GridRoom.Cells[5, i]<>'') then

никогда не выполнится. Пятый столбец в GridRoom не заполняется вообще. Ставь другое условие...