OpenEuphoria

missing buttons

• Posted by George Walters <gwalters at sc.rr.com> Aug 20, 2001
• 537 views

Hi, all:
    I have the following window (child of grpActive window)opening, however
no buttons show up. Can anyone explain?

 winId = create(Window,"",grpActive,wx,wy,wl,wh,0)
 pickField[fldCount] = {winId,routine_id("pickTaxAuthority")}
 id = create(List,"",winId,0,0,200,100,#82)
 pickIndex[fldCount] = {id,fldCount}
 pkOk = create(Button,"OK",winId,50,150,20,20,0)
 onClick[pkOk] = routine_id("getCode")
 pkCancel = create(Button,"Cancel",winId,100,150,20,20,0)
 onClick[pkCancel] = routine_id("exitRoutine")

...george