97mik На форме 2 едита и кнопка.
В событии кнопки на нажатие пишешь:
form1.width:=strtoint(edit1.text);
form1.height:=strtoint(edit2.text);