Ver la Versión Completa : Aspecto Degradado de un form
Rabata
10-11-2005, 18:16:29
Hola,
Me Gustaria hacer un degradado de un form, Por ejemplo poner el color azul al form y obtener el efecto de un degradado
La unica forma que se me ocurre es poniendo un TImage a todo el Form y cargarle una imagen con ese degradado, pero no me parece muy eficiente, se os ocurre o teneis alguna solución
Gracias a Todos....
Rabata
10-11-2005, 18:17:34
Pe3rdon se me olvidaba y si sy hay componentes en ese form (DbGrid, DbEdit, Button,...) que tambien le afecte ese degradado....
Hola, podrias comenzar con este truco que lo saque de trucomania
http://www.q3.nu/trucomania/
procedure TForm1.FormPaint(Sender: TObject);
var Row, Ht: Word ;
begin
Ht := (ClientHeight + 255) div 256 ;
for Row := 0 to 255 do
with Canvas do
begin
Brush.Color := RGB(0, 0, Row) ;
FillRect(Rect(0, Row * Ht, ClientWidth, (Row + 1) * Ht)) ;
end ;
end;
Rabata
11-11-2005, 10:36:15
pero el evento onPaint solo esta en TForm y no en el resto de los componentes, mi intención es k todos los elementos de les produzca este degradado, aunque tenga k utilizar otra se rie componentes.....
Es mucho más complejo de lo parece.
Primero el degradado del form, ok, no es problema.
El degradado de los componentes, eso es lo más grave. Te aconsejo que busques por Skin en torry.net, no solo necesitas el componente para el degradado, sino toda una nueva batería de componentes, edits, grids etc, que tambien tenga esa propiedad.
suerte en la búsqueda
vBulletin v3.6.8, Derechos ©2000-2024, Jelsoft Enterprises Ltd.