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...