It's nice, but I would make it remember the last position when it was closed:
Also, I would make it always on top ( you should find code on how to do that if you search the code bank i think)Code:Private Sub Form_Load() Me.Left = Val(GetSetting(App.EXEName, "Pos", "Left", Me.Left)) Me.Top = Val(GetSetting(App.EXEName, "Pos", "Top", Me.Top)) End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) SaveSetting App.EXEName, "Pos", "Left", Me.Left SaveSetting App.EXEName, "Pos", "Top", Me.Top End Sub
And also, an option to "steal" a color from where the mouse is even when it's outside current window, this is easy with only a few APIs




Reply With Quote