start working on a VM window

Signed-off-by: Jeff Carr <[email protected]>

1 files changed, 29 insertions, 0 deletions

diff --git a/vmWindow.go b/vmWindow.go
new file mode 100644
index 0000000..2d62545
--- /dev/null
+++ b/vmWindow.go
@@ -0,0 +1,29 @@
+package gui
+
+import "log"
+
+import "github.com/andlabs/ui"
+import _ "github.com/andlabs/ui/winmanifest"
+
+func ShowVM() {
+	name := CurrentVM
+	log.Println("setupDemoUI() START CurrentVM=", CurrentVM)
+	VMwin := ui.NewWindow("VM " + name, 500, 300, false)
+	VMwin.OnClosing(func(*ui.Window) bool {
+		return true
+	})
+	ui.OnShouldQuit(func() bool {
+		VMwin.Destroy()
+		VMwin = nil
+		return true
+	})
+
+	VMtab := ui.NewTab()
+	VMwin.SetChild(VMtab)
+	VMwin.SetMargined(true)
+
+//	VMtab.Append("List examples", makeNumbersPage())
+//	VMtab.SetMargined(0, true)
+
+	VMwin.Show()
+}