[ALLY] Double popup
From: greg_piney::mcgraw-hill::com at: 25-Apr-2001 15:00
I resurrected an old script and tried it out with View 1.1(windows).
I define a popup as a function then execute the function.
I get 2 windows to popup?????????????
Here is the short version of the code:
login-popup: func [ view layout [
title " Administrator Login"
name "Login: " admin-name: inp 100x24
button "OK!" [ftpadm: admin-name/text
print reduce [ "pw = " admin-pw/data ]
if admin-ok = "true" [
name "Password:" admin-pw: password hide 100x24
button "Cancel" [quit ]
/* lots of other code here */
*** end of code
Standard and Poor's Web Engineering