Fórum Ler Estilo da fonte do Grid em arquivo .ini #535323
22/10/2015
0
Estou com dificuldades para converter os tipos: 'TFontStyles' and 'Integer'. Segue código abaixo:
Todos estão funcionando, menos o estilo da fonte, o erro que retorna é o seguinte: E2010 Incompatible types: 'TFontStyles' and 'Integer'.
DBGrid1.font.Size:=arqini_font.Readinteger('Fonte', 'Size', size);
DBGrid1.font.Style:=arqini_font.ReadInteger('Fonte', 'Style', estilo_fonte); // > LINHA DO ERRO.
DBGrid1.font.Color:=arqini_font.ReadInteger('Fonte', 'Color', cor);
DBGrid1.font.Name:=arqini_font.ReadString('Fonte', 'Fonte', fonte_name);
DBGrid1.TitleFont.Size:=arqini_font.ReadInteger('Fonte', 'Size Fonte', size_fonte);
Todos estão funcionando, menos o estilo da fonte, o erro que retorna é o seguinte: E2010 Incompatible types: 'TFontStyles' and 'Integer'.
Jhon
Curtir tópico
+ 0
Responder
Posts
23/10/2015
Adriano Crivelli
A mensagem de erro já está apontando o problema. A propriedade "Style" da fonte não pode ser lida como Integer. Tente > ReadString para a linha em que o erro ocorre.
Responder
Gostei + 0
25/10/2015
Jhon
Adriano, já havia tentado como strint, precisa ser convertido de outra forma, veja que o erro continua: Incompatible types: 'TFontStyles' and 'string'. O estilo da fonte é um numero inteiro, mas convertido para byte. Veja como estou fazendo para gravar no arquivo ini:
Assim, grava no arquivo, meu problema é ler isso depois. Que ai retorna o erro de tipos incompativeis.
var Stilo :Integer;
Stilo:= IntToStr(byte(FontDialog1.Font.Style));
arqini_font.WriteString('Fonte','Style',Stilo);
Assim, grava no arquivo, meu problema é ler isso depois. Que ai retorna o erro de tipos incompativeis.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)