CelItem

 

Remarks Properties Methods Samples

ED
not used
RT
avaliable

Remarks:Top

This object deliveres all information stored with the cel item...
You can read this like shown in the Sample, but ther some more,
like the Username, the Computer, Value or something else...

Properties:Top

Class Comment Computer
Group Status TagName
Text Time User
Value VariableName  

Methods:Top

DynPropertiesEnum[GET] DynProperties[GET] DynProperties[PUT]

Samples:Top

'##########################################################
'### Get all CEL Items of the project				 ###
'##########################################################
Public Sub GetAllItems()
	Dim i As Integer
	Dim zCItem As CelItem
	'get all items in memory...
	For i = 0 To thisProject.Cel.CelItems("*").Count - 1
		'set object to a specific item...
		Set zCItem = thisProject.Cel.CelItems("*").Item(i)
		'print time, text, Variablename and User-Comment of item to outputwindow
		Debug.Print "Time:	 " & zCItem.Time
		Debug.Print "Text:	 " & zCItem.Text
		Debug.Print "Variable: " & zCItem.VariableName
		Debug.Print "Comment:  " & zCItem.Comment
		Debug.Print "-----------------------------"
	Next i
End Sub