diff --git a/main.go b/main.go
index bcd5c23..6d833e3 100644
--- a/main.go
+++ b/main.go
@@ -64,6 +64,7 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) {
 	mnuFileBolt.SetImageIndex(imgVendorGithub)
 	mnuFile.Add(mnuFileBolt)
 
+	vcl_menuitem(mnuFileBolt, "New database...", imgDatabaseAdd, f.OnMnuFileBoltNewClick)
 	vcl_menuitem(mnuFileBolt, "Open database...", imgDatabaseAdd, f.OnMnuFileBoltOpenClick)
 	vcl_menuitem(mnuFileBolt, "Open database (read-only)...", imgDatabaseAdd, f.OnMnuFileBoltOpenReadonlyClick)
 
@@ -246,6 +247,16 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) {
 	f.OnNavChange(f, nil) // calls f.none.RenderForNav and sets up status bar content
 }
 
+func (f *TMainForm) OnMnuFileBoltNewClick(sender vcl.IObject) {
+	dlg := vcl.NewSaveDialog(f)
+	dlg.SetTitle("Save database as...")
+	dlg.SetFilter("Bolt database|*.db|All files|*.*")
+	ret := dlg.Execute() // Fake blocking
+	if ret {
+		f.boltAddDatabaseFromFile(dlg.FileName(), false)
+	}
+}
+
 func (f *TMainForm) OnMnuFileBoltOpenClick(sender vcl.IObject) {
 	dlg := vcl.NewOpenDialog(f)
 	dlg.SetTitle("Select a database file...")