(defun set_tile-dialog-draw-ramka-planshet (list-dialog patch-current /)
  ; заполнение граф диалогового окна на основании list-dialog и имени файла
  (mode_tile-dialog-draw-ramka-planshet (atoi(get-item-by-name-in-list list-dialog "analisis-nomenclature")))
  (set_tile "top" (strcat "Параметры зарамочного оформления ["(vl-filename-base patch-current)"]"))
  (foreach x (get-name-items-dialog-draw-ramka-planshet)
    (if (wcmatch x "str*")
      (set_tile x (car(get-item-by-name-in-list list-dialog x)))
      (set_tile x (get-item-by-name-in-list list-dialog x))
      )
    )
  )