Código Delphi [-] if Objeto is TCollection then ShowMessage('Es colección');
if Objeto is TCollection then ShowMessage('Es colección');