Computer Science Canada

Run Window

Author:  Ashkan [ Fri Jan 09, 2004 1:49 am ]
Post subject:  Run Window

if u have dealt with GUI you probably know that there is GUI.processevent in the program where it waits for the user to input,, during this time if you click somewhere out of the program window a blank white window pops up,,, so i was thinking maybe there is a way to disable or close that window...
i somehow solved it by setting the program window active even though i may click outside and it works but the point is that i need a more efficient way to do this. like RunWindow := Disable
=P llllolllll
thanx for any help

Author:  DanShadow [ Fri Jan 09, 2004 3:37 pm ]
Post subject: 

I seriously suggest against using GUI...its a useful tool, but it lags your program and adds more lines to your code. Also it makes your code just a little more complicated to write and read. Maybe try this instead?
code:

var txt : string := ""
var temp : string (1) := "@"
loop
    setscreen ("offscreenonly")
    View.Update
    Draw.FillBox (0, 0, maxx, maxy, 0)
    Draw.Box (150, 260, 240, 235, 255)
    Draw.FillBox (245, 235, 295, 260, 21)
    Draw.Box (245, 235, 295, 260, 255)
    colorback (21)
    color (12)
    locate (10, 32)
    put "Submit" ..
    locate (10, 20)
    colorback (0)
    color (255)
    put txt, "|" ..
    if hasch then
        getch (temp)
    end if
    if (temp not= "@") and (ord (temp) > 64 and ord (temp) < 123) then
        txt := txt + temp
        temp := "@"
    end if
end loop

Or something like it..this one doesnt work *exactly* correctly....hmm..GUI seems to be amuch better alternative t han this....shoot


: