Как полностью убрать границу Panel в delphi?

В моем приложении я создал форму регистрации, и мне нужно показывать значок ошибки, когда редактирование пусто или содержит какую-то ошибку. Но у изображения нет свойства Name, и поэтому я не могу вызвать Hide the image по его имени. Поэтому я решил поместить изображение в панель и скрыть панель. что-то вроде:

    if(lenght(edit1.text)=0) then
       Panel1.show else Panel1.hide;  // this code shows or hide the image

Проблема в том, что граница панели все еще появляется после установки BorderStyle в bsNone.

Как полностью скрыть границу панели?

1 ответ

Решение

(Ваша настоящая проблема, скорее всего, может быть решена без добавления TPanelно я все же отвечу на твой актуальный вопрос здесь.

Задавать BevelInner а также BevelOuter в bvNone,

Кстати, ваш код может быть написан более элегантно, как

Panel1.Visible := Length(Edit1.Text) = 0;

Я установил следующие свойства, которые сработали для меня в такой ситуации, как у вас

BevelInner := bvNone;
BevelOuter := bvNone;
BevelKind := bkNone;
Другие вопросы по тегам