Changeset 146 for MicroThreading/Demo/UMainForm.lfm

Timestamp:

Jan 26, 2011, 7:28:29 AM (14 years ago)

Author:

george

Message:

• Fixed: Freeing micro threads on finish.

File:

• MicroThreading/Demo/UMainForm.lfm (modified) (5 diffs)

MicroThreading/Demo/UMainForm.lfm

@@ -1 +1 @@
 object Form1: TForm1
-  Left = 300
+  Left = 231
   Height = 510
-  Top = 137
-  Width = 703
+  Top = 48
+  Width = 798
   Caption = 'MicroThreading demo'
   ClientHeight = 510
-  ClientWidth = 703
+  ClientWidth = 798
   OnClose = FormClose
   OnCreate = FormCreate
@@ -24 +24 @@
     Height = 483
     Top = 24
-    Width = 386
+    Width = 481
     Anchors = [akTop, akLeft, akRight, akBottom]
     Columns = <    
       item
         Caption = 'Id'
+        Width = 40
       end    
       item
@@ -45 +46 @@
       item
         Caption = 'Execution time'
-        Width = 105
+        Width = 70
+      end    
+      item
+        Caption = 'Completion'
       end>
     OwnerData = True
@@ -58 +62 @@
     Height = 14
     Top = 8
-    Width = 85
+    Width = 74
     Caption = 'Microthread list'
     ParentColor = False
@@ -93 +97 @@
     Height = 14
     Top = 80
-    Width = 38
+    Width = 32
     Caption = 'Label2'
     ParentColor = False