델피의 클래스 이해(11) - 클래스에 깊이 들어가는 방법[4] - 접근 제한(또는 가시성)

944 단어 Delphi


//              

TMyClass = class(TObject)

  function Fun1: string; {                   published  }

  //             {$M+},    {$M-}          public   

private

  function Fun2: string; {private              }

protected

  function Fun3: string; {protected                 }

public

  function Fun4: string; {public           ,                  }

published

  function Fun5: string; {published            public;       RTTI   }

  //      Object Inspector          、  、       published   

end;


 
   
//Delphi " " , , private . { strict } TMyClass = class(TObject) function Fun1: string; strict private function Fun2: string; {strict private } strict protected function Fun3: string; {strict protected } public function Fun4: string; published function Fun5: string; end;

좋은 웹페이지 즐겨찾기