Copy Method for LCFieldlist
This method creates a duplicate copy of an LCFieldlist and all its data. Every field in the LCFieldlist is also duplicated, so you don't end up with two fieldlists that both refer to the same LCField objects.
If you want to have two fieldlists that reference the same LCField objects, use CopyRef instead.
Defined In
LCFieldlist
Syntax
Set fldListRecordNew = fldListRecord. Copy
Parameters
| Parameter |
Description |
|---|---|
| fldListRecord |
LCFieldlist. The fieldlist that you want to copy. |
Return Value
| Value |
Description |
|---|---|
| fldListRecordNew |
LCFieldlist. The copy of the fldListRecordobject. |
Example
Option Public
Option Explicit
Uselsx "*lsxlc"
Sub Initialize
Dim olist As New LCFieldlist
Dim nlist As LCFieldlist
Dim ofield As LCField, nfield As Lcfield
Set ofield = olist.Append ("FirstName", LCTYPE_TEXT)
ofield.Text = "Chi Len"
Set nlist = olist.Copy
Set nfield = nlist.GetField (1)
Print "before update, original=" & ofield.Text(0) & ", copy=" & nfield.Text(0)
nfield.Text = "Cheiko"
Print "after update, original=" & ofield.Text(0) & ", copy=" & nfield.Text(0)
Call nlist.Setname(1, "FullName")
Print "The copy contains field named " & nlist.Names(0) _
& " whose value is " & nfield.Text(0)
End SubExample Output
before update, original=Chi Len, copy=Chi Len
after update, original=Chi Len, copy=Cheiko
The copy contains field named FullName whose value is Cheiko