Online Praxis 1997 February/OP2_97.BIN/cd-rom/tools/email/pronto/family.z/FAMILY.exe/0/RCDATA/TFORM2/TFORM2.txt

Text File | 1997-01-13 | 14KB | 669 lines

object Form2: TForm2
  Left = 370
  Top = 108
  BorderStyle = bsNone
  Caption = 'Pronto Family'
  ClientHeight = 545
  ClientWidth = 769
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Position = poScreenCenter
  Scaled = False
  OnClick = FormClick
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 0
    Top = 0
    Width = 640
    Height = 480
    AutoSize = True
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = attach1MouseDown
  end
  object imgView: TImage
    Left = 21
    Top = 111
    Width = 107
    Height = 101
    Cursor = 18
    Stretch = True
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgViewMouseDown
  end
  object Image2: TImage
    Left = 506
    Top = 19
    Width = 125
    Height = 63
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = Image2MouseDown
  end
  object ToolRecordWav: TImage
    Tag = 2
    Left = 35
    Top = 226
    Width = 98
    Height = 43
    Cursor = 18
    OnClick = ToolRecordWavClick
    OnDragOver = NotAcceptedDragOver
  end
  object ToolPrint: TImage
    Left = 174
    Top = 231
    Width = 46
    Height = 30
    Cursor = 18
    OnClick = ToolPrintClick
    OnDragOver = NotAcceptedDragOver
  end
  object ToolZoom: TImage
    Left = 172
    Top = 176
    Width = 49
    Height = 31
    Cursor = 18
    Stretch = True
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ToolZoomMouseDown
  end
  object ToolSend: TImage
    Tag = 2
    Left = 516
    Top = 131
    Width = 86
    Height = 52
    Cursor = 18
    OnMouseDown = ToolSendMouseDown
  end
  object AttachBmp: TImage
    Left = 41
    Top = 487
    Width = 54
    Height = 16
    AutoSize = True
    Picture.Data = {<image000.bmp>}
    Visible = False
  end
  object AttachMid: TImage
    Left = 177
    Top = 486
    Width = 53
    Height = 16
    AutoSize = True
    Picture.Data = {<image001.bmp>}
    Visible = False
  end
  object AttachWav: TImage
    Left = 103
    Top = 486
    Width = 53
    Height = 15
    AutoSize = True
    Picture.Data = {<image002.bmp>}
    Visible = False
  end
  object ToolFont: TImage
    Left = 172
    Top = 205
    Width = 47
    Height = 26
    Cursor = 18
    Stretch = True
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ToolFontMouseDown
  end
  object MsgFrom: TLabel
    Left = 247
    Top = 114
    Width = 228
    Height = 25
    AutoSize = False
    Caption = 'MsgFrom'
    Transparent = True
    Visible = False
    OnMouseDown = MsgFromMouseDown
  end
  object msgSubjectFrom: TLabel
    Left = 266
    Top = 147
    Width = 209
    Height = 22
    AutoSize = False
    Caption = 'msgSubjectFrom'
    ShowAccelChar = False
    Transparent = True
    Visible = False
    OnMouseDown = msgSubjectFromMouseDown
  end
  object ToolRecordAvi: TImage
    Tag = 2
    Left = 0
    Top = 279
    Width = 130
    Height = 63
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ToolRecordAviMouseDown
  end
  object ImgAttach: TImage
    Tag = 2
    Left = 170
    Top = 259
    Width = 54
    Height = 37
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ImgAttachMouseDown
  end
  object AttachDefault: TImage
    Left = 106
    Top = 504
    Width = 53
    Height = 15
    AutoSize = True
    Picture.Data = {<image003.bmp>}
  end
  object toolReply: TImage
    Left = 523
    Top = 143
    Width = 78
    Height = 53
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = toolReplyMouseDown
  end
  object toolForward: TImage
    Left = 526
    Top = 263
    Width = 79
    Height = 53
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = toolForwardMouseDown
  end
  object AttachAvi: TImage
    Left = 44
    Top = 506
    Width = 53
    Height = 15
    AutoSize = True
    Picture.Data = {<image004.bmp>}
    Visible = False
  end
  object imgRecentAddr: TImage
    Tag = 2
    Left = 450
    Top = 112
    Width = 26
    Height = 24
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgRecentAddrMouseDown
  end
  object imgZoomImage: TImage
    Left = 37
    Top = 104
    Width = 77
    Height = 82
    Cursor = 18
    OnClick = imgZoomImageClick
    OnDragOver = NotAcceptedDragOver
  end
  object imgAddressBook: TImage
    Left = 529
    Top = 228
    Width = 68
    Height = 86
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgAddressBookMouseDown
  end
  object imgTo: TImage
    Left = 167
    Top = 111
    Width = 35
    Height = 25
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgToMouseDown
  end
  object imgGreeting: TImage
    Left = 39
    Top = 3
    Width = 71
    Height = 63
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgGreetingMouseDown
  end
  object imgViewNext: TImage
    Left = 477
    Top = 119
    Width = 19
    Height = 15
    Cursor = 18
    AutoSize = True
    Picture.Data = {<image005.bmp>}
    Visible = False
    OnMouseDown = imgViewNextMouseDown
  end
  object imgViewPrev: TImage
    Left = 151
    Top = 118
    Width = 16
    Height = 15
    Cursor = 18
    AutoSize = True
    Picture.Data = {<image006.bmp>}
    Visible = False
    OnMouseDown = imgViewPrevMouseDown
  end
  object imgTaskTrash: TImage
    Left = 170
    Top = 336
    Width = 22
    Height = 21
    Cursor = 18
    OnDragOver = AcceptedDragOver
    OnMouseDown = imgTaskTrashMouseDown
  end
  object imgTaskDrower1: TImage
    Left = 194
    Top = 270
    Width = 25
    Height = 22
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgTaskDrower1MouseDown
  end
  object ImgTaskDrower2: TImage
    Left = 195
    Top = 292
    Width = 23
    Height = 21
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ImgTaskDrower2MouseDown
  end
  object ImgTaskDrower3: TImage
    Left = 194
    Top = 313
    Width = 25
    Height = 22
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ImgTaskDrower3MouseDown
  end
  object ImgTaskDrower4: TImage
    Left = 194
    Top = 336
    Width = 23
    Height = 21
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = ImgTaskDrower4MouseDown
  end
  object lblHelpImgFileName: TLabel
    Left = 680
    Top = 18
    Width = 100
    Height = 13
    Caption = 'lblHelpImgFileName'
    Color = clWhite
    ParentColor = False
    Visible = False
  end
  object imgHelpSleep: TImage
    Left = 481
    Top = 344
    Width = 158
    Height = 77
    Cursor = 18
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = imgHelpSleepMouseDown
    OnMouseMove = imgHelpSleepMouseMove
  end
  object imgExit: TImage
    Left = 445
    Top = 410
    Width = 192
    Height = 68
    Cursor = 18
    OnClick = imgExitClick
    OnDragOver = NotAcceptedDragOver
  end
  object imgNewMessage: TImage
    Left = 7
    Top = 21
    Width = 121
    Height = 60
    Cursor = 18
    OnMouseDown = imgNewMessageMouseDown
  end
  object attach1: TImage
    Left = 485
    Top = 120
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach1MouseDown
    OnMouseMove = attach1MouseMove
  end
  object attach2: TImage
    Left = 484
    Top = 146
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach2MouseDown
    OnMouseMove = attach2MouseMove
  end
  object attach3: TImage
    Left = 478
    Top = 175
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach3MouseDown
    OnMouseMove = attach3MouseMove
  end
  object attach4: TImage
    Left = 477
    Top = 200
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach4MouseDown
    OnMouseMove = attach4MouseMove
  end
  object attach5: TImage
    Left = 481
    Top = 230
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach5MouseDown
    OnMouseMove = attach5MouseMove
  end
  object attach6: TImage
    Left = 480
    Top = 259
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach6MouseDown
    OnMouseMove = attach6MouseMove
  end
  object attach7: TImage
    Left = 480
    Top = 286
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach7MouseDown
    OnMouseMove = attach7MouseMove
  end
  object attach8: TImage
    Left = 480
    Top = 313
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach8MouseDown
    OnMouseMove = attach8MouseMove
  end
  object attach9: TImage
    Left = 478
    Top = 342
    Width = 49
    Height = 16
    Cursor = 18
    Visible = False
    OnClick = attachClick
    OnDragOver = NotAcceptedDragOver
    OnEndDrag = attachEndDrag
    OnMouseDown = attach9MouseDown
    OnMouseMove = attach9MouseMove
  end
  object AttachHtml: TImage
    Left = 177
    Top = 506
    Width = 53
    Height = 15
    AutoSize = True
    Picture.Data = {<image007.bmp>}
    Visible = False
  end
  object AttachDcr: TImage
    Left = 36
    Top = 548
    Width = 53
    Height = 15
    AutoSize = True
    Picture.Data = {<image008.bmp>}
    Visible = False
  end
  object imgHelp: TImage
    Left = 620
    Top = 2
    Width = 18
    Height = 17
    Cursor = 18
    AutoSize = True
    Picture.Data = {<image009.bmp>}
    OnMouseDown = imgHelpMouseDown
    OnMouseUp = imgHelpMouseUp
  end
  object imgMinimize: TImage
    Left = 600
    Top = 2
    Width = 18
    Height = 17
    Cursor = 18
    AutoSize = True
    Picture.Data = {<image010.bmp>}
    OnMouseDown = imgMinimizeMouseDown
    OnMouseUp = imgMinimizeMouseUp
  end
  object Label1: TLabel
    Left = 352
    Top = 284
    Width = 65
    Height = 17
    Caption = 'Label1'
  end
  object PrevAdd: TImage
    Left = 140
    Top = 14
    Width = 17
    Height = 69
    Picture.Data = {<image011.bmp>}
    OnMouseDown = PrevAddMouseDown
  end
  object NextAdd: TImage
    Left = 480
    Top = 14
    Width = 17
    Height = 69
    Picture.Data = {<image012.bmp>}
    OnMouseDown = NextAddMouseDown
  end
  object MsgSubject: TEdit
    Tag = 2
    Left = 266
    Top = 146
    Width = 209
    Height = 20
    AutoSize = False
    BorderStyle = bsNone
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnMouseDown = MsgSubjectMouseDown
  end
  object MsgTo: TEdit
    Tag = 2
    Left = 211
    Top = 114
    Width = 234
    Height = 21
    AutoSize = False
    BorderStyle = bsNone
    TabOrder = 0
    Text = 'Internet@address'
    OnMouseDown = MsgToMouseDown
  end
  object FlicPlayer1: TFlicPlayer
    Left = 424
    Top = 352
    Width = 5
    Height = 5
    Cursor = 18
    FlicTransIndex = 144
    FlicTransparent = True
    FlicAutoSpeed = True
    FlicFrameDelay = 72
    FlicPlayLoop = False
    TabOrder = 8
    OnMouseDown = FlicPlayer1MouseDown
    OnMouseMove = imgHelpSleepMouseMove
  end
  object MemoTemp: TMemo
    Left = 7
    Top = 480
    Width = 26
    Height = 26
    TabOrder = 3
    Visible = False
  end
  object MediaPlayer1: TMediaPlayer
    Left = 266
    Top = 484
    Width = 253
    Height = 20
    DeviceType = dtWaveAudio
    Visible = False
    TabOrder = 4
  end
  object ColorTempEdit: TEdit
    Left = 532
    Top = 488
    Width = 109
    Height = 17
    BorderStyle = bsNone
    Color = clWhite
    TabOrder = 5
    Visible = False
  end
  object MediaPlayer2: TMediaPlayer
    Left = 266
    Top = 512
    Width = 253
    Height = 20
    DeviceType = dtSequencer
    Visible = False
    TabOrder = 6
  end
  object listAddresses: TListBox
    Left = 523
    Top = 513
    Width = 130
    Height = 22
    ItemHeight = 13
    TabOrder = 7
    Visible = False
  end
  object RchEdt_FormatedToPrint: TRichEdit
    Left = 17
    Top = 376
    Width = 46
    Height = 38
    Cursor = 18
    Lines.Strings = (
      'RchEdt'
      '_Format'
      'edToPri'
      'nt')
    TabOrder = 9
    Visible = False
  end
  object MsgBody: TRichEdit
    Left = 219
    Top = 175
    Width = 256
    Height = 184
    ScrollBars = ssBoth
    TabOrder = 2
    OnChange = MsgBodyChange
    OnDragOver = NotAcceptedDragOver
    OnMouseDown = MsgBodyMouseDown
  end
  object PlayerNetvetAvi: TMediaPlayer
    Left = 6
    Top = 522
    Width = 253
    Height = 20
    TabOrder = 10
    OnNotify = PlayerNetvetAviNotify
  end
  object ShockdllTV: TShockdll
    Left = 15
    Top = 255
    Width = 120
    Height = 110
  end
  object ShockdllBanner: TShockdll
    Left = 158
    Top = 16
    Width = 320
    Height = 65
    Cursor = 18
  end
end