bundles/org.simantics.modeling/scl/Simantics/PageSettings.scl

   1 import "Simantics/DB"
   2 import "Simantics/Variables"
   3 import "Simantics/Diagram"
   4
   5 importJava "org.simantics.utils.page.PageDesc" where
   6     data PageDesc
   7     getOrientedWidth :: PageDesc -> Double
   8     getOrientedHeight :: PageDesc -> Double
   9     getByName :: String -> PageDesc
  10
  11     @JavaName serialize
  12     serializePageDesc :: PageDesc -> String
  13
  14 importJava "org.simantics.diagram.synchronization.graph.DiagramGraphUtil" where
  15     @JavaName setPageDesc
  16     setPageDesc :: Resource -> String -> <WriteGraph> ()
  17
  18     @JavaName setPageDesc
  19     setPageDescRes :: Resource -> PageDesc -> <WriteGraph> ()
  20
  21     setGridSize :: Resource -> Double -> <WriteGraph> ()
  22     setPageBordersVisible :: Resource -> Boolean -> <WriteGraph> ()
  23     setMarginsVisible :: Resource -> Boolean -> <WriteGraph> ()
  24     getPageDesc :: Resource -> <ReadGraph> PageDesc
  25
  26 pageDesc :: Variable -> <ReadGraph> PageDesc
  27 pageDesc diagramVariable = getPageDesc $ represents diagramVariable