diff --git a/main.go b/main.go
index 5791718..bc95f96 100644
--- a/main.go
+++ b/main.go
@@ -51,6 +51,8 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) {
 
 	f.SetCaption(APPNAME)
 	f.ScreenCenter()
+	f.SetWidth(1280)
+	f.SetHeight(640)
 	f.ImageList.GetIcon(imgDatabaseLightning, f.Icon())
 
 	mnuFile := vcl.NewMenuItem(f)