Error on starting debugserver
lazarus / 12-Debugger

----------------------------------------------------------------------
Soner · 2020-08-20 12:55

I get the error "This operation is illegal when the server is active"
when i start the debugserver from tools folder.
I made following changes in frmmain.pas and now it starts without
error.
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TMainForm.StartServer;begin  //i added to the next line "self",
 because if the debugserver crashes,   // then FSrv will be not freed
and you have ghost task  FSrv:=TSimpleIPCServer.Create(self);  //
original was: FSrv:=TSimpleIPCServer.Create(Nil); 
FSrv.ServerID:=DebugServerID;  FSrv.Global:=True;  //comment out the
next line because it cause the error.  //FSrv.Active:=True; 
FSrv.StartServer;  Application.OnIdle:=@CheckMessages; 
ITMessages.Enabled:=True;end;  
I have lazarus 2.0.10. but this code is same with svn-version and
lazarus 1.8.
May the code from TSimpleIPCServer is changed.

Maybe someone can change it in offical sources, when my solution is
correct.

Edit:
Created patch for this failure.