Как убрать границу ниже TButton в Windows XP?

Question

У меня есть стандартная кнопка, размещенная на неоднородном фоне (TImage). Когда форма была отображена в Windows XP, я начал видеть границу под моей кнопкой:

Можно ли как-нибудь исправить этот артефакт?

Эта же кнопка выглядит нормально в Windows 7:

У меня Delphi 2010, Windows XP SP3

Answer 1

Вы можете поместить кнопку на TPanel и установить размеры панели так, чтобы она скрывала «артефакт». Свойство панели ParentBackground должно быть установлено на True (и так по умолчанию).

Я не уверен, находится ли линия артефакта в пределах размеров кнопки, как указано в ее свойствах, поэтому, возможно, вам придется добавить проверку в ваше приложение, чтобы увидеть, работает ли она под Windows XP, чтобы настроить высота панели соответственно.