Enabling Authentication
procedure TUniServerModule.UniGUIServerModuleControlPanelLogin(
ASession: TUniGUISession; const AUser, APassword: string;
var LoginValid: Boolean; LoginAttempt: Integer);
begin
if (AUser = 'admin user') and (APassword = 'strong pwd') then
begin
LoginValid := True;
end;
end;
Atualizado