[Lazarus] If Assigned ()

[Mattias Gärtner]

Zitat von ajv <ajv at vogelaar-electronics.com>:

> Hello,
>
> How can I test if a "Procedure Of Object" is assigned?
>
> example: (mode delphi under Linux)
> Var PO : Procedure Of Object;
> PO := Nil;   // OK
> If Assigned (PO) Then Writeln ('This should not be printed');     //  
> It is printed !!

It is not printed here.

Please provide a complete example.

> Is this a bug?

Probably in your code.


Mattias