void __fastcall TForm1::Button1Click(TObject *Sender)
{
if( Memo1->Font->Style.Contains(fsUnderline))
Memo1->Font->Style=Memo1->Font->Style>>fsUnderline; //underline 속성 빼기
else
Memo1->Font->Style=Memo1->Font->Style<<fsUnderline; //underline 속성 추가
}
니라카 님이 쓰신 글 :
: 제가 메모1 의 폰트속성중 밑줄 넣을려고 버튼에다가
:
: Memo1->Font->Style(line); 해봐서 안되서 Underline 넣어봤는데 그래도 안되더라구요,,
:
: 어찌하면 밑줄넣는지.
|