Create cursor from object

Let's say I have created a simple object from Empty, and that I have added sevaral properties (and values) to it. The properties could be Integers, floats, dates, strings, logicals, etc.

Now I want to create a cursor with fields named the same as the properties, and have 1 row in the cursor where the row has the values from the object properties.

Basically, I want a function like this:

CreateCursorFromObject(oMyObject, cCursor)

---