새로운 글
새로운 덧글

자유롭게 질의 및 응답을 할 수 있는 게시판이며 어느 누구도 답변을 달아야만 하는 의무는 없습니다. 
  • 제품설치/등록/제품 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey FMX Component 생성시 오류

2018.09.04 17:44

100jk 조회 수:84

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

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

 

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에서 생성할 경우 다 위와같은경우로 증식하더군요.

 

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

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2019.4~2019.7 관리자 2015.01.22 6340
공지 유용한 관련 사이트 관리자2 2014.03.20 43668
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 85010
2359 여러 Package 작성시 특정 유닛을 공유하는 방법 100jk 2018.10.05 36
2358 TMS FMX ZBar Reader 사용하신분 계시나요? 생각 2018.10.04 46
2357 FireDAC사용 쿼리하는 동안 진행중 표시 어떻게..? [2] 공감 2018.10.01 105
2356 IOS 12 대응에 관해서 [1] 돌팅 2018.10.01 238
2355 C++Builder 최신업데이트(30831)불구 Kinvey 푸시 토큰을 받지 못합니다. 개성산전 2018.10.01 75
2354 delphi 10.2.3 +Xcode 10 + IOS 12 환경에서 빌드시 왜 에라메세지가 뜨는지요? [1] file 화이부동 2018.09.26 212
2353 퀀텀그리드 이벤트 관련 문의드립니다. [1] BW 2018.09.19 141
2352 카메라 컴포넌트 관련 문의드립니다. [6] 최봉원 2018.09.10 199
2351 윈도우10 에서 XE7 Fastreport5 오류 문의 [1] juljoo 2018.09.18 78
2350 VCL 컴포넌트를 FMX용으로 바꾸고 싶습니다. [6] 쿠리 2018.09.12 144
» FMX Component 생성시 오류 [2] file 100jk 2018.09.04 84
2348 Client 에서 REST Request 시, server certificate 체크 질문드립니다. [2] Joon 2018.09.11 185
2347 IBConsole에서 [3] file 개발자로 2018.09.07 61
2346 Timage 에 특정 이미지 사용시 앱이 꺼짐니다. file 천지조율 2018.09.12 64
2345 윈도우 프로그램 배포(인증문제) [1] 스카이 2018.09.10 504
2344 delphi10.2 SDK 관련 설정 문의 2 신우 2018.09.10 104
2343 윈도우10과 이전 윈도우에서 VCL 버튼이나 메지지 상자 코너 표시형태 문의입니다. [2] KJ 2018.09.08 94
2342 delphi 10.2 sdk 설정 관련 문의 [1] file 신우 2018.09.07 101
2341 블루투스 터미널 앱을 만들고싶습니다. 데이터 수신은 어떻게하나요? [1] Rarity 2018.09.09 121
2340 iOS 11.3 개발 시 PrivateFrameworks 관련 에러 [4] 스카이 2018.05.03 209



광고 모듈이 설치되어 있지 않아 실행을 중단합니다..