Fórum Converter TString para TColor #261719
13/12/2004
0
:?: Olá a todos.
Uso Delphi 5, Paradox e QuickReport.
Num programa de emissão de etiquetas (coloridas) armazeno
código, nome do cliente e o nome da cor desejada (clblue, clgreen, etc..).
No evento BeforePrint do DetailBand1 coloquei o seguinte código:
M_Cor := Dtm.Etiquetas.FieldByName(´NomeDaCor´).Value;
QrDbText2.Font.Color := M_Cor;
Mas o sistema retorna um erro de convesão: Imcompatible Types TColor e TString
Como posso fazer para atribuir o conteúdo da variável M_Cor para Font.Color do componente QRDBText.
Obrigado.
Neto
Uso Delphi 5, Paradox e QuickReport.
Num programa de emissão de etiquetas (coloridas) armazeno
código, nome do cliente e o nome da cor desejada (clblue, clgreen, etc..).
No evento BeforePrint do DetailBand1 coloquei o seguinte código:
M_Cor := Dtm.Etiquetas.FieldByName(´NomeDaCor´).Value;
QrDbText2.Font.Color := M_Cor;
Mas o sistema retorna um erro de convesão: Imcompatible Types TColor e TString
Como posso fazer para atribuir o conteúdo da variável M_Cor para Font.Color do componente QRDBText.
Obrigado.
Neto
Neto
Curtir tópico
+ 0
Responder
Posts
13/12/2004
Motta
StringToColor se não se falha a memória ....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)