[Lazarus] Class operators

Mattias Gaertner nc-gaertnma at netcologne.de
Tue May 24 00:30:13 CEST 2011


On Mon, 23 May 2011 18:06:31 -0400
Jose Luis <jlvolta at fibertel.com.py> wrote:

> Hi all:
> 
> I've tried to cast the argument 'Sender' from a call to an event
> procedure, but it didn't work. The event is triggered by a TSpeedButton
> push, and the code of the action call contain the sentence:  
> 
> -- if Sender is TSpeedButton then
> --      buttn:=TSpeedButton(Sender);
> 
> The code compile without raising error or warning, but at run-time
> Sender is not of TSpeedButton's type, like it is in Delphi.

How do you know that it is not TSpeedButton?
Please post more code.

 
> What's the correct way to cast objects in FPC ?

The snippet's syntax is correct.

Mattias




More information about the Lazarus mailing list