Так мудрёно написал! Выложи ка ещё и исходник!
1) Создаёшь второй битмап -
Код:
var image2:TBitmap;
...
image2:= TBitmap.Create;
Задаёшь его ширину, равной записи в TEdit(не забывай, что в TEdit всё записываетсяв тим String, а чтоб преобразовать строку "5" в число 5 нужно пользоваться IntToStr(...)) -
Код:
Image2.Width:=IntToStr(Edit1.Text)
Высоту задаёшь аналогично -
Код:
Image2.Height:=IntToStr(Edit2.Text)
Обрати внимание, что здесь я использовал два TEdit! Я просто не знаю, как у тебя записывается оба значения в один TEdit(нужен исходник)
А с участком картины я потом напишу, щас времени нет, ok?