Self.BorderStyle := bsSingle; // self - имя твоей формы (пиши в форм крейте), или изменяй свойство в десигн тайме