자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey FMX Component 생성시 오류

2018.09.04 17:44

100jk 조회 수:237

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------

일단 아주 간단한 컴포넌트를 만들었습니다.

 

unit RectangleEh;

 

interface

 

uses

  System.SysUtils, System.Classes, FMX.Types, FMX.Controls, FMX.Objects;

 

type

  TRectangleEh = class(TRectangle)

  private

    { Private declarations }

  protected

    { Protected declarations }

  public

    { Public declarations }

    constructor Create(AOwner: TComponent); override;

  published

    { Published declarations }

  end;

 

procedure Register;

 

implementation

 

procedure Register;

begin

  RegisterComponents('TestComponent', [TRectangleEh]);

end;

 

{ TRectangleEh }

 

constructor TRectangleEh.Create(AOwner: TComponent);

var

  sel: TSelectionPoint;

begin

  inherited create(AOwner);

  sel := TSelectionPoint.Create(self);

  sel.Parent := self;

  sel.Position.X := self.Width / 2;

  sel.Position.Y := self.Height / 2;

end;

 

end.

 

별 로직같은건 없고 그냥 TRectangle을 상속받아 Create시에 정가운데에 SelectionPoint 1개를 넣었습니다.

 

그러고 install하고 폼위에 올려놓고 실행해봤더니

 

err1.jpg

 

위와 같이 SelectionPoint가 두개가 있습니다.

 

err2.jpg

프로젝트를 저장하기 전에는 위와 같이 폼위에 Rectangle 뿐이 없는데 저장한 후 다시 불러오면

 

err3.jpg

 

위와 같이 Rectangle 안에 SelectionPoint 가 추가 되어있습니다.

 

이상태로 다시한번 실행하면

 

err4.jpg

 

이제 SelectionPoint 가 세개로 늘어나있습니다. 이것보다 더 늘어나지는 않더군요.

 

fmx관련 컴포넌트를 create에서 생성할 경우 다 위와같은경우로 증식하더군요.

 

혹시 해결방법이 있을까요?

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 15634
공지 유용한 관련 사이트 관리자2 2014.03.20 54464
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 97828
3238 10.4 시드니에서 새로운 프로젝트 시작 오류 [2] file midas 2021.05.25 502
3237 퀵리포트 -> PDF 변환 시 한글 깨짐 현상 질문입니다. [3] 으아앙 2021.06.03 802
3236 ApeSuite 사용법 SSI 2021.06.08 304
3235 Delphi 10.4 버전 맥용으로 컴파일시 오류 발생하는 이유가 궁금합니다. [2] 델포이 2021.06.04 344
3234 mac os 개발 환결 세팅 관련 문의. [2] 델포이 2021.06.03 344
3233 Runtime error 216 at 5005F106 [2] 김동현 2021.05.28 472
3232 Delphi XE10.3의 TLabel이 Transparent가 안되는 문제 질문 [1] DevCK 2021.05.25 4984
3231 firedac 질문입니다 [2] 희망나라 2021.05.19 352
3230 png Image Button에서 Flickering문제 [5] 오늘도좋은하루 2021.05.12 512
3229 10.4 시드니에서 QuickReport Pro 6 이 설치되나요? [23] 왕초보 2020.10.06 2906
3228 Delphi 7 REST Client 개발 문의 [2] DevCK 2021.05.12 814
3227 본사 mypage [1] DHP 2021.05.17 2603
3226 통화목록 관련 [1] 100jk 2021.05.14 7754
3225 XE7에서 bpl 컴포넌트 설치가 안됩니다. [1] 김동현 2021.05.13 448
3224 [마이그레이션] del7 소스를 10.2.3 tokyo prof. 에서 compile 도중 생긴 에러입니다. [2] darwin4078 2021.05.12 317
3223 [BRCC32 Error] "brcc32" exited with code 27. [3] file Dev_기어 2021.05.07 614
3222 IOS 새로고침 드래그시 이슈 delphiman 2021.05.06 232
3221 Android 컴파일 오류 [2] file 초보개발자 2021.04.07 409
3220 FireDAC을 사용한 MySQL관련 입니다. [2] file 오늘도좋은하루 2021.04.28 371