User input/Graphical: Difference between revisions
Content added Content deleted
Line 727: | Line 727: | ||
Read New &this$, &thispos |
Read New &this$, &thispos |
||
Call Local local1() |
Call Local local1() |
||
} |
|||
Function Form1.Unload { |
|||
Read New &Quit |
|||
Print Quit |
|||
refresh |
|||
If feed$<>"75000" Or Aname$="" then { |
|||
\\ open messagebox, pressing cancel quit Unload |
|||
Quit=Ask("Data isn't correct")=2 |
|||
} |
|||
} |
} |
||
Method Inp1, "Move", 2000,2000, 6000, 600 |
Method Inp1, "Move", 2000,2000, 6000, 600 |