object ChecksumForm: TChecksumForm Left = 155 Top = 175 BorderStyle = bsDialog Caption = 'Checksum' ClientHeight = 212 ClientWidth = 436 Color = clGreen Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 24 Top = 40 Width = 72 Height = 16 Caption = 'FileName:' Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object FileNameLabel: TLabel Left = 112 Top = 42 Width = 297 Height = 23 AutoSize = False Caption = 'unknown' Color = clWhite ParentColor = False OnMouseDown = FileNameLabelMouseDown end object ChecksumLabel: TLabel Left = 112 Top = 90 Width = 297 Height = 23 AutoSize = False Caption = 'unknown' Color = clWhite ParentColor = False end object Label2: TLabel Left = 24 Top = 88 Width = 76 Height = 16 Caption = 'Checksum:' Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object StartButton: TButton Left = 24 Top = 136 Width = 185 Height = 41 Caption = 'Start' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = StartButtonClick end object HideButton: TButton Left = 224 Top = 136 Width = 185 Height = 41 Caption = 'Hide' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = HideButtonClick end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Filter = 'All files|*.*|Text files|*.txt; *.doc;l *.rtf|Archives|*.zip; *.' + 'arc; *.lha; *.arj|Applications|*.exe; *.com; *.dll' Left = 408 end object Timer1: TTimer Interval = 100 OnTimer = Timer1Timer end end