Home Explore Help
Sign In
pascal
/
QuickLib
mirror of https://github.com/exilon/QuickLib
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

sample updated

Unknown 5 years ago
parent
9217ae7e41
commit
253ec8a1d2
1 changed files with 1 additions and 0 deletions
Split View Show Diff Stats
  1. 1 0
      samples/delphi/QuickThreads/BackgroundTasks/RunBackgroundtask.dpr

+ 1 - 0
samples/delphi/QuickThreads/BackgroundTasks/RunBackgroundtask.dpr
View File 

@@ -81,6 +81,7 @@ begin
 
     backgroundtasks.Start;
 
     cout('Running tasks in background!',etInfo);
 
     ConsoleWaitForEnterKey;
 
+    coutFmt('Task gueue size = %d',[backgroundtasks.TaskQueued],etInfo);
 
     backgroundtasks.Free;
 
     cout('finished tasks!!!!',etInfo);
 
   except