PC World Komputer 1998 January/Pcwk0198.iso/Zadarmo/CYBERCON/_SETUP.1/Ccontact.exe/0/RCDATA/TFRMINSERTEDDOC/TFRMINSERTEDDOC.txt

Text File | 1997-08-26 | 6KB | 265 lines

object frmInsertedDoc: TfrmInsertedDoc
  Left = 54
  Top = 112
  Width = 512
  Height = 333
  ActiveControl = edtDocName
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Attached Document'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 269
    Width = 504
    Height = 37
    Align = alBottom
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 304
      Top = 6
      Width = 75
      Height = 25
      TabOrder = 0
      Kind = bkOK
    end
    object BitBtn2: TBitBtn
      Left = 396
      Top = 6
      Width = 75
      Height = 25
      TabOrder = 1
      Kind = bkCancel
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 504
    Height = 269
    Align = alClient
    BevelInner = bvLowered
    BorderWidth = 4
    Caption = 'Panel2'
    TabOrder = 1
    object ScrollBox: TScrollBox
      Left = 6
      Top = 6
      Width = 492
      Height = 257
      HorzScrollBar.Margin = 6
      HorzScrollBar.Range = 348
      VertScrollBar.Margin = 6
      VertScrollBar.Range = 160
      Align = alClient
      AutoScroll = False
      BorderStyle = bsNone
      TabOrder = 0
      object Label4: TLabel
        Left = 312
        Top = 148
        Width = 28
        Height = 13
        Caption = 'Date'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label5: TLabel
        Left = 24
        Top = 8
        Width = 94
        Height = 13
        Caption = 'Document Name'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 24
        Top = 56
        Width = 34
        Height = 13
        Caption = 'Notes'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label7: TLabel
        Left = 24
        Top = 208
        Width = 57
        Height = 13
        Caption = 'File Name'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Button1: TButton
        Left = 312
        Top = 8
        Width = 153
        Height = 25
        Hint = 'Insert File From Disk'
        Caption = 'Attach File'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 312
        Top = 42
        Width = 153
        Height = 25
        Caption = 'Grab Page From Web'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = Button2Click
      end
      object GroupBox1: TGroupBox
        Left = 312
        Top = 176
        Width = 153
        Height = 73
        Caption = 'File Information'
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        object Label2: TLabel
          Left = 8
          Top = 22
          Width = 23
          Height = 13
          Caption = 'Size:'
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 8
          Top = 52
          Width = 26
          Height = 13
          Caption = 'Date:'
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object DBEdit1: TDBEdit
          Left = 48
          Top = 48
          Width = 89
          Height = 21
          DataField = 'ModiDate'
          DataSource = frmDataModule.DSDoc
          Enabled = False
          MaxLength = 0
          TabOrder = 0
        end
        object DBEdit2: TDBEdit
          Left = 48
          Top = 20
          Width = 89
          Height = 21
          DataField = 'Size'
          DataSource = frmDataModule.DSDoc
          Enabled = False
          MaxLength = 0
          TabOrder = 1
        end
      end
      object edtDatec: TwwDBComboDlg
        Left = 352
        Top = 144
        Width = 113
        Height = 21
        TabStop = False
        OnCustomDlg = edtDatecCustomDlg
        ShowButton = True
        Style = csDropDown
        DataField = 'Added'
        DataSource = frmDataModule.DSDoc
        MaxLength = 0
        TabOrder = 6
      end
      object edtDocName: TwwDBEdit
        Left = 24
        Top = 24
        Width = 241
        Height = 21
        DataField = 'Name'
        DataSource = frmDataModule.DSDoc
        MaxLength = 50
        TabOrder = 0
        WordWrap = False
      end
      object wwDBEdit2: TwwDBEdit
        Left = 24
        Top = 224
        Width = 241
        Height = 21
        DataField = 'File'
        DataSource = frmDataModule.DSDoc
        MaxLength = 100
        TabOrder = 2
        WordWrap = False
      end
      object DBMemo1: TDBMemo
        Left = 24
        Top = 72
        Width = 241
        Height = 133
        DataField = 'Notes'
        DataSource = frmDataModule.DSDoc
        TabOrder = 1
        OnDblClick = DBMemo1DblClick
      end
    end
  end
  object wwComments: TwwMemoDialog
    DataSource = frmDataModule.DSDoc
    DataField = 'Notes'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Caption = 'Notes'
    DlgLeft = 0
    DlgTop = 0
    DlgWidth = 561
    DlgHeight = 396
    Left = 114
    Top = 62
  end
end