Подскажите, насколько потокобезопасно использовать такой код в web модуле DataSnap WebBroker server-а при большом кол-ве соединений:
void __fastcall TWebModule1::WebModule1DefaultHandlerAction(TObject *Sender, TWebRequest *Request,
TWebResponse *Response, bool &Handled)
{
if(Request->ServerPort == 9999)
{
FDQuery1->Open();
FDQuery1->First();
String one = "";
while (!FDQuery1->Eof)
{
one = one + " " + FDQuery1->FieldByName("onecol")->AsString;
FDQuery1->Next();
}
FDQuery1->Close();
Response->ContentType = "text/html; charset=windows-1251";
Response->Content =
""
"Show WebPage"
"Show WebPage" + one + ""
"";
}
if(Request->ServerPort == 9990)
//другой FDQuery2 делает INSERT в базу...
}