Q&A

  • font style
객체의 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)

전부 안되는군여... 도움을 요청함다...도와주세영..
2  COMMENTS
  • Profile
    한하눌 2002.09.12 20:07
    교집합 '*'을 사용해보시면 될꺼 같은데요
       if (Label1.Font.Style * [fsbold]) = [fsbold] then
          Label1.Font.Style := label1.font.style - [fsbold]
       else
          Label1.Font.Style := label1.font.style + [fsbold];
       Label1.Repaint;

    즐프하시길...

  • Profile
    조걸 2002.09.12 20:52
    안되는디여...ㅜㅜ
    TFontStyle이랑 TFontStyles는 다르다는디....들은 얘기로는...
    그걸 어떻게 해야 하는지..몰것군여..ㅜㅡ