private void butDelete_Click(object sender, EventArgs e)
 {
     //only visible if editing existing quesionnaire.
     if (!MsgBox.Show(this, true, "Delete this questionnaire?"))
     {
         return;
     }
     FormPats.Delete(FormPatCur.FormPatNum);
     DialogResult = DialogResult.OK;
 }
        private void butOK_Click(object sender, System.EventArgs e)
        {
            if (QuestionDefList.Length == 0)
            {
                MsgBox.Show(this, "No questions to save.");
                return;
            }
            //only visible if IsNew
            FormPats.Insert(FormPatCur);
            Question  quest;
            ArrayList ALval;

            for (int i = 0; i < QuestionDefList.Length; i++)
            {
                quest             = new Question();
                quest.PatNum      = FormPatCur.PatNum;
                quest.ItemOrder   = QuestionDefList[i].ItemOrder;
                quest.Description = QuestionDefList[i].Description;
                if (QuestionDefList[i].QuestType == QuestionType.FreeformText)
                {
                    ALval = multInput.GetCurrentValues(i);
                    if (ALval.Count > 0)
                    {
                        quest.Answer = ALval[0].ToString();
                    }
                    //else it will just be blank
                }
                else if (QuestionDefList[i].QuestType == QuestionType.YesNoUnknown)
                {
                    quest.Answer = Lan.g("enumYN", multInput.GetCurrentValues(i)[0].ToString());
                }
                quest.FormPatNum = FormPatCur.FormPatNum;
                Questions.Insert(quest);
            }
            DialogResult = DialogResult.OK;
        }