Q&A

  • RichEdit 에서 질문
제가.. 자가공부용 단어장 프로그램을 만들고 있습니다.

단어와 예문을 입력하는 형식인데 대충 다음과 갔습니다..


단어 : LOVE

예문 :I love you


예문을 리치 에디터로 입력을 받는데..
해당 문자의 예문을 출력할때, 해당 단어 부분을 굵게 나타내고 싶습니다.

예) I love you 처럼요..


즉 특정 단어만 굵게 나오게 하면 되는데..
어떻게 하면 되죠?
1  COMMENTS
  • Profile
    정락문 2006.12.27 23:40


    간단하게 해 보았습니다. fsItalic 대신 fsBold를 넣으시면 가능할 것이라고 보여집니다.
    미약하나마 보탬이 되었으면 좋겠습니다.

    procedure TForm1.Button2Click(Sender: TObject);
    var
      FoundAt : Integer;
    begin
      with RichEdit1 do
      begin
        FoundAt := FindText('love', 0, 100, [stMatchCase] );

        if FoundAt <> -1 then
        begin
          SetFocus;
          SelStart := FoundAt;
          SelLength := Length('love');
          SelAttributes.Style := [fsItalic];
        end;
      end;
    end;