Pin down the exact line where the error occurs by inserting PRINT lines at various places. If you suspect the code below then prove your hypothesis. Then it's possible to investigate the face involved just before the line which gives the error.
Regards, Anton. > Whoa - that was awful again - sorry for that. Forgot to switch > back to plain= > text :( > > Allessandro ~ > > I believe the code below crashes when the choice is in dropped down state= > and thus covers a face > that the function wants to talk to. > > Does anyone know how to tell a choice to "roll up"? > > TIA, > Kai > > > > > > empty-fields: func [ "Clear all text fields faces of a layout." panel= > [object!] ][ > if not all [ in panel 'type panel/type =3D 'face ] [ exit ] > unfocus > foreach face panel/pane [ > if any [ flag-face? face field > flag-face? face area > flag-face? face memo > flag-face? face fld > flag-face? face inf > ][ either series? face/text > [ clear face/text face/line-list: none ] > [ face/text: attempt [ make face/text none ]] > ] > ] > ; show panel > ] -- To unsubscribe from the list, just send an email to lists at rebol.com with unsubscribe as the subject.
