Leaderboard

taskkill /f /im $(OUTPUTFILENAME) 2>1 || exit /B 0

+ in addition you need to disable "Cancel on Error" my command looks like this

No, it is just another Node. NodeZero indicates that this Node Id is equal to zero. NodeZero also has a special purpose. If you set "persistent_node_zero" to true, it will ensure that Node zero will always be available and running, so you can execute part of your code in that Node which requires continuous availability. Such as a Thread Timer which executes special tasks in certain time intervals.

сейчас попробую еще раз большое спасибо

I have tested. Confirmed.

Hi We are actively working on HyperServer for Linux at the moment.

Hi, Everytime we recompile application, you must close in traybar and refresh browser page. The tip will automatically close application and start a new page in default browser. In Project, Options, Build Events,Pre-Build, write command: taskkill /F /IM program.exe /T procedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject); begin if self.StandAloneServer then //if you need this, if not, remove it. ExploreWeb('http://localhost:8077'); //auto start browser end; procedure ExploreWeb(page:PChar); var Returnvalue: integer; begin ReturnValue := ShellExecute(0, 'open', page, nil, nil,SW_SHOWNORMAL); if ReturnValue <= 32 then begin case Returnvalue of 0 : MessageBox(0,'Error: Out of memory','Error',0); ERROR_FILE_NOT_FOUND: MessageBox(0,'Error: File not found','Error',0); ERROR_PATH_NOT_FOUND: MessageBox(0,'Error: Directory not found','Error',0); ERROR_BAD_FORMAT : MessageBox(0,'Error: Wrong format in EXE','Error',0); else MessageBox(0,PChar('Error Nr: '+IntToStr(Returnvalue)+' inShellExecute'),'Error',0) end; end; end; procedure TFMainForm.UniFormShow(Sender: TObject); begin //show frame/form to login only if we are not debuging... if (DebugHook = 0) then begin FLogin.ShowModal; ... end; end;

Thanks, that other thread was "interesting" to read. The following looks better than AddJS: UniSession.UrlRedirect(EDT_Url.Text);