Hi Budjanto
The problem of first parameter can be done using a wrapper function for
compatibility here untested WVW_SETTITLE  (windows , title)
Harbour  have great capability that make simple adapting gtwvw


STATIC S_Ocrt:={}
STATIC S_setmaincoord:=.f.

FUNC WVW_SETTITLE  (windows , title)
    DEFAULT WINDOWS TO LEN(S_OCRT)
    oOLDcrt := hb_gtSelect( s_ocrt[windows,1] )
    X_RET= WVT_SETTITLE(TITLE)
    hb_gtSelect(ooldcrt)
    RETURN X_RET

FUNCTION  WVW_nOpenWindow(X_title,x_top,x_left,x_bottom,x_right)
   local ocrt
   x_ocrt := hb_gtCreate( THREAD_GT )
//  ocrt := hb_gtSelect( ocrt )
//  hb_gtReload(THREAD_GT  )
   setmode(x_bottom-x_top+1,x_right-x_left+1)
  // ? x_bottom-x_top,x_right-x_left
   x_oCrt := hb_gtSelect()
   aadd(s_ocrt,{x_ocrt,X_title,x_top,x_left,x_bottom,x_right})
   x_ret=len(s_ocrt)
   RETURN x_ret

FUNCTION WVW_lCloseWindow(x_pos)
    default x_pos to len(s_ocrt)
       s_ocrt[x_pos,1]=nil
       adel(s_ocrt,x_pos,.t.)
   RETURN
2009/3/13 Budyanto Dj. <budya...@centrin.net.id>

> Hi Pritpal,
>
> > My question is: How many of you are using GTWVG and are
> > willing to adopt to new prorocol. Believe me, it will be very
> > little effort to change the exiting code but the results will be
> > truely rewarding. Once this is done, I may think to port
> > GTWVW in GTWVG if get a substantial number of confirmations
>
> I've never tried GTWVG, and I am not sure what you mean by "port GTWVW in
> GTWVG".
>
> If you mean revising (or rewriting) GTWVW into Harbour, then I'll be very
> much interested, as well as
> many others. But please keep it backward compatible as much as possible. I
> remember you said here
> in the past that GTWVW is "impossible" to port to the new GT API because
> there is a conflict with
> GTWVW's use of first parameter as window designator (for most functions).
> Do you finally find a way
> to solve that problem? Or do you plan change the convention in GTWVW? (I
> hope it is the former.)
>
> Am I interpreting it right with what you mean by "porting GTWVW in GTWVG"?
>
> Thanks and regards,
> budyanto
>
> _______________________________________________
> Harbour mailing list
> Harbour@harbour-project.org
> http://lists.harbour-project.org/mailman/listinfo/harbour
>



-- 
Massimo Belgrano

Analisi e sviluppo software per Lan e Web - Consulenza informatica -
Formazione
Delta Informatica S.r.l. http://www.deltain.it/   +39 0321 455962
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to