TString x TColor

Delphi

05/11/2003

Preciso fazer com que o usuário através defina uma cor para o seu formulário... gostaria de gravar isso na base... como faço para atribuir uma cor clBlue que esteja gravado em um campo Alpha (Paradox) e a atribuir essa cor ao form?
Valeu.


Nigro

Nigro

Curtidas 0

Respostas

Carlosk

Carlosk

05/11/2003

use o stringtocolor e o colortostring.


GOSTEI 0
Nigro

Nigro

05/11/2003

Desculpe amigo, mas o que seria isso? Variável, componente, propriedade, método, como se aplica a minha necessidade?
Grato


GOSTEI 0
Henry

Henry

05/11/2003

Apenas aprofundando.

Pra escolhe a cor vc coloca um colordialog da palheta Dialogs. Ai num botão vc bota:

If colordialog1.execute then
Panel1.color:= colordialog1.color;

aonde panel1 é o objeto que vc ira mudar de cor. na sequencia, use essa declaração de variaveis:

edit1.text:= ColorToStr(panel1.color);
dbedit1.text:= edit1.text;
Table1.post;

Ai vai salvar tua configuração.


GOSTEI 0
POSTAR