Привет! Можете ли вы помочь мне отладить этот код пользователя? Это в Vijeo Citect v7.3. это единственная ошибка, остающаяся до компиляции существующей программы. Пожалуйста, помогите.
Ошибка: неверное количество аргументов для функции
Контекст: строка [43]: sPassword) {=} 0 THEN;
INT
FUNCTION
UDS_LoginForm(STRING sName="", STRING sPassword="")
INT bDone;
INT nStatus;
INT hForm;
IF UserInfo(1)<> "" THEN
FormNew("@(Login Message)", 35, 4, 29);
FormPrompt(1, 0, "Are You Sure To Logout Current User ?");
FormButton(1,2, " Yes ",0,1);
FormButton(22,2," Cancel ",0,2);
IF FormRead(0) = 0 THEN
Logout();
WinGoto(0);
PageHome();
WinGoto(1);
PageHome();
UDS_LoginForm();
END
ELSE
bDone = FALSE;
WHILE bDone = FALSE DO
FormNew("@(Login Form)", 35, 5, 29);
FormPrompt(1, 0, "@(Name)");
FormInput(16, 0, "", sName, 16);
FormPrompt(1, 2, "@(Password)");
FormSecurePassword(18, 2, "", sPassword, 16);
FormButton( 6, 4, " " + "@(OK)" + " ", 0, 1);
FormButton(20, 4, "@(Cancel)", 0, 2);
IF FormRead(0) = 0 THEN
hForm = FormNew("@(User Login)", 36, 1, 8 + 16 + 128 + 256);
FormPrompt(1, 0, "@(Authentication in progress ...)");
FormRead(1);
SleepMS(200);
IF UserLogin(sName, sPassword) = 0 THEN;
bDone = TRUE;
nStatus = 0;
ELSE
sPassword = "";
END
IF FormActive(hForm) THEN
FormDestroy(hForm);
END
ELSE
bDone = TRUE;
nStatus = 298;
END
END
END
RETURN nStatus;
END
Спасибо!