지금 간단한 에디터를 만들고 있거든여...
TMyEdit = class(TCustomControl)를 상속 받아서여...
근데 막히는 부분이 생겼습니다..
Font 프로퍼티를 만져야 하는데...
도무지 이값이 돌아 오지를 않네여..
TMyEdit = class(TCustomControl)
private
FFont : TFont;
published
property Font : TFont read FFont write SetFont;
end;
이렇게두 해봤구..
TMyEdit = class(TCustomControl)
private
.....
published
property Font;
end;
이렇게두 해봤는데..
컴파일 하구나면 뜨기는 하는데... 변경된 그값을 읽어올 방법이 없네요,,
어딘가에 보니깐
TMyFont = class(TPersistent)
private
fName : string;
public
constructor Create;
destructor Destroy; override;
published
property Name : string read fName write fName;
end;
TMyEdit = class(TCustomControl)
private
fMyFont : TMyFont
published
property Font : TMyFont read fMyFont write fMyFont;
end;
뭐 이런 식으로 해야 한다는데...
방법이 이것뿐이 없습니까..
다른방도가 있을 것 가튼데여...
만일 이 방법 밖에 없다면 좀 자세히좀 가르켜 주세요....ㅜ.ㅜ
그냥 아래와 같이 하면 되는데요. Font속성은 TControl에서 이미 구현해놨으니까
사용할 수 있도록만 해주면 됩니다.
TMyEdit = class(TCustomControl)
private
......
published
property Font;
end;
변경된 값은 Font로 접근하시면 됩니다.
폰트의 색깔을 검은색으로 바꾸고 싶으면
Font.Color := clBlack;
^^ 항상 즐코하세요.
김진호 wrote:
> 지금 간단한 에디터를 만들고 있거든여...
>
> TMyEdit = class(TCustomControl)를 상속 받아서여...
>
> 근데 막히는 부분이 생겼습니다..
>
> Font 프로퍼티를 만져야 하는데...
> 도무지 이값이 돌아 오지를 않네여..
>
> TMyEdit = class(TCustomControl)
> private
> FFont : TFont;
> published
> property Font : TFont read FFont write SetFont;
> end;
> 이렇게두 해봤구..
>
> TMyEdit = class(TCustomControl)
> private
> .....
> published
> property Font;
> end;
> 이렇게두 해봤는데..
>
> 컴파일 하구나면 뜨기는 하는데... 변경된 그값을 읽어올 방법이 없네요,,
>
> 어딘가에 보니깐
>
> TMyFont = class(TPersistent)
> private
> fName : string;
> public
> constructor Create;
> destructor Destroy; override;
> published
> property Name : string read fName write fName;
> end;
>
> TMyEdit = class(TCustomControl)
> private
> fMyFont : TMyFont
> published
> property Font : TMyFont read fMyFont write fMyFont;
> end;
> 뭐 이런 식으로 해야 한다는데...
> 방법이 이것뿐이 없습니까..
>
> 다른방도가 있을 것 가튼데여...
> 만일 이 방법 밖에 없다면 좀 자세히좀 가르켜 주세요....ㅜ.ㅜ