[Gambas-user] Form enumeration

Christopher Brian Jack brian at ...1334...
Mon Mar 20 15:51:23 CET 2006


I'm having difficulty trying to write a sub that will close all open forms
except the caller (it's intended that the caller be a Form most likely
calling from his myform_Close handler and the all-but-the-caller is there
to avoid endless loop condition)

so in a module called "Common" I define the function

from a Form's myform_Close handler he makes a call like this

PUBLIC SUB myform_Close
  Common.CloseAllForms(ME)
  ME.Close()
END

In Common:

PUBLIC SUB CloseAllForms(who as Object)
  DIM which AS String
  FOR EACH which IN ["Form1","Form2",...,"FormN"]
    IF NOT (which=Object.Class(who)) THEN
      'need to get object-from-string-in-which and use
      'Object.Call(resultingObject,"Close")
    END IF
  NEXT
END

The trouble I'm running into is that it does not appear that there is a
way to get back an object, given its string name.  I've tried the Class
"array" --ie: Object.Call(Class(which),"Close")-- but it gives an error.

I'm at a stumbling block here, any suggestions?

.=================================================.
|  Christopher BRIAN Jack aka "Gau of the Veldt"  |
+================================================='
| brian _AT_ brians-anime _DOT_ com
`=================================================-
Hi Spambots, my email address is sputnik at ...1334...




More information about the User mailing list