www.pudn.com > Indy10_New_Demo.rar > Main.dfm
object formMain: TformMain
Left = 265
Top = 207
Width = 612
Height = 311
ActiveControl = butnStart
Caption = 'Server Scheduler Demo'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object butnStart: TButton
Left = 184
Top = 16
Width = 75
Height = 25
Caption = 'Start'
Default = True
TabOrder = 0
OnClick = butnStartClick
end
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 169
Height = 145
Caption = 'Scheduler'
TabOrder = 1
object Label2: TLabel
Left = 8
Top = 85
Width = 28
Height = 13
Caption = 'Fibers'
end
object Label1: TLabel
Left = 10
Top = 21
Width = 39
Height = 13
Caption = 'Threads'
end
object rbtnFiberSingleThread: TRadioButton
Left = 8
Top = 101
Width = 153
Height = 17
Caption = '&Single Thread - Standard IO'
TabOrder = 0
end
object rbtnThreadPool: TRadioButton
Left = 8
Top = 53
Width = 113
Height = 17
Caption = '&Pooled'
TabOrder = 1
end
object rbtnThread: TRadioButton
Left = 8
Top = 37
Width = 113
Height = 17
Caption = '&Default'
TabOrder = 2
end
object radoFiberSingleThreadChain: TRadioButton
Left = 8
Top = 117
Width = 137
Height = 17
Caption = 'Single Thread - &Chain'
Checked = True
TabOrder = 3
TabStop = True
end
end
object memoLog: TMemo
Left = 0
Top = 160
Width = 604
Height = 117
Align = alBottom
ReadOnly = True
TabOrder = 2
end
object butnStop: TButton
Left = 184
Top = 48
Width = 75
Height = 25
Cancel = True
Caption = 'Stop'
TabOrder = 3
OnClick = butnStopClick
end
object tcpsTest: TIdTCPServer
Bindings = <>
DefaultPort = 6000
OnConnect = tcpsTestConnect
OnExecute = tcpsTestExecute
Left = 24
Top = 168
end
object schdThread: TIdSchedulerOfThreadDefault
MaxThreads = 0
Left = 96
Top = 168
end
object schdThreadPool: TIdSchedulerOfThreadPool
MaxThreads = 0
PoolSize = 5
Left = 168
Top = 168
end
object indySchedulerOfFiberAlone: TIdSchedulerOfFiber
Left = 264
Top = 168
end
object indySchedulerOfFiber: TIdSchedulerOfFiber
FiberWeaver = indyFiberWeaverThreaded
Left = 320
Top = 8
end
object indyIOHChain: TIdServerIOHandlerChain
ChainEngine = indyChainEngine
Left = 480
Top = 16
end
object indyChainEngine: TIdChainEngine
Left = 480
Top = 64
end
object indyFiberWeaverThreaded: TIdFiberWeaverThreaded
ThreadScheduler = indyThreadPoolForFibers
Left = 320
Top = 56
end
object indyThreadPoolForFibers: TIdSchedulerOfThreadPool
MaxThreads = 0
Left = 320
Top = 104
end
end