Fórum Gravar cor em formato texto. #214075
14/02/2004
0
bom dia a todos,
estou utilizando um arquivo .ini para gravar algumas informações de configuração de um sistema e gostaria de gravar neste arquivo a cor e configuração de fonte definido pelo usario neste arquivo.
ex.:
Label1.Font.Name := FontDialog1.Font.Name;
Label1.Font.Color := FontDialog1.Font.Color;
Label1.Font.Size := FontDialog1.Font.Size;
Label1.Font.Style := FontDialog1.Font.Style;
Label1.Font.Charset := FontDialog1.Font.Charset;
com isto eu configuro algumas propriedades de font do label1.
e tento gravar no config.ini com o comando:
Configuracao.WriteString(´label1´, ´Fonte Cor´, Label1.Font.Color);
so que se eu jogar estes dados como estao no comando acima no arquivo .ini vai dar o seguinte erro:
[u:d8d5beac23][b:d8d5beac23]Incompatible types: ´String´ and ´TColor´[/b:d8d5beac23][/u:d8d5beac23].
a pergunta é: como eu converto estes dados para gravar em um arquivo? texto. :(
estou utilizando um arquivo .ini para gravar algumas informações de configuração de um sistema e gostaria de gravar neste arquivo a cor e configuração de fonte definido pelo usario neste arquivo.
ex.:
Label1.Font.Name := FontDialog1.Font.Name;
Label1.Font.Color := FontDialog1.Font.Color;
Label1.Font.Size := FontDialog1.Font.Size;
Label1.Font.Style := FontDialog1.Font.Style;
Label1.Font.Charset := FontDialog1.Font.Charset;
com isto eu configuro algumas propriedades de font do label1.
e tento gravar no config.ini com o comando:
Configuracao.WriteString(´label1´, ´Fonte Cor´, Label1.Font.Color);
so que se eu jogar estes dados como estao no comando acima no arquivo .ini vai dar o seguinte erro:
[u:d8d5beac23][b:d8d5beac23]Incompatible types: ´String´ and ´TColor´[/b:d8d5beac23][/u:d8d5beac23].
a pergunta é: como eu converto estes dados para gravar em um arquivo? texto. :(
Tronbr
Curtir tópico
+ 0
Responder
Posts
14/02/2004
Adriano Santos
Edit1.Text := ColorToString(Panel1.Color);
Panel1.Color := StringToColor(Edit1.Text);
Panel1.Color := StringToColor(Edit1.Text);
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)