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

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