Lable covering up Text Box Mystery
- Posted by Ron Austin <ronaustin at alltel.net> Jan 08, 2004
- 375 views
My brother and I are working on a project. He recently sent me his latest version which was missing three or four text boxes. I called him and he said he could see them just fine. We are both using WinXP Home and both have 1024 X 768 display. Here's a test program I made to illustrate the problem: without warning include win32lib.ew integer Lbl11,Tabs,Tab1,flag,Age,lablen flag=0 -- flag=10 allows win color to bleed through? lablen=60 -- this setting covers causes the lable to cover up the Age control. Change it to 30 and try it constant win=createEx (Window,"Test",0,Center,Center,500,500,0,0) setWindowBackColor(win,SkyBlue) Tabs = create ( TabControl, "", win,0, 0, 500,500, 0 ) Tab1 = create( TabItem, "Patient", Tabs,0,0,0,0,0) procedure print_it( integer self, integer event, sequence params) sequence OldFont OldFont = setCreateFont("Courier New",11,Normal,Black) Lbl11 = create(LText,"Age", Tab1,30, 50,lablen,25,flag) Age = create(SleText,"", Tab1,60,50,30,25,0) end procedure setHandler(win, w32HPaint, routine_id( "print_it" )) WinMain(win,Normal) With lablen set to 60 the label is covering up the text box. If I change it to 30 than I can see the text box. My brother discovered that if he sets flag=10 it allows the main window color to show through the tab. When he did that it shows the blue color on both sides of the text box, but the box is still visable. When I try it the entire text box is covered up with the blue. Can someone please explain what is happening here? Could it have something to do with our respective video cards?