컴포넌트 맛보기

이 수업에서 다루는 내용들

• 앞으로 진행할 실습에서 사용할 몇가지 표준 컴포넌트(TLabel, TEdit, TButton, TMemo) 사용법을 알아봅니다.
• 위 컴포넌트들의 주요 속성, 메소드, 이벤트를 알아봅니다.

주요 속성, 메소드(M), 이벤트(E)

TLabel(레이블)

• Caption
• AutoSize

TEdit

• Text
• MaxLength - 입력 가능한 글자 수
• TextHint
• NumbersOnly
• ReadOnly / Enable
• SetFocus (M)

TButton

• Caption
• OnClick (E)

TMemo

• Lines
• WordWrap - 자동 줄바꿈

공통

• TabOrder - 탭키로 이동되는 순서
• TabStop - 탭키로 이동 허용여부

---

연습문제

아래 그림과 같이 화면을 만들고, 조건을 만족하는 프로그램을 개발하세요.
(VCL Form Application 프로젝트로 시작, 소스코드를 저장하고 개발을 시작하세요.)

조건

• 이름과 나이 입력 후 [추가] 버튼을 클릭 시
  • 메모에 "이름: XXX 나이: 00" 형식으로 추가될 것(Lines.Add 메소드 이용)
  • 이름과 나이 항목을 초기화 할 것(Clear 메소드 이용)
  • 이름 항목에 포커스를 설정할 것(SetFocus 메소드 이용)
• 나이 입력 항목은 숫자만 입력 될 것(NumbersOnly 속성 이용)
• 탭키로 포커스 이동 시 "이름" > "나이" > "[추가]" 순으로 될 것(TabOrder 속성 이용)
  • 메모 항목은 탭 이동을 허용하지 않을 것(TabStop 속성 이용)
• [모두 지우기] 버튼 클릭 시 메모의 내용을 모두 지울 것(Clear 메소드 이용)

코드 힌트

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Add('이름: ' + Edit1.Text + ' 나이:' + Edit2.Text);

  Edit1.Clear;
  Edit2.Clear;
  Edit1.SetFocus;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Memo1.Clear;
end;