StartprogrammingusingObjectPascal:TextEditorApplication

텍스트 편집기 프로그램

이 예제에서는 간단한 텍스트 편집기를 어떻게 만드는지 보여줄 것입니다.

다음 순서를 따릅니다.

• 새 프로그램을 만들고 메인 폼에 아래 구성요소를 넣습니다.
  1. TmainMenu
  2. TMemo: 정렬 속성을 alClient로 바꾸고, 스크롤 바 속성을 ssBoth로 바꿉니다.
  3. 구성요소 팔레트의 대화상자 페이지에 있는 TOpenDialog와 TSaveDialog

• MainMenu1 구성요소를 마우스로 두 번 누르고 File 메뉴와 Open File, Save File, Close 하위 메뉴 항목을 추가합니다.

아래와 같은 폼이 보이게 될 것입니다.

• Open File 항목의 OnClick 이벤트에 대해 이 코드를 작성합니다.

    if OpenDialog1.Execute then
        Memo1.Lines.LoadFromFile(OpenDialog1.FileName);

• Save File 항목에 대해 이 코드를 작성합니다.

    if SaveDialog1.Execute then
        Memo1.Lines.SaveToFile(SaveDialog1.FileName);

• Close 항목에 대해 작성합니다.

Close;

이 텍스트 편집기 프로그램을 실행한 다음, 텍스트를 작성하고 디스크에 저장할 수 있습니다. 또한 .pas 파일과 같은 기존의 텍스트 파일을 열 수 있습니다.