fix, DCD client could cause the app to hang

This commit is contained in:
Basile Burg 2015-03-24 02:29:01 +01:00
parent 34c2477541
commit 269fd1be21
1 changed files with 0 additions and 4 deletions

View File

@ -238,7 +238,6 @@ begin
fClient.Parameters.Add(intToStr(fDoc.SelStart - 1));
fClient.Parameters.Add(fDoc.tempFilename);
fClient.Execute;
waitClient;
//
fTempLines.LoadFromStream(fClient.Output);
if fTempLines.Count = 0 then exit;
@ -266,7 +265,6 @@ begin
fClient.Parameters.Add(intToStr(fDoc.SelStart - 1));
fClient.Parameters.Add(fDoc.tempFilename);
fClient.Execute;
waitClient;
//
fTempLines.LoadFromStream(fClient.Output);
if fTempLines.Count = 0 then exit;
@ -320,7 +318,6 @@ begin
fClient.Parameters.Add(intToStr(i - 1));
fClient.Parameters.Add(fDoc.tempFilename);
fClient.Execute;
waitClient;
//
aComment := '';
fTempLines.LoadFromStream(fClient.Output);
@ -345,7 +342,6 @@ begin
fClient.Parameters.Add(intToStr(fDoc.SelStart - 1));
fClient.Parameters.Add(fDoc.tempFilename);
fClient.Execute;
waitClient;
//
str := 'a';
setlength(str, 256);