main.dfm

这是一套全面的网络组件

object Form1: TForm1
  Left = 247
  Top = 55
  BorderStyle = bsDialog
  Caption = 'Resuming of the downloading Sample'
  ClientHeight = 191
  ClientWidth = 371
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object clProgressBar1: TclProgressBar
    Left = 10
    Top = 165
    Width = 350
    Height = 16
    InternetControl = DownLoader
  end
  object Label1: TLabel
    Left = 12
    Top = 75
    Width = 22
    Height = 13
    Caption = 'URL'
  end
  object Label2: TLabel
    Left = 11
    Top = 100
    Width = 47
    Height = 13
    Caption = 'File Name'
  end
  object Label3: TLabel
    Left = 14
    Top = 8
    Width = 347
    Height = 47
    AutoSize = False
    Caption = 
      'This Demo demonstrates how to store and then load the downloadin' +
      'g state. Please try to start the downloading and then stop it be' +
      'fore the process has completed.'
    WordWrap = True
  end
  object btnStart: TButton
    Left = 202
    Top = 130
    Width = 75
    Height = 25
    Caption = 'Start'
    TabOrder = 2
    OnClick = btnStartClick
  end
  object btnStop: TButton
    Left = 284
    Top = 130
    Width = 75
    Height = 25
    Caption = 'Stop'
    TabOrder = 3
    OnClick = btnStopClick
  end
  object edtFileName: TEdit
    Left = 64
    Top = 98
    Width = 295
    Height = 21
    TabOrder = 1
    OnChange = edtFileNameChange
  end
  object edtURL: TEdit
    Left = 64
    Top = 70
    Width = 295
    Height = 21
    TabOrder = 0
    OnChange = edtURLChange
  end
  object DownLoader: TclDownLoader
    URL = 'http://www.clevercomponents.com/images/testimage.jpg'
    LocalFile = 'C:\testimage.jpg'
    LocalFolder = 'C:\'
    InternetAgent = 'Mozilla/4.0 (compatible; Clever Internet Suite)'
    OnStatusChanged = DownLoaderStatusChanged
    OnChanged = DownLoaderChanged
    Left = 58
    Top = 125
  end
end