객체의 font style이 적용됬는지를 알아올려고 합니다.
그런데 잘 모르겠군요....
TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
TFontStyles = set of TFontStyle;
위에꺼는 type이구여
이렇다면... 폰트의 fsbold가 적용 됬는지을 어떻게 알 수 있을까요
if ysh.Font.Style = fsbold then fsbold := '1' else fsbold := '0'; (X)
if ysh.Font.Style[fsbold] then fsbold := '1' else fsbold := '0'; (X)
if ysh.Font.Style.fsbold then fsbold := '1' else fsbold := '0'; (X)
전부 안되는군여... 도움을 요청함다...도와주세영..
if (Label1.Font.Style * [fsbold]) = [fsbold] then
Label1.Font.Style := label1.font.style - [fsbold]
else
Label1.Font.Style := label1.font.style + [fsbold];
Label1.Repaint;
즐프하시길...