Delphi

지금 델파이를 배우고 있는데 너무 오래된 기술이라 정보가 적다.. 

그래도 블로그에 차근차근 업로드 해보려고 한다.

 

Sender

“이벤트를 발생시킨 객체(컴포넌트)를 가리키는 파라미터”

→ 하나의 메서드를 공용으로 사용할 때 어떤 컴포넌트가 해당 메서드를 사용했는지 알려주는 역할!

⇒ 여러 컴포넌트가 같은 메서드를 공유할 때 구분 용도로 사용

 

문자열의 가장 마지막 문자를 지우는 함수

1. Copy() 함수

Copy(S, 1, Length(S)-1)

• Copy(S, 1, N)은 문자열 S에서 1번 문자부터 N개를 추출
• 길이보다 1 작은 값을 줘서 마지막 문자 제거

---

1. SetLength() 함수 → 변경 가능 문자열에 유리하다!

• var로 받은 문자열을 직접 수정하는 방식에 해당
• SetLength()는 문자열 길이를 직접 줄인다.

procedure RemoveLastCharVar(var S: string);
begin
  if Length(S) > 0 then
    SetLength(S, Length(S) - 1);
end;

---

1. Delete() 함수

• Delete() 함수는 부분 삭제를 할 수 있어서 마지막 문자만 지정해서 삭제 가능
• Delete(S, Index, Count) → S에서 Index 위치부터 Count개 문자 삭제

procedure RemoveLastCharDel(var S: string);
begin
  if Length(S) > 0 then
    Delete(S, Length(S), 1);  // 마지막 1글자 삭제
end;