1. Add a property to your form called DataEnvironment

2. In the form's LOAD event:

ThisForm.DataEnvironment = CREATEOBJECT("DataEnvironment")

WITH ThisForm.DataEnvironment

.AddObject("Cursor1", "Cursor")
.Cursor1.CursorSource = "C:\Data\Table1.Dbf"
.Cursor1.Alias = "MyTable

.AddObject("Cursor2", "Cursor")
.Cursor2.CursorSource = "C:\Data\Table2.Dbf"
.Cursor2.Alias = "AnotherTable

.AddObject("Relation1", "Relation1")
.Relation1.ParentAlias = "MyTable"
.Relation1.ChildAlias = "AnotherTable"
.Relation1.ChildOrder = "IndexName"
.Relation1.RelationalExpr = "FieldExpresssion"

.OpenTables()

ENDWITH

3. In the form's UNLOAD event:

ThisForm.DataEnvironment.CloseTables