나사로에서 맞춤 패키지 만들기

Question

맞춤 라벨 패키지를 만들고 싶지만 실제로 어떻게해야하는지 모르겠습니다.

나는이 일을 해요 :

파일 -> 새로 만들기 -> 패키지

다음

그리고 추가 -> 새 구성 요소 마침내 새 구성 요소 만들기를 클릭 등의 ancester 유형을 선택

.

다음과 같은 단위 코드가 있습니다.

unit MyLabel1; 

{$mode objfpc}{$H+} 

interface 

uses 
    Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls; 

type 
    TMyLabel1 = class(TLabel) 
    private 
    { Private declarations } 
    protected 
    { Protected declarations } 
    public 
    { Public declarations } 
    published 
    { Published declarations } 
    end; 

procedure Register; 

implementation 

procedure Register; 
begin 
    RegisterComponents('Standard',[TMyLabel1]); 
end; 

end. 

내 질문은 :

1. 어떻게 코드에 색상 및 이름 등의 글꼴 스타일 위 설정할 수 있습니까?

stardard 팔레트에서 사용자 정의 레이블을 양식으로 선택하면이 속성이 이미 설정되어 있습니다.

감사합니다.

감사합니다.

Answer 1

TEnhancedPanel 예를 wiki에서 살펴보십시오.