폼 1개에서 데이터 변경이 일어날 경우, 다른 여러 폼에서 Display 수정이 필요할 경우, Interface 를 사용하면 비교적 쉽게 작업을 진행 할 수 있다.
프로젝트 파일의 구성은 다음과 같다.
프로젝트명: Project
폼1: Form1, 유닛이름: Unit1
폼2: Form2, 유닛이름: Unit2
1. Unit1 에 IChanged 인터페이스를 만든 다.
IChange 인터페이스 밑줄에서 Ctrl+Shift+G 를 누르면 인터페이서 ID를 자동으로 생성할 수 있다.
이것 생성 안하면 아래의 Supports() 함수를 사용할 수 없다.
2. Unit1 에는 implementation 아래에 uses Unit2; 를 입력한다.
3. Unit2 위쪽의 uses 절에 Unit1 을 입력한다.
4. TForm1 과 TForm2 상속받는 부분에 IChanged 인터페이스를 추가한다.
6. TForm1 과 TForm2 에 ApplyChange() 프로서저를 private 영역에 정의하고, 코드를 작성한다.
Form2 가 보여질 경우에만 ApplyChange() 함수가 실행되게 하려면, 아래와 같은 코드를 추가한다.
'FMX' 카테고리의 다른 글
| Firemonkey의 Android/iOS 환경에서 네이버 OAuth2.0 을 이용한 로그인 (0) | 2024.05.31 |
|---|---|
| Skia for Delphi (0) | 2023.07.06 |
| Delphi FMX Style - Round Button (0) | 2023.07.03 |
| delphi FMX Component 만들기 (0) | 2023.06.29 |