mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 00:40:03 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			98 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			98 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
object NewHTTPApplicationForm: TNewHTTPApplicationForm
 | 
						|
  Left = 521
 | 
						|
  Height = 310
 | 
						|
  Top = 280
 | 
						|
  Width = 384
 | 
						|
  Caption = 'New HTTP server application'
 | 
						|
  ClientHeight = 310
 | 
						|
  ClientWidth = 384
 | 
						|
  OnCreate = FormCreate
 | 
						|
  LCLVersion = '0.9.31'
 | 
						|
  object DEDocumentroot: TDirectoryEdit
 | 
						|
    Left = 40
 | 
						|
    Height = 22
 | 
						|
    Top = 128
 | 
						|
    Width = 272
 | 
						|
    DialogTitle = 'Select directory'
 | 
						|
    ShowHidden = False
 | 
						|
    ButtonWidth = 23
 | 
						|
    NumGlyphs = 0
 | 
						|
    Enabled = False
 | 
						|
    MaxLength = 0
 | 
						|
    TabOrder = 0
 | 
						|
  end
 | 
						|
  object CBRegisterFiles: TCheckBox
 | 
						|
    Left = 16
 | 
						|
    Height = 21
 | 
						|
    Top = 14
 | 
						|
    Width = 228
 | 
						|
    Caption = 'Register location to serve files from'
 | 
						|
    OnChange = CBRegisterFilesChange
 | 
						|
    TabOrder = 1
 | 
						|
  end
 | 
						|
  object SEPort: TSpinEdit
 | 
						|
    Left = 40
 | 
						|
    Height = 22
 | 
						|
    Top = 192
 | 
						|
    Width = 98
 | 
						|
    MaxValue = 65355
 | 
						|
    TabOrder = 2
 | 
						|
    Value = 8080
 | 
						|
  end
 | 
						|
  object ButtonPanel1: TButtonPanel
 | 
						|
    Left = 6
 | 
						|
    Height = 34
 | 
						|
    Top = 270
 | 
						|
    Width = 372
 | 
						|
    OKButton.Name = 'OKButton'
 | 
						|
    HelpButton.Name = 'HelpButton'
 | 
						|
    CloseButton.Name = 'CloseButton'
 | 
						|
    CancelButton.Name = 'CancelButton'
 | 
						|
    TabOrder = 3
 | 
						|
    ShowButtons = [pbOK, pbCancel]
 | 
						|
  end
 | 
						|
  object LSEPort: TLabel
 | 
						|
    Left = 22
 | 
						|
    Height = 15
 | 
						|
    Top = 160
 | 
						|
    Width = 153
 | 
						|
    Caption = 'Port to listen for requests:'
 | 
						|
    FocusControl = SEPort
 | 
						|
    ParentColor = False
 | 
						|
  end
 | 
						|
  object ELocation: TEdit
 | 
						|
    Left = 40
 | 
						|
    Height = 22
 | 
						|
    Top = 72
 | 
						|
    Width = 80
 | 
						|
    Enabled = False
 | 
						|
    TabOrder = 4
 | 
						|
  end
 | 
						|
  object LELocation: TLabel
 | 
						|
    Left = 40
 | 
						|
    Height = 15
 | 
						|
    Top = 48
 | 
						|
    Width = 52
 | 
						|
    Caption = 'Location:'
 | 
						|
    FocusControl = ELocation
 | 
						|
    ParentColor = False
 | 
						|
  end
 | 
						|
  object LDEDocumentRoot: TLabel
 | 
						|
    Left = 40
 | 
						|
    Height = 15
 | 
						|
    Top = 104
 | 
						|
    Width = 52
 | 
						|
    Caption = '&Directory'
 | 
						|
    FocusControl = DEDocumentroot
 | 
						|
    ParentColor = False
 | 
						|
  end
 | 
						|
  object CBthreads: TCheckBox
 | 
						|
    Left = 24
 | 
						|
    Height = 21
 | 
						|
    Top = 232
 | 
						|
    Width = 213
 | 
						|
    Caption = 'Use threads to serve requests in'
 | 
						|
    TabOrder = 5
 | 
						|
  end
 | 
						|
end
 |