Cita:
|
Empezado por Carmelo Cash
¿como puedo preguntar?
Si [FsBold] está incluido en la lista de Edit1.Font.Style Entonces...
|
Código:
if fsBold in Edit1.Font.Style then
Si quieres preguntar si Style contiene, por ejemplo, fsBold y fsItalic pones:
Código:
if [fsBold, fsItalic] <= Edit1.Font.Style then
También, si quieres ver si, por ejemplo, si ni fsItalic ni fsUnderline están en Style pones:
Código:
if [fsItalic, fsUnderline]*Edit1.Font.Style = [] then
Te recomiendo repases en la ayuda de Delphi el tipo de datos
set para que veas los operadores que pueden usarse con variables de este tipo.
Por otra parte fíjate que puedes guardar y recuperar una propiedad como ésta en una variable de tipo Byte:
Código:
ByteStyle := Byte(Edit1.Font.Style);
Edit1.Font.Style := TFontStyles(ByteStyle);
Bye