Форма содержит два текстовых поля и кнопку. В текстовые поля вводятся размеры в пикселях. При нажатии на кнопку форма становится указанных размеров
begin
try
Form1.Height:=StrToInt(Edit1.Text);
Form1.Width:=StrToInt(Edit2.Text);
except
ShowMessage('Ввидите число');
end;
end;
end.
примерно так ?????