새 유형 만들기

델파이에서는 TShape를 복사하는 새로운 유형 (기계)을 만들고 싶습니다. 대부분 프로 시저와 함수를 추가하기를 원하기 때문입니다. 예를 들어 있지만 정의 된 높이/폭, 나는이새 유형 만들기

Machine.type('402')

같은 뭔가를 할 수 있으며 모양을 그릴 것입니다. 이

Machine.before('Microclean');

같은 그것은 모양을 넣어하는 방법을 알고있다.

그래서 .. 두 부분 질문입니다.
1. 새로운 유형의 사운드가 내가 필요한 것처럼 들립니까? 2. 어떻게 새 비어있는 형식을 만들 수 있습니까? 따라서 자체 단위로 새 절차를 추가 할 수 있습니까? 그런 다음 두 절차에 대한 코드를 제공 할 수

TMachine = class(TShape) 
public 
    procedure MyType(const AType: string); 
    procedure Before(const ABfore: string); 
end;

: 당신이 TShape에서 상속하는 새로운 클래스가 필요 같은

감사 글렌

2013-01-18 Glen Morse

왜 Machine.type ('402')가 아닌 'Machine.type (402)'이 아닌가? 숫자 대신 문자열을 사용해야하는 이유는 무엇입니까? 누군가'Machine.type ('Zebra')에게 전화하면 어떨까요? –

예 였지만 402는 db에있는 시스템의 이름입니다 –

는 소리.

프로 시저 이름에 대해 사용 유형을 사용할 수 없습니다. 예약어입니다. 또한 'T'로 클래스 이름 앞에 접두어를 붙이는 델파이 관습 (요구 사항은 아님)

2013-01-18 09:20:03

속성을 선호합니다. – bummi

@bummi - 왜 안 되니? 원하는 경우 해당 절차를 속성 설정자로 만듭니다. http://docwiki.embarcadero.com/RADStudio/XE3/en/Properties#Property_Access –

또한 원래 질문에 속성이 표시되지 않습니다. 속성은'Machine.MyType : = 402;'으로 사용되어야합니다. –

답변