# How do I add tooltips to a palette?

The CreatingPalettes help file shows how to create a palette with special symbols:

CreatePalette[
Grid[
Partition[
PasteButton[Style[#, 12], RawBoxes[#],ImageSize->24]&
/@
{"π", "E", "I", "∞", "°", "*", "/", "->", ":>", "==",
"!=", "<=", ">=", "∈", "∍", "¬", "∧", "∨", "⋃", "⋂"},
5],
Spacings->{0,0}]];


I am trying to create a palette that includes some special symbols, and I also want to include tooltips. But, if, for example, I replace "Pi" with Tooltip ["Pi", "3.14"], the tooltip 3.14 displays nicely, but when I click on Pi, the result includes the word Tooltip along with the label:

Tooltip["π", "3.14"]


I have tried every which way for several days to add tooltips that behave. Meanwhile I have added lots and lots of other features, but this one defies me. I know it can't be hard but ...

• I just found a way to make this work, but it's convoluted. I'd prefer to hear of a more straight-forward answer. – matrixbud Nov 16 '16 at 4:47
• I am not very familiar with palette construction, but I wonder if you would have more luck by wrapping PasteButton within Tooltip, instead of the other way round. Unfortunately I'm on mobile and can't test it myself. – MarcoB Nov 16 '16 at 4:48

The following approach seems top work. I have reduced your code to something more like a minimal working example.

With[{chrs = {"π", "E", "I", "∞"},
tips = {"π tip", "E tip", "I tip", "∞ tip"}}},
CreatePalette[
Grid[