On Jan 3, 2006, at 7:57 PM, Harrie Westphal wrote:
On Jan 3, 2006, at 5:51 PM, Lee Unsworth wrote:
if ScreenCount > 1 then
Dim w = Window3
w.Left = Screen( 1 ).availableleft
w.Top = Screen( 1 ).availabletop
w.width = screen( 1 ).availablewidth
w.height = screen(1).availableheight
end if
Try
Dim w = Window3
if ScreenCount > 1 then
w = New Window3
w.Left = Screen( 1 ).availableleft
w.Top = Screen( 1 ).availabletop
w.width = screen( 1 ).availablewidth
w.height = screen(1).availableheight
end if
The Dim statement was only defining w to be a Window3 at some possible
point in the future. Inside the 'if' statement you are now actually
giving w an actual Window3 to refer to.
Dim w = Window3
is probably the cause of the syntax error message. Try replacing it
with
dim w as Window = Window3
--------------
Charles Yeomans
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
