[Lazarus] Hook TComponent streaming system

[Mattias Gaertner]

On Mon, 24 May 2010 07:01:21 -0300
Luiz Americo Pereira Camara <luizmed at oi.com.br> wrote:

> Mattias Gaertner escreveu:
> > On Sun, 23 May 2010 23:37:29 -0300
> > Luiz Americo Pereira Camara <luizmed at oi.com.br> wrote:
> >
> >   
> >> Mattias Gaertner escreveu:
> >> [...]
> >> Here's the actual code (calls a generic TForm descendant):
> >>
> >> The article: http://lazarusroad.blogspot.com/
> >>     
> >
> > The article does not explain why the properties must be set before
> > calling Loaded.
> >  
> >   
> 
> If
> procedure TMyForm.Loaded;
> begin
>   inherited;
>   if MyBool then
>      DoAction;
> end;

Is this correct:
One of your forms has a design bug, which you can not fix (for
whatever reason), so you need a workaround.

I see several solutions:
- Patch and compile your own special version of TReader or LCL.
- modify the lfm at runtime
- modify the VMT at runtime and override Loaded

 
Mattias