On Jan 31, 2008, at 11:40 AM, GregO wrote:
> So is it possible to create a class extension that would tell us if a
> window of a particular type is showing? I was thinking of something
> like:
>
> ------------------------------------------------------------
> Function IsShowing(Extends w as Window) As Boolean
> dim c,i as integer
>
> c = WindowCount-1
>
> for i = 0 to c
> if window(i) isa w and w.visible then
> return true
> end if
> next i
>
> return false
> End Function
> -------------------------------------------------------------
>
> This gives me an compilation error of:
>
> There is no class with this (w) name
> Code, Windows.IsShowing, line 6, if window(i) isa w and w.visible then
IsA expects to see the name of a class as the second argument, not an
object reference. This is something that introspection will make
possible.
Charles Yeomans
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
|