You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
30 lines
1.3 KiB
30 lines
1.3 KiB
VERSION 1.0 CLASS
|
|
BEGIN
|
|
MultiUse = -1 'True
|
|
Persistable = 0 'False
|
|
DataBindingBehavior = 0 'vbNone
|
|
DataSourceBehavior = 0 'vbNone
|
|
END
|
|
Attribute VB_Name = "clsWorkerMachines"
|
|
Attribute VB_GlobalNameSpace = False
|
|
Attribute VB_Creatable = False
|
|
Attribute VB_PredeclaredId = False
|
|
Attribute VB_Exposed = False
|
|
'-------------------------------------------------------------------------
|
|
'This class is used for storing related data
|
|
'that will be added to a collection
|
|
'Stores a Machine name that Workers are instanciated on
|
|
'-------------------------------------------------------------------------
|
|
Public MachineName As String 'Machine name
|
|
Public WorkerProvider As APEInterfaces.IWorkerProvider 'Server that can be instanciated on remote
|
|
'machines to provide Worker objects
|
|
Public Remote As Boolean 'If true, this represents a remote machine
|
|
'rather that the local machine.
|
|
Public WorkerKeys As Collection 'Collection of longs, representing the keys
|
|
'of Workers stored in the gcWorkers collection
|
|
'that are on the machine represented by this
|
|
'object
|
|
Private Sub Class_Initialize()
|
|
Set WorkerKeys = New Collection
|
|
End Sub
|