vba - How do I to create a copy of a custom object or collection? -

-

i have custom collection - let's call colparenta - , contains number of collections called colchild. want create function creates new collection, colparentb has of properties , contains same children colparenta. user can modify few properties of colparentb need to, rather having redefine ones same colparenta.

colparentb should contain new instances of colchild copies of found in `colparenta.

i can't right?

set colparentb = colparenta  colparentb.name = "copy of " & colparenta.name

because makes colparentb point colparenta , changes properties of colparenta right?

i'm confused. in advance.

you correct in suspicions - assigning pointers, it'll reference same instance of object different name.

you're going need create clone functions on colparent , colchild classes. way colchild.clone can memberwise clone , return brand new object same properties, , colparent can create new collection cloned colchild objects.

be careful though, if of properies of colparent or colchild references object may need cloned to avoid updating values don't mean to.

possible functions (note i'm supposing colchild contains number of instances of class clscontent - that'll need changing):

colparent.clone:

public function clone() colparent   'start new parent collection   dim parent colparent   set parent = new colparent    'populate new collection clones of originals contents   dim child colchild   each child in me     parent.add(child.clone)   next    set clone = parent end function

colchild.clone:

public function clone() colchild   'start new parent collection   dim child colchild   set child = new colchild    'populate new collection clones of originals contents   dim content clscontent   each content in me     child.add(content.clone)   next    set clone = child end function

clscontent.clone:

   public function clone() clscontent       'start new parent collection       dim content clscontent       set child = new clscontent        child.property1 = me.property1       child.property2 = me.property2       ...        set clone = content     end function

please excuse bugs or typos - don't have dev env handy, i'm writing straight text box!


Comments

Post a Comment

Popular posts from this blog

c# - How to set Z index when using WPF DrawingContext? -

-
how set z-index drawing object when using drawingcontext.drawxxx() methods? the object drawn last have higher z index. can't change index of drawn objects. way draw in order. if using wpf (as placed tag), can use, example, canvas control. create shapes need like polyline obj = new polyline(); //... // ... set properties of obj and add them canvas uielementcollection: yourcanvasname.children.add(obj); //or yourcanvasname.children.insert(i, obj); first items of collection have higher z index. advantages in way: no need redraw on window changes, can anytime move objects , change order.
Read more

razor - Is this a bug in WebMatrix PageData? -

-
i think may have found bug in webmatrix's pagedata, not sure. concerns how pass data partial page calling page. in webmatrix documentation (tutorials, e.g. " 3 - creating consistent look ", , example code), pagedata recommended mechanism pass data between pages (e.g. content page layout page, or partial page). however have found not work other way, pass data partial page calling page. modifying or adding entries in pagedata in partial page, not seem calling page. cutting right down simplest possible example, in test page may have this: @{ pagedata["test"] = "initial entry"; } <p>before calling partial page, test value @pagedata["test"]</p> @renderpage("_testpartial.cshtml") <p>after returning calling page, test value @pagedata["test"]</p> and in _testpartial.cshtml page might have this: @{ pagedata["test"] = "modified entry"; } <p>in partial page...
Read more

visual c++ - Using relative values in array sorting ( asm ) -

-
i need sort through array , sort each individual row in array in ascending order. doesn't seem going (surprise!) keep getting hit 2 errors: a2101: cannot add 2 relocatable labels , a2026: constant expected here's sort, makes sense me, think i'm still trying implement high-lvl language techniqes assembly. there way around not being able use relative values? (the array 7 rows 9 columns, btw). mov cx, 7; cx = number of rows outer: ; outer loop walk through rows push cx mov cx, 9 mov row, cx ;rows middle: ; middle-loop walk through columns push cx sub cx, 1 ;cx = cx-1 mov column, cx ;columns inner: ;inner loop - compare , exchange column values cmp marray[row*9 + column], marray[row*9 + column+1] xchg marray[row*9 + column+1], marray[row*9 + column] ; compare , exchange values marray table inc column loop inner pop cx loop mid...
Read more