object FrmQuickPics: TFrmQuickPics Left = 296 Top = 198 BorderIcons = [biSystemMenu] BorderStyle = bsToolWindow Caption = 'Quick Pics' ClientHeight = 226 ClientWidth = 313 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] FormStyle = fsStayOnTop OnClose = FormClose PixelsPerInch = 96 TextHeight = 16 object FileListBox: TFileListBox Left = 8 Top = 8 Width = 145 Height = 209 Hint = 'Drag a filename and drop it into'#13#10'an open document to create an'#13 + #10'image/figure tag at the location'#13#10'of the textcursor' Ctl3D = True DragMode = dmAutomatic Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 16 Mask = '*.gif;*.jpg;*.bmp;*.png;*.jpeg' ParentCtl3D = False ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 end object DirectoryListBox: TDirectoryListBox Left = 160 Top = 7 Width = 145 Height = 113 FileList = FileListBox Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 1 end object DriveComboBox: TDriveComboBox Left = 160 Top = 128 Width = 145 Height = 21 DirList = DirectoryListBox Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object gbInsertInlined: TGroupBox Left = 160 Top = 152 Width = 145 Height = 65 Hint = 'Decide whether the file should be inserted either as an image or' + ' an inline figure' Caption = ' &Insert inlined ' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 object rbImage: TRadioButton Left = 8 Top = 16 Width = 49 Height = 17 Caption = 'I&mage' Checked = True TabOrder = 0 TabStop = True end object rbFigure: TRadioButton Left = 8 Top = 40 Width = 49 Height = 17 Caption = '&Figure' TabOrder = 1 end end end