Como gravar TFontStyles em um arquivo
07/12/2005
0
Será que alguem sabe como gravar [dsBold, dsItalic, dsUnderline] em um DB?
Obrigado
Adilson
Pecchiai
Posts
07/12/2005
Pecchiai
Edilcimar estou usando FontDialog do VCL SKIN.
Grato
Adilson
07/12/2005
Edilcimar
07/12/2005
Pecchiai
Não, quero salvar as configurações do fontdialog para usar mais tarde.
nome da fonte
tamanho
cor e
estilo
não estou conseguindo salvar o estilo.
07/12/2005
Edilcimar
nomedafonte -> arial
tamanhodafonte -> 10
sublinhado -> false
italico -> true
negrito -> false
07/12/2005
Pecchiai
Fiz isso, mas o problema é que o codigo ficou confuso com muitas condições.
tipo
so negrito
negrito e italico
so italico
negrito e sublinhado
e assim por diante.
sera que não tem uma maneira de criar um campo e gravar o estilo escolhico no campo: exemplo = [fsBold, fsItalic]
agradeço a atenção
07/12/2005
Eniorm
[/quote:399e5f9b79]
o que o camagada quer é gravar o valor da propriedade, pois se tentar gravar como texto fica phoda pra ele passar o valor que esta do db para o componente... tipo
Font.Style := [Query.FieldByName(´...´).As???];
correto?
seria o mesmo que gravar no db o nome de um procedure ou function, e depois tentar executar essa procedure/function baseado no texto com o nome que foi gravado no db....
abraço,
07/12/2005
Pecchiai
obrigado pela atenção
Adilson
08/12/2005
Pecchiai
Consegui resolver meu problema usando ponteiro.
E passo o exemplo para quem possa interessar.
É so transformar o Style em inteiro.
Fonte := FontDialog.Font.Style;
P := @Fonte;
showmessage(Format(´¬d´, [P^]));
Obrigado pela ajuda
Adilson
08/12/2005
Adriano Santos
Consegui resolver meu problema usando ponteiro.
E passo o exemplo para quem possa interessar.
É so transformar o Style em inteiro.
Fonte := FontDialog.Font.Style;
P := @Fonte;
showmessage(Format(´¬d´, [P^]));
Obrigado pela ajuda
Adilson[/quote:35c80a7532]
Adilson, só uma dúvida que ficou:
Você está gravando em Inteiro no banco? Funcionou blz entao?
08/12/2005
Pecchiai
Você está gravando em Inteiro no banco? Funcionou blz entao?
é isso ai, grava em inteiro, depois é so ler e transformar novamente.
09/12/2005
Vitor Rubio
12/12/2005
Pecchiai
Vitor eu estou pegando o tipo ou estilo escolhido ex: negrito e italico, e guardo em uma tabela, para configurar o cabeçalho de um relatório que estou fazendo.
Abraço
Adilson
14/12/2005
Saint
as variaveis criadas no seu caso foram essas:
var
Fonte:TFontStyles;
P:^TFontStyles;
???
falow, abracos