iterating over all widgets in my window

[Faitie]

Hello dear progressTalkers ,

I would like some help with this issue.
Is there a fast way to itterate over all the widgets in my window?

Some premade code sample that can do this?
Any help is greatly appreciated.

 

[Faitie]

solved .

[COLOR=#222222]PROCEDURE loopWidgets:
    DEFINE VARIABLE hWindow AS HANDLE NO-UNDO.
    DEFINE VARIABLE hFrame AS HANDLE NO-UNDO.
    DEFINE VARIABLE hObject AS HANDLE NO-UNDO.


    ASSIGN 
        hWindow = TARGET-PROCEDURE:CURRENT-WINDOW
        hFrame = hWindow:FIRST-CHILD
        hObject = hFrame:FIRST-CHILD 
        hObject = hObject:FIRST-CHILD.


    DO WHILE VALID-HANDLE(hObject):
        IF hObject:NAME = "ImageTop" THEN hObject:LOAD-IMAGE("img\Toolbar.jpg").
        IF hObject:NAME = "ImageBotom" THEN hObject:LOAD-IMAGE("img\navigationBar.jpg").
        IF hObject:NAME = "ImageLogo" THEN hObject:LOAD-IMAGE("images\logo.gif").
        hObject = hObject:NEXT-SIBLING.
    END.


END PROCEDURE.
[/COLOR]