Red de conocimiento informático - Computadora portátil - ¿Cómo agregar un borde de color personalizado a un panel en Delphi?

¿Cómo agregar un borde de color personalizado a un panel en Delphi?

El componente TPanel estándar de Delphi no tiene la opción de establecer el color del borde. Si desea mostrar un color personalizado, puede hacer lo siguiente:

1. con el mismo nombre en la unidad Clase: escriba TPanel?=?class(Vcl.Extctrls.P> public

procedure?Paint;?override; end;

procedure?TPanel. Paint;

comenzar heredado; Canvas.Pen.Color?Color?：=?clRed; //El borde es rojo Canvas.Rectangle(ClientRect

end; >

2. En este momento, agregue un componente TPanel en el IDE y luego ejecute el componente nuevamente. Puede encontrar que el color del panel cambia a la siguiente configuración:

上篇: ¿Qué significan la estación a, Bilibili, la estación C, la estación D, la estación E, la estación F, la estación G, la estación K y la estación M (cuál es mejor, la estación a o Bilibili)? 下篇: La ayuda de la imagen de carga binaria ASP explica el significado del código ~ Cómo usarlo

Artículos populares