FixPalette Addin

Hi, this addin was created a few years ago by a colleague "Cobein" and it works perfect, but nowadays with DPI above 100 it throws an error so try to recreate it from scratch since I don't have the source code and I already lost contact as my colleague.
so I share this simple addin but very useful especially for those who have the windows themes in the vb6 IDE and have the problem with the color palette, with this addin it is solved, but it is also useful because there are several color palettes and also an eyedropper.

Special thanks to @shagratt with some functions and testing

Attachment 176823


Attachment 176875Attachment 176907

good job

Why was the attachment removed?

@dreammanor: A dll was included, so looks like it was updated

@Leandro. Just FYI, you can get a palette when manifesting via IDE menu: View > Color Palette. But that is a hassle. Now if you want to fix another problem when IDE is manifested... Try adding 1-character items to a listbox or combobox at design-time -- doesn't work.

This is a really needed update to the IDE. I always needed to relay on externals tools for color picking. Another useful thing is that the eyedropper also double as a magnification glass.
Amazing contribution Leandro!

Tested on: Win7,non manifested at 100DPI

Hi,
@Leandro,
Great but problems with IDE manifested and some controls
So, how to fix the full display of the windows ?

For myself the only way i found to solve the palette colorpicker problem on the Manifested IDE was to use an older AddIn -> 'vb6 Color Workshop' a donationware from NOREXE Software.
But NOREXE Software (no longer exists)

I'm not seeing the entire thing, running VB6 SP6 manifested or not. Have I missed doing something?

Quote:

---

Originally Posted by Steve Grant

I'm not seeing the entire thing, running VB6 SP6 manifested or not. Have I missed doing something?

---

fixed, I did not take into account that in English the words are shorter the frame is smaller, so now it forces the real size of the palette and buttons.

thanks for showing me that error

Quote:

---

Originally Posted by LaVolpe

Now if you want to fix another problem when IDE is manifested... Try adding 1-character items to a listbox or combobox at design-time -- doesn't work.

---

interesting I have never noticed it, this error occurs with or without manifested IDE, the error is from the Edit window, if it is added from a usercontrol (at design time) it loads well, but if then it displays that list when closing it breaks again, that maybe it could be fixed by doing some tricks but maybe it is easier to add them from a usercontrol

Code:

---

Private Sub UserControl_Resize()
    On Error Resume Next
    Dim i As Long
    Parent.Combo1.Clear
    For i = 0 To 25
        Parent.Combo1.AddItem Chr$(65 + i)
    Next
End Sub

---

Quote:

---

Originally Posted by LeandroA

interesting I have never noticed it, this error occurs with or without manifested IDE, the error is from the Edit window, if it is added from a usercontrol (at design time) it loads well, but if then it displays that list when closing it breaks again...

---

What is also interesting is that the ItemData is broken too (manifested or not), it won't save the values you enter. Now, I know this is not the way it has always been. I do recall being able to add single letters into listboxes and adding ItemData at design-time vs. in Form_Load. But anyway, getting off topic

Hi Leandro,
Fine
Congratulations !

More clipping here too. . . (Darn, this would have been only plug-in #3 that I dare to activate in the IDE).

https://dl.unicontsoft.com/upload/pi...lette_2020.png

Win10 1809, system DPI at 125%

cheers,
</wqw>

Works fine for me now, manifested or not. Shown not.

hello wqweto thanks for reporting, I did not find a way to replicate the error, apparently it has a different height, I think I do not want to get into changing the height because I will have to do other calculations, I think that up to here it is on my side for this addin.

Today I made a small adjustment that was necessary and with this I end it

Quote:

---

Originally Posted by LeandroA

. . . I think I do not want to get into changing the height because I will have to do other calculations

---

Could be the height but there is noticable gap at the top, just below the two tabs which pushes the rest of the image down and the last row becomes hidden.

Anyway, no need to bother -- I'll try LaVolpe's solution. As always, releasing code "in the wild" is hard, even too hard and every time there is something "only on client PCs" to surprise you :-)))

cheers,
</wqw>

...
sorry worn post

Just FYI, the links are broken.