[fpc-pascal] Published -> Public

Mattias Gaertner nc-gaertnma at netcologne.de
Sat Apr 17 14:38:39 CEST 2010


On Sat, 17 Apr 2010 14:28:16 +0200
Zaher Dirkey <parmaja at gmail.com> wrote:

> On Sat, Apr 17, 2010 at 1:08 PM, Mattias Gaertner
> <nc-gaertnma at netcologne.de> wrote:
> > On Sat, 17 Apr 2010 13:05:07 +0200
> > Zaher Dirkey <parmaja at gmail.com> wrote:
> >
> >> 2010/4/17 Flávio Etrusco <flavio.etrusco at gmail.com>:
> >> > On Fri, Apr 16, 2010 at 4:54 PM, José Mejuto <joshyfun at gmail.com> wrote:
> >> >> Hello FPC-Pascal,
> >> >>
> >> >> Friday, April 16, 2010, 9:06:45 PM, you wrote:
> >> >>
> >> >> FE> Published methods can be found with TObject.MethodAddress, that's how
> >> >> FE> the lfm hook event handlers (and why Form event handlers are
> >> >> FE> published).
> >> >>
> >> >> Yes, but thats for streamable objects like TForm, or any component,
> >> >> but I think that that's not the case of TWSxxxx objects which are the
> >> >> widgetset interface, and also all of them are "class procedure".
> >> >>
> >> >> Marc says in Lazarus that a "virtual class tree" is formed with such
> >> >> published methods, I do not know the need of it or the mission, but if
> >> >> it is OK it is OK ;) for me.
> >> >>
> >> >> --
> >> >> Best regards,
> >> >>  José
> >> >
> >> > Sure, I was just saying that in a different context. I found Marc's
> >> > observation very weird, and I'm (still) going to check it.
> >> >
> >> > Flávio
> >>
> >> Yes it is useful info for me,
> >> Is that mean descending from TForm (or any class) without mentioned
> >> "published" or any of (public, protected, private) it will be
> >> considered as published?
> >
> > Yes. If you want less published use the TCustomXXX, e.g. TCustomForm.
> >
> > Mattias
> 
> I meant
> 
> If i use, if i not mentioned "published"
> 
> TMyForm= class(TForm)
>    procedure Method1;
> end;
> 
> is is equal to
> 
> TMyForm= class(TForm)
> published
>    procedure Method1;
> end;

Yes, because TForm descends from TPersistent. 
Normal classes have "private" as default visibility.

Mattias



More information about the fpc-pascal mailing list