Function

TfrmTemplateFields.ValidInsert

Module

fTemplateFields

Last Modified

7/15/2014 3:26:44 PM

Visibility

Private

Owner

TfrmTemplateFields

Declaration

function ValidInsert: boolean;

Called-By Hierarchy


                           TfrmTemplateFields.ValidInsert
                  TfrmTemplateFields.cboObjectsDblClick┤ 
                        TfrmTemplateFields.UpdateStatus┤ 
                             TfrmTemplateFields.Setre┤ │ 
         TfrmTemplateFieldEditor.edtpopControlEnter┤ │ │ 
TfrmTemplateFieldEditor.mnuInsertTemplateFieldClick┤ │ │ 
           TfrmTemplateEditor.mnuBPInsertFieldClick┘ │ │ 
                 TfrmTemplateEditor.tvTreeKeyDown┘   │ │ 
              TfrmTemplateEditor.UpdateInsertsDialogs┘ │ 
                  TfrmTemplateEditor.EnableControls┤   │ 
                  TfrmTemplateEditor.tvTreeChange┘ │   │ 
               TfrmTemplateEditor.cbActiveClick┤   │   │ 
                 TfrmTemplateEditor.tvTreeEnter┤   │   │ 
               TfrmTemplateEditor.cbShHideClick┤   │   │ 
             TfrmTemplateEditor.cbActiveClick┘ │   │   │ 
              TfrmTemplateEditor.cbPerHideClick┤   │   │ 
             TfrmTemplateEditor.cbActiveClick┘ │   │   │ 
               TfrmTemplateEditor.sbDeleteClick┤   │   │ 
        TfrmTemplateEditor.mnuNodeDeleteClick┤ │   │   │ 
             TfrmTemplateEditor.tvTreeKeyDown┘ │   │   │ 
                      TfrmTemplateEditor.Resync┤   │   │ 
               TfrmTemplateEditor.btnNewClick┤ │   │   │ 
                              EditTemplates┤ │ │   │   │ 
      TfrmDCSumm.popSummMemoTemplateClick┤ │ │ │   │   │ 
           TfrmDCSumm.mnuNewTemplateClick┤ │ │ │   │   │ 
         TfrmDCSumm.mnuEditTemplatesClick┤ │ │ │   │   │ 
   TfrmDCSumm.mnuEditSharedTemplatesClick┤ │ │ │   │   │ 
     TfrmDCSumm.mnuNewSharedTemplateClick┤ │ │ │   │   │ 
    TfrmConsults.popNoteMemoTemplateClick┤ │ │ │   │   │ 
       TfrmConsults.mnuEditTemplatesClick┤ │ │ │   │   │ 
         TfrmConsults.mnuNewTemplateClick┤ │ │ │   │   │ 
 TfrmConsults.mnuEditSharedTemplatesClick┤ │ │ │   │   │ 
   TfrmConsults.mnuNewSharedTemplateClick┤ │ │ │   │   │ 
        TfrmDrawers.mnuEditTemplatesClick┤ │ │ │   │   │ 
          TfrmDrawers.mnuNewTemplateClick┤ │ │ │   │   │ 
     TfrmSurgery.popNoteMemoTemplateClick┤ │ │ │   │   │ 
        TfrmSurgery.mnuEditTemplatesClick┤ │ │ │   │   │ 
          TfrmSurgery.mnuNewTemplateClick┤ │ │ │   │   │ 
  TfrmSurgery.mnuEditSharedTemplatesClick┤ │ │ │   │   │ 
    TfrmSurgery.mnuNewSharedTemplateClick┤ │ │ │   │   │ 
       TfrmNotes.popNoteMemoTemplateClick┤ │ │ │   │   │ 
          TfrmNotes.mnuEditTemplatesClick┤ │ │ │   │   │ 
            TfrmNotes.mnuNewTemplateClick┤ │ │ │   │   │ 
    TfrmNotes.mnuEditSharedTemplatesClick┤ │ │ │   │   │ 
      TfrmNotes.mnuNewSharedTemplateClick┘ │ │ │   │   │ 
         TfrmTemplateEditor.mnuAutoGenClick┤ │ │   │   │ 
  TfrmTemplateEditor.mnuImportTemplateClick┘ │ │   │   │ 
             TfrmTemplateEditor.sbMoveUpClick┤ │   │   │ 
           TfrmTemplateEditor.sbMoveDownClick┤ │   │   │ 
          TfrmTemplateEditor.sbDeleteClick...┤ │   │   │ 
            TfrmTemplateEditor.tvTreeDragDrop┤ │   │   │ 
         TfrmTemplateEditor.sbCopyLeftClick┤ │ │   │   │ 
        TfrmTemplateEditor.sbCopyRightClick┤ │ │   │   │ 
       TfrmTemplateEditor.mnuNodePasteClick┘ │ │   │   │ 
              TfrmTemplateEditor.mnuSortClick┤ │   │   │ 
            TfrmTemplateEditor.TemplateLocked┘ │   │   │ 
              TfrmTemplateEditor.FormCreate┘   │   │   │ 
               TfrmTemplateEditor.SharedEditing┤   │   │ 
                TfrmTemplateEditor.FormCreate┤ │   │   │ 
         TfrmTemplateEditor.cbEditSharedClick┘ │   │   │ 
               TfrmTemplateEditor.cbxTypeChange┘   │   │ 
              TfrmTemplateEditor.DisplayBoilerplate┘   │ 
                      TfrmTemplateEditor.ShowInfo┤     │ 
                               EditTemplates...┤ │     │ 
             TfrmTemplateEditor.tvTreeChange...┤ │     │ 
                TfrmTemplateEditor.reBoilChange┤ │     │ 
             TfrmTemplateEditor.mnuAutoGenClick┤ │     │ 
      TfrmTemplateEditor.mnuImportTemplateClick┘ │     │ 
                  TfrmTemplateEditor.edtGapChange┘     │ 
                        TfrmTemplateFields.ValidPreview┤ 
                  TfrmTemplateFields.cboObjectsChange┘ │ 
                      TfrmTemplateFields.btnInsertClick┤ 
                    TfrmTemplateFields.cboObjectsChange┘ 

Called-By

Name Declaration Comments
TfrmTemplateFields.btnInsertClick procedure btnInsertClick(Sender: TObject); -
TfrmTemplateFields.cboObjectsChange procedure cboObjectsChange(Sender: TObject); -
TfrmTemplateFields.cboObjectsDblClick procedure cboObjectsDblClick(Sender: TObject); -
TfrmTemplateFields.UpdateStatus procedure UpdateStatus; -
TfrmTemplateFields.ValidPreview function ValidPreview: boolean; -


Source

169   function TfrmTemplateFields.ValidInsert: boolean;
170   begin
171     Result := (cboObjects.ItemIndex >= 0);
172     if Result then
173       Result := (Piece(cboObjects.Items[cboObjects.ItemIndex],U,1) <> '');
174   end;