gui: set main app icon

2024-06-15 11:42:23 +12:00 · 2024-06-15 11:42:23 +12:00 · 2481a1da20
commit 2481a1da20
parent 1035086ed4
1 changed files with 1 additions and 0 deletions
--- a/main.go
+++ b/main.go
@ -41,6 +41,7 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) {
 	f.ImageList = loadImages(f)

 	f.SetCaption("yvbolt")
+	f.ImageList.GetIcon(imgDatabaseLightning, f.Icon())

 	mnuFile := vcl.NewMenuItem(f)
 	mnuFile.SetCaption("File")