On Tue, 13 Nov 2007 23:51:14 +0100 (CET)
Daniël Mantione <[EMAIL PROTECTED]> wrote:

> 
> 
> Op Tue, 13 Nov 2007, schreef Marc Weustink:
> 
> > ik wrote:
> > > On Nov 13, 2007 10:51 PM, Graeme Geldenhuys
> > > <[EMAIL PROTECTED]> wrote:
> > 
> > [..]
> > 
> > > > Good news is that that's where the similarity ends (well in the
> > > > units I checked). Importantly, the
> > > > method bodies seem to be implemented differently, except for
> > > > the very elementary methods.
> > > 
> > > What are the elementary methods ?
> > 
> > methods like:
> > 
> > TSomeObject.DoSomeNotify;
> > begin
> > if Assigned(FOnSomeNotify)
> > then FOnSomeNotify(Self);
> > end;
> > 
> > You cannot write this another way.
> 
> You can:
> 
> Tsomeobject.do_some_notify;
> 
> begin
>  if Fon_some_notify<>nil then
>    Fon_some_notify(self);
> end;

That's not the same and will crash since lazarus svn rev 12822.
Lazarus now uses the Delphi 'Assigned' trick for design time events
as default.
I hope this trick is not copyrighted or patented.


Mattias
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to