Pag.27

Código:

Function TListControlAction.HandlesTarget( Target : TObject ) : Boolean;
Begin
   Result := ( ( ListControl <> nil ) or ( ListControl = nil ) 
                  and  ( Target is TCustomListControl ) ) 
                  and  ( TCustomListControl( Target ).Focused;
End;

Bom a primeira linha : ( ListControl <> nil ) or ( ListControl = nil )
É totalmente NULA, num vale nada, totalmente incoerente....

OU

Esta errada e já saiu uma correção em alguma edição depois, só sei disso pois 
foi distribuida aqui em ribeirão preto no CodeGear Tour...


Responder a