Hi, how i can make a empty object equal a other object? I explain:
oCadCli:Load()
oCadCli1:Blank()
oCadCli have many fields i want do load all fields and datas to oCadCli1.
Thanks in advance.
Wanderson.
Hi, how i can make a empty object equal a other object? I explain:
oCadCli:Load()
oCadCli1:Blank()
oCadCli have many fields i want do load all fields and datas to oCadCli1.
Thanks in advance.
Wanderson.
for i=1 to oCadCli:reccount
oCadCli1:aBuffer[i]:= oCadCli:aBuffer[i]
nextJames Bott wrote:Wanderson,
Assuming the two DBFs have the same structure you can simply do this:
for i=1 to oCadCli:reccount   oCadCli1:aBuffer[i]:= oCadCli:aBuffer[i] next
Regards,
James
for i=1 to oCadCli:fcount()
oCadCli1:aBuffer[i]:= oCadCli:aBuffer[i]
next