1. RE: WS_CHILD - Thanks
Derek Parnell wrote:
> From: George Walters <gwalters at sc.rr.com>
> > To: EUforum <EUforum at topica.com>
> > Reply-To: EUforum at topica.com
> > Subject: Re: WS_CHILD
> > Date: 24/08/2001 8:30:03 AM
> >
> >
> > I don't seem to have this problem. Here's
> > some code snipits which I've been
> > using and the window opens with focus and
> > a blue bar like it should when it
> > has the focus.
> >
> > global procedure pickTermsInit()
> > wx = 300
> > wy = 250
> > wl = 207
> > wh = 160
> > winIdTerms = create
> > (Window,"",grpActive,wx,wy,wl,wh,0)
> > <---- grpActive
> > is the parent window
> > pickField[fldCount] =
> > {winIdTerms,routine_id("pickTerms")}
> > idTerms = create
> > (List,"",winIdTerms,0,0,200,100,#82)
> > pickIndex[fldCount] = {idTerms,fldCount}
> > pkOkTerms = create
> > (Button,"OK",winIdTerms,50,105,50,25,0)
> > onClick[pkOkTerms] = routine_id
> > ("getCode")
> > pkCanTerms = create
> > (Button,"Cancel",winIdTerms,100,105,50,25,
> > 0)
> > onClick[pkCanTerms] = routine_id
> > ("exitRoutine")
> > end procedure
> >
> > global procedure pickTerms ()
> > typ = "T"
> > who = getWhoami()
> > win = winIdTerms
> > list = idTerms
> > loadCodes(typ,idTerms)
> > openWindow(winIdTerms,Normal)
> > end procedure
> >
> > ...george
>
> Hi George,
> the difference is that the code you use does not have the WS_CHILD flag.
> The
> use of this flag causes the child window to remain inside the parent
> window's borders. Technically, your use does create a child window, but
> not
> the same sort of child window that was being attempted.
> -----
> Derek
>
Derek,
Thanks for the info. Maybe i will pick a new style for the window.
Thinking at it again i don't really care if the child window can leave
the parent window of not.
--Jon
>
> or
> entity to whom they are addressed. If you are not the intended recipient
> of
> this message you are hereby notified that any use, dissemination,
> distribution or reproduction of this message is prohibited. If you have
> received this message in error please notify the sender immediately. Any
> views expressed in this message are those of the individual sender and
> may
> not necessarily reflect the views of Global Technology Australasia
> Limited.
>
>
>
