SQL Server OLE Automation

I would like to know how to access the elements of a SQL Server
"Databases" collection in Delphi. The following code creates an instance
of a SQL Server object:

Var
        SQLS, SQLDatabases : Variant;

SQLS := CreateOLEObject( 'SQLOle.SQLServer' );

This code creates an instance of the "Databases" collection:

SQLDatabases := SQLS.Databases;

At this point I'm not sure how to access the names of the individual
databases in the collection so I can add them to a list box.

Any help would be appreciated, as would a response to my email address.

Thanks,
GG