Cor do Botão
Como faço para mudar a cor de um Botão Bitbtn?
Agradeço a atenção!
Agradeço a atenção!
Douglas
Curtidas 0
Respostas
Renaldo
07/05/2003
Nas propriedades, estou sem o delphi aqui portanto não posso dizer exatamente qual, mas deve ser COLOR.
GOSTEI 0
Okama
07/05/2003
Botões não mudam de cor. Se precisar de algo semelhante use um Painel. Ex:
[b:6d61b48dc4]procedure[/b:6d61b48dc4] TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
[b:6d61b48dc4]begin[/b:6d61b48dc4]
Panel1.BevelInner := bvLowered;
Panel1.BevelOuter := bvLowered;
[b:6d61b48dc4]end[/b:6d61b48dc4];
[b:6d61b48dc4]procedure[/b:6d61b48dc4] TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
[b:6d61b48dc4]begin[/b:6d61b48dc4]
Panel1.BevelInner := bvRaised;
Panel1.BevelOuter := bvRaised;
[b:6d61b48dc4]end[/b:6d61b48dc4];
[b:6d61b48dc4]procedure[/b:6d61b48dc4] TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
[b:6d61b48dc4]begin[/b:6d61b48dc4]
Panel1.BevelInner := bvLowered;
Panel1.BevelOuter := bvLowered;
[b:6d61b48dc4]end[/b:6d61b48dc4];
[b:6d61b48dc4]procedure[/b:6d61b48dc4] TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
[b:6d61b48dc4]begin[/b:6d61b48dc4]
Panel1.BevelInner := bvRaised;
Panel1.BevelOuter := bvRaised;
[b:6d61b48dc4]end[/b:6d61b48dc4];
GOSTEI 0
Sandra
07/05/2003
Como faço para mudar a cor de um Botão Bitbtn?
Agradeço a atenção!
[color=white:a96509386a].............................[/color:a96509386a] :)
Acho que tenho um componente que faz isso. Mas, não testei...
:oops:
GOSTEI 0