Mats Bengtsson$Revision: 1.4 $

This is a replacement for the menubutton on the Macintosh with a native implementation which is compliant with the Appearance Manager in Mac OS 8 and later.

The present (in 8.3.3 and earlier) menubutton on the Macintosh is implemented using Tk drawing to draw something similar to the native menubutton on Mac how it looks on Pre Mac OS 8.0 systems, and therefore fails to give the correct appearance on Mac OS 8.0 systems and later. This TIP presents a step to increase the native appearance on the Macintosh (similar to .)

The proposed change is now implemented as a loadable extension (in C) on Macintosh, and can be downloaded []. This implementation differs from the other buttons in Mac Tk (button, radiobutton, checkbutton), which use a mixture of native Apple drawing code and Tk drawing code, since it uses only native Apple code for drawing. This extension requires Tcl/Tk 8.3.2p1 or later due to the changed stub loading mechanism. The new implementation is not a complete replacement since it lacks the -bitmap and -image options, and a few other things, see below. The changes necessary are: Replace the tkMacMenubutton.c file with the new one.Add a MENU resource item, which is included in the shared library, but needs to be added to the core.Modifications to tkMacFont.c (see appendix). Put declaration so it can be used from any file. Possibly also add the new function to the stub table since it can be practical for other extension writers.Need to check for the presence of the Appearance manager:aWYgKFRrTWFjSGF2ZUFwcGVhcmFuY2UoKSkgICAgdXNlIG5hdGl2ZSAobmV3KSBtZW51YnV0dG9uIA==ZWxzZSA=ICAgdXNlIHByZXNlbnQgbWVudWJ1dHRvbg== All functionality from the documentation that is applicable is implemented in the extension, with some exceptions: The -image and -bitmap options are not supported, yet.There is no button pressed (SELECTED) flag so it highlights when the mouse enters, just as a reminder that it must be fixed. (see appendix)Don't know which color to pick for the three pixels in each corner. It is now the -background color, but the ordinary button uses -highlightbackground?The position of the popup menu should be changed in order to conform better with standard Mac appearance..Something needs to be done so that we can get Mac native font stuffs from a Tk_Font object; I've included a crude hack in the appendix.It is compliant to the Appearance Manager which means that foreground and background colors are set via themes and not from command switches.Minor differences to comply with the Appearance Manager. All these deviations are consistent with the look-and-feel of Mac OS 8.0 and on. Existing scripts using menubutton are compatible with the new menubutton. Open questions: Option to use for the color of the corner pixels.If (and how) a SELECTED flag should be added to tkMenuButton.h, and code to support it in tkMenuButton.c.Implementation of the -bitmap and -image options.A -compound option as described in TIP #11.

This document has been placed in the public domain.

Addition to tkMenuButton.h:I2RlZmluZSBTRUxFQ1RFRAkJOA==Other modifications to tkMenuButton.c must be made to support this flag.Addition to tkMacFont.c (possibly add to exported functions):Lyo=ICotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0=ICo=ICogR2V0TWFjRm9udEF0dHJpYnV0ZXMgLS0gICo=ICogICAgICBUYWtlcyBhIFRrX0ZvbnQgYW5kIGdldHMgdGhlIE1hYyBmb250IGF0dHJpYnV0ZXMgZmFjZU51bSwgc2l6ZSwgYW5kIHN0eWxlLg==ICogICAgICBOb3RlIHRoYXQgdGhlIE1hYyBmb250IHNpemUgaXMgaW4gcGl4ZWxzIHdoaWxlIHRoZSBUa19Gb250IHNpemUgaXM=ICogICAgICBpbiBwb2ludHMuIE5vIG5lZWQgdG8gZG8gYW55IFVURi04IHRyYW5zbGF0aW9ucyBzaW5jZSB0aGlzIGlzICogICAgICBpbXBsaWNpdCBpbiBHZXRGYW1pbHlPckFsaWFzTnVtKCkuICogICAgICBUaGUgY29kZSBoZXJlIGlzIGVzc2VudGlhbGx5IGEgbW9kaWZpZWQgVGtwR2V0Rm9udEZyb21BdHRyaWJ1dGVzKCkgYW5kICogICAgICBJbml0Rm9udCgpLCBib3RoIGZyb20gdGtNYWNGb250LmMuICo=ICogUmVzdWx0czo=ICogICAgICBTZXRzIHRoZSBNYWMgZm9udCBhdHRyaWJ1dGVzLg==ICo=ICogU2lkZSBlZmZlY3RzOg==ICogICAgICBOb25lLg==ICo=ICotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0=ICovdm9pZA==R2V0TWFjRm9udEF0dHJpYnV0ZXMoICAgICAgICBUa19XaW5kb3cgdGt3aW4sICAgICAgICAvKiBUayB3aW5kb3cuIChpbikgKi8=ICAgICAgICBUa19Gb250IHRrRm9udCwgICAgICAgICAvKiBUayBmb250LiAoaW4pICovICAgICAgICBzaG9ydCAqZmFjZU51bVB0ciwgICAgICAvKiBNYWMgZm9udCBmYWNlIGlkLiAob3V0KSAqLw==ICAgICAgICBzaG9ydCAqbWFjU2l6ZVB0ciwgICAgICAvKiBNYWMgZm9udCBzaXplIGluIHBpeGVscy4gKG91dCkgKi8=ICAgICAgICBTdHlsZSAqc3R5bGVQdHIpICAgICAgICAvKiBNYWMgZm9udCBzdHlsZSBzcGVjaWZpZXIuIChvdXQpICovew==ICAgIGludCBpLCBqOw==ICAgIGNoYXIgKmZhY2VOYW1lLCAqZmFsbGJhY2s7ICAgIGNoYXIgKioqZmFsbGJhY2tzOw==ICAgIE1hY0ZvbnQgKmZvbnRQdHI7ICAgIGNvbnN0IFRrRm9udEF0dHJpYnV0ZXMgKmZhUHRyOw==ICAgIGludCBzaXplOyAgICAgICAgICAgLyogU2l6ZSBpbiBwb2ludHMuICovICAgICAgICA=ICAgIC8qICAgICAqIFRoaXMgaXMganVzdCBhIG1hY3JvIHRvIGFjY2VzcyB0aGUgYXR0cmlidXRlIHN0cnVjdCBtZW1iZXIuICAgICAqLw==ICAgICA=ICAgIGZhUHRyID0gR2V0Rm9udEF0dHJpYnV0ZXModGtGb250KTs=ICAgIC8qICAgICAqIEFsZ29yaXRobSB0byBnZXQgdGhlIGNsb3Nlc3QgZm9udCB0byB0aGUgb25lIHJlcXVlc3RlZC4=ICAgICAqICAgICAqIHRyeSBmb250bmFtZQ==ICAgICAqIHRyeSBhbGwgYWxpYXNlcyBmb3IgZm9udG5hbWU=ICAgICAqIGZvcmVhY2ggZmFsbGJhY2sgZm9yIGZvbnRuYW1lICAgICAqICAgICAgdHJ5IHRoZSBmYWxsYmFjaw==ICAgICAqICAgICAgdHJ5IGFsbCBhbGlhc2VzIGZvciB0aGUgZmFsbGJhY2s=ICAgICAqLw==ICAgICA=ICAgICpmYWNlTnVtUHRyID0gMDs=ICAgIGZhY2VOYW1lID0gZmFQdHItPmZhbWlseTs=ICAgIGlmIChmYWNlTmFtZSAhPSBOVUxMKSB7ICAgICAgICBpZiAoR2V0RmFtaWx5T3JBbGlhc051bShmYWNlTmFtZSwgZmFjZU51bVB0cikgIT0gMCkgew==ICAgICAgICAgICAgZ290byBmb3VuZDs=ICAgICAgICB9ICAgICAgICBmYWxsYmFja3MgPSBUa0ZvbnRHZXRGYWxsYmFja3MoKTs=ICAgICAgICBmb3IgKGkgPSAwOyBmYWxsYmFja3NbaV0gIT0gTlVMTDsgaSsrKSB7ICAgICAgICAgICAgZm9yIChqID0gMDsgKGZhbGxiYWNrID0gZmFsbGJhY2tzW2ldW2pdKSAhPSBOVUxMOyBqKyspIHs=ICAgICAgICAgICAgICAgIGlmIChzdHJjYXNlY21wKGZhY2VOYW1lLCBmYWxsYmFjaykgPT0gMCkgew==ICAgICAgICAgICAgICAgICAgICBmb3IgKGogPSAwOyAoZmFsbGJhY2sgPSBmYWxsYmFja3NbaV1bal0pICE9IE5VTEw7IGorKykgew==ICAgICAgICAgICAgICAgICAgICAgICAgaWYgKEdldEZhbWlseU9yQWxpYXNOdW0oZmFsbGJhY2ssIGZhY2VOdW1QdHIpKSB7ICAgICAgICAgICAgICAgICAgICAgICAgICAgIGdvdG8gZm91bmQ7ICAgICAgICAgICAgICAgICAgICAgICAgfQ==ICAgICAgICAgICAgICAgICAgICB9ICAgICAgICAgICAgICAgIH0=ICAgICAgICAgICAgICAgIGJyZWFrOw==ICAgICAgICAgICAgfQ==ICAgICAgICB9ICAgIH0=ICAgIA==ICAgIGZvdW5kOiAgICA=ICAgICpzdHlsZVB0ciA9IDA7ICAgIGlmIChmYVB0ci0+d2VpZ2h0ICE9IFRLX0ZXX05PUk1BTCkgew==ICAgICAgICAqc3R5bGVQdHIgfD0gYm9sZDs=ICAgIH0=ICAgIGlmIChmYVB0ci0+c2xhbnQgIT0gVEtfRlNfUk9NQU4pIHs=ICAgICAgICAqc3R5bGVQdHIgfD0gaXRhbGljOw==ICAgIH0=ICAgIGlmIChmYVB0ci0+dW5kZXJsaW5lKSB7ICAgICAgICAqc3R5bGVQdHIgfD0gdW5kZXJsaW5lOw==ICAgIH0=ICAgIGlmIChmYVB0ci0+c2l6ZSA9PSAwKSB7ICAgICAgICBzaXplID0gLUdldERlZkZvbnRTaXplKCk7ICAgIH0gZWxzZSB7ICAgICAgICBzaXplID0gZmFQdHItPnNpemU7ICAgIH0=ICAgICptYWNTaXplUHRyID0gKHNob3J0KSBUa0ZvbnRHZXRQaXhlbHModGt3aW4sIHNpemUpOw==fQ==