Набираем строку:
Button1.Width:=40;
Запускаем программу на выполнение (F9). Смотрим на результат своей работы.