books/multithread
1
0
Fork 0
mirror of https://github.com/loginov-dmitry/multithread.git synced 2025-12-27 15:58:29 +02:00
Code Issues Releases Activity

ExNotUseThreads converted to Lazarus

Browse Source
This commit is contained in:
loginov-dmitry
2024-10-13 22:05:53 +03:00
parent 24eae91b2b
commit 256754754e
9 changed files with 225 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
ExNotUseThreads/NotUseThreadsUnit.lfm Normal file
View File

@@ -0,0 +1,54 @@
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