1
0
mirror of https://github.com/loginov-dmitry/multithread.git synced 2025-02-17 16:10:54 +02:00
multithread/Ex10/Ex10Unit.lfm
2024-10-13 19:03:46 +03:00

117 lines
2.2 KiB
Plaintext

object Form1: TForm1
Left = 0
Height = 181
Top = 0
Width = 452
Caption = 'Form1'
ClientHeight = 181
ClientWidth = 452
Color = clBtnFace
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
OnDestroy = FormDestroy
Position = poScreenCenter
object Label1: TLabel
Left = 8
Height = 16
Top = 72
Width = 64
Caption = 'Результат:'
end
object labResult: TLabel
Left = 78
Height = 16
Top = 72
Width = 7
Caption = '0'
end
object Label2: TLabel
Left = 8
Height = 16
Top = 96
Width = 119
Caption = 'Статус вычислений:'
end
object labThreadStateInfo: TLabel
Left = 132
Height = 16
Top = 97
Width = 18
Caption = '???'
end
object Label3: TLabel
Left = 8
Height = 16
Top = 136
Width = 243
Caption = 'Число вызовов обработчика сообщения:'
end
object labPostMsgProcessCount: TLabel
Left = 257
Height = 16
Top = 136
Width = 7
Caption = '0'
end
object Label4: TLabel
Left = 8
Height = 16
Top = 118
Width = 198
Caption = 'Число отправленных сообщений:'
end
object labPostMsgCount: TLabel
Left = 212
Height = 16
Top = 118
Width = 7
Caption = '0'
end
object Label5: TLabel
Left = 8
Height = 16
Top = 157
Width = 114
Caption = 'Поток завершился:'
end
object labEndWork: TLabel
Left = 128
Height = 16
Top = 157
Width = 18
Caption = '???'
end
object btnRunInParallelThread: TButton
Left = 8
Height = 33
Top = 8
Width = 217
Caption = 'Вычислить сумму ряда чисел до:'
TabOrder = 0
OnClick = btnRunInParallelThreadClick
end
object ProgressBar1: TProgressBar
Left = 8
Height = 17
Top = 49
Width = 436
Anchors = [akTop, akLeft, akRight]
TabOrder = 1
end
object edMaxValue: TEdit
Left = 232
Height = 24
Top = 16
Width = 89
TabOrder = 2
Text = '10000000'
end
object Timer1: TTimer
Interval = 100
OnTimer = Timer1Timer
Left = 304
Top = 120
end
end