I want to set the TooltipText of my textbox class to the comments property of the field of the ControlSource, but I need to check if the control source is actually a field of a table/view in a database.

This is what i have so far:

If Empty(This.ToolTipText) Then
	If "." $ This.ControlSource Then
		Set Database To (CursorGetProp("Database",Getwordnum(This.ControlSource, 1, ".")))
		This.ToolTipText = DBGetProp(This.ControlSource,"Field","Comment")
	Endif
Endif

There are some checks missing in the above code, I need help with the following:

1. Determine if a controlsource is in fact a field in a table/cursor/view, or an object property or a variable.
2. If the controlsource is a field in a table/cursor/view, determine if the table/view is contained in a database

Thanks

Carlos Alloatti