Hi Ingo,

I don't know it this if easiest but try this:

find-dirty: func [fac][
 if fac/pane [
  foreach f reduce to-block fac/pane [
   first f
   if all [find first f 'dirty? f/dirty?][
    print [f/var "is dirty!"]
   ]
   find-dirty f
  ]
 ]
]

example:

view lay: layout [
 f1: field
 panel yellow 240x65 [
  f2: field
 ]
 button "find dirty" [
  find-dirty lay
 ]
]

You can generalize the function for recursive search of any face's
property...

regards,

Cyphre

----- Original Message -----
From: "Ingo Hohmann" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, October 10, 2003 11:25 AM
Subject: [REBOL] [View] dirty?


>
> Hi All,
>
> what's the easiest way to find out, if a layout contains any dirty fields?
> (That is, fields that have been edited).
>
>
> Thanks to all who might anwer
>
> Ingo
>
>
> --
> To unsubscribe from this list, just send an email to
> [EMAIL PROTECTED] with unsubscribe as the subject.
>
>

-- 
To unsubscribe from this list, just send an email to
[EMAIL PROTECTED] with unsubscribe as the subject.

Reply via email to