You've already forked multithread
mirror of
https://github.com/loginov-dmitry/multithread.git
synced 2025-12-25 15:36:56 +02:00
55 lines
1.2 KiB
Plaintext
55 lines
1.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 0
|
|
Height = 129
|
|
Top = 0
|
|
Width = 635
|
|
Caption = 'Демонстрация программы без использования дополнительных потоков'
|
|
ClientHeight = 129
|
|
ClientWidth = 635
|
|
Color = clBtnFace
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Position = poScreenCenter
|
|
object Label1: TLabel
|
|
Left = 16
|
|
Height = 16
|
|
Top = 16
|
|
Width = 239
|
|
Caption = 'Пример 1: использование Screen.Cursor'
|
|
Font.Color = clBlue
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
ParentFont = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 16
|
|
Height = 16
|
|
Top = 88
|
|
Width = 239
|
|
Caption = 'Пример 2: использование splash-формы'
|
|
Font.Color = clBlue
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
ParentFont = False
|
|
end
|
|
object btnRun1: TButton
|
|
Left = 272
|
|
Height = 25
|
|
Top = 13
|
|
Width = 193
|
|
Caption = 'Выполнить'
|
|
TabOrder = 0
|
|
OnClick = btnRun1Click
|
|
end
|
|
object btnRun2: TButton
|
|
Left = 272
|
|
Height = 25
|
|
Top = 85
|
|
Width = 193
|
|
Caption = 'Выполнить'
|
|
TabOrder = 1
|
|
OnClick = btnRun2Click
|
|
end
|
|
end
|