Changeset 152 for MicroThreading/Demo/UMainForm.lfm

Timestamp:

Jan 27, 2011, 10:30:55 AM (14 years ago)

Author:

george

Message:

• Fixed: Wrong context restoration after return from micro thread.
• Add: Option of TMicroThreadScheduler to set use or not use main thread for scheduling.

File:

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

MicroThreading/Demo/UMainForm.lfm

@@ -17 +17 @@
     Top = 8
     Width = 761
-    ActivePage = TabSheet1
+    ActivePage = TabSheet2
     Anchors = [akTop, akLeft, akRight, akBottom]
-    TabIndex = 0
+    TabIndex = 1
     TabOrder = 0
     object TabSheet1: TTabSheet
@@ -58 +58 @@
         MaxValue = 100000
         MinValue = 1
+        TabStop = False
         TabOrder = 2
-        Value = 200
+        Value = 2
       end
       object Memo1: TMemo
@@ -95 +96 @@
         OnChange = SpinEdit3Change
         TabOrder = 5
-        Value = 100000
+        Value = 1000000
       end
     end
@@ -244 +245 @@
           TabOrder = 1
         end
+        object CheckBoxUseMainThread: TCheckBox
+          Left = 10
+          Height = 17
+          Top = 64
+          Width = 98
+          Caption = 'Use main thread'
+          OnChange = CheckBoxUseMainThreadChange
+          TabOrder = 2
+        end
       end
     end