안녕하세요....
음... 그 밑에 String 로 선언되어 있는 변수 있잖아요...
어디서는 TCaption 형으로 선언되어 있어서 조금 난해 합니다... 크크
그리고요... read 부문과 write 부문에 서....
read 부문에 어떤 예제 보니까요... Function 부문이 들어가더군요?
그리고 write에는 Procedure 부문이 들어가고요...
거기에 대한 조금더 자세한 예제가 있으면 조금만 아주 조금만 알려주셔요....

참고로... 제가 쓰려는 소스를....

---------------------------------
FCaption : TCaption;
FCaption : TCaption;
^^--- 이론....
틀렸네...
저위에요...
Private

Published
   propety Caption : TCaption Read GetCaption Write SetCaption;

......
그리고요...
Private 부문에 이런 함수가 있어요...
Function GetCaption :TCaption;
Procedure SetCaption (Value:TCaprion);


함수 내용은 비슷하구요...
Function TimesPanel.GetCaption :TCaption;
begin
  if FCaption <> FCaption then
    Result := FCaption;
  else
    Result := '00:00:00';   // 요거시 초기값이죠?
end;

Procedure TimePanel.SetCaption (Value:TCaprion);
begin
  if FCaption <> Value then
     begin
        Caption := Value;
      end;
end;