E
ecsousa
Guest
First, sorry about my english mistakes...i don´t know how to write in english very well... I need to make a function like a Handle function.....for objects of a particular class ... example: def var x as handle no-undo. def var y as handle no-undo. def var str as char no-undo. str = string(x). y = handle(str). So.. i have my class ellen... def var x as ellen no-undo. def var y as ellen no-undo. def var str as char no-undo. str = x:tostring(). How can I get the object from str?? I made the next code....but it is very expansive ( time) when i have many objects. Define Variable myObject As Char no-undo. define variable loop as Progress.Lang.Object no-undo. Assign myObject = "1234". loop = Session:First-object. Do While valid-object(loop) : if (loop:tostring() = myObject) then Do: MESSAGE "Found!!!" VIEW-AS ALERT-BOX INFO BUTTONS OK. Leave. End. loop = loop:Next-sibling. End. As alternative solution......I am saving the objects in a temp table.. but the garbage colletion never deletes my object because they have an reference in my temp-table.......... and I dont have when i should delete the record..... :/
Continue reading...
Continue reading...