TweetFollow Us on Twitter

Selective Color
Volume Number:10
Issue Number:1
Column Tag:C Workshop

Related Info: Dialog Manager

Selective Color

Using custom color buttons on color and black and white Macs

By Mark W. Batten, Washington, D.C.

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

Custom color buttons enliven any application, but if the programmer is writing software that must run on both black-and-white and color machines (as most of us are), it may seem daunting to write code that will draw the button different ways on differently configured machines. This article demonstrates a simple scheme to create buttons that are smart enough to be custom-drawn on color machines, and as regular Toolbox buttons on black-and-white machines.

The key to the technique is the Toolbox routine SetDItem. Although generally used only to change a dialog item’s rectangle, SetDItem is actually quite powerful; it lets you change just about everything associated with a dialog item. In this example, we’ll use it to point the Mac to our own CDEF to draw the button on color machines.

Setting Up The Resources

First, you need to create the CDEF that draws the color button. At the end of this article is source code for a sample button with a nice 3-D appearance.

(This particular CDEF uses an “auxiliary control record” (as described in Inside Macintosh, Vol. 5, pp. 216-18) to tell it what colors to draw the control in. If you’ve never encountered these arcane things, don’t worry; you don’t need to understand them to implement the scheme described in the article).

Second, create a dialog (DLOG) and a dialog item list (DITL) for your application as you normally would. Be sure that your DLOG will not be displayed when it’s loaded (in ResEdit, be sure the “Initially visible” box is unchecked). The DITL should use normal, vanilla buttons for OK and Cancel. That way, the resource is all set up to run normally on black-and-white machine, without any more work.

For this example, you also need to create two other resources: a dialog color table (‘dctb’) and a control color table (‘cctb’). (The correct values for the sample are listed at the end of this article). The ‘dctb’ serves two functions here: first, when you call GetNewDialog to read in a dialog, the Mac will automatically make it a color dialog, based on a CGrafPort, if the Mac finds a ‘dctb’ with the same ID as the DLOG resource. Second, the ‘dctb’ colors the content area of the dialog, which makes our button look better. The CDEF uses the ‘cctb’ resource to determine what colors to use when drawing the custom button.

Making The Switch

On a black-and-white Mac, the dialog will perform as it’s supposed to, without any special code in your application. To do something fancier on color machines, your application just has to alert the Dialog Manager to use our custom CDEF instead of the standard one. Here are the necessary steps.

1. In your application’s initialization routines, load the CDEF resource and the cctb color table into variables, like this:


/* 1 */

 Handle myCDEF;  /* handle to our custom CDEF */
 CTabHandle CtrlCTab;/* handle to colors for our control */

 myCDEF=GetResource('CDEF',32); 
 CtrlCTab=(CTabHandle)GetResource('cctb',128);

2. When you’re ready to create the dialog, load it with GetNewDialog (or build it from scratch with NewDialog). Then call the following routine, which uses SetDItem to tell the Mac where to find our custom code. Pass the DialogPtr in d and the item number of the button you want to convert in i:

/* 2 */

ConvertToColorButtons(d,i)
DialogPtr d;
int i; 
{
 int j; 
 Handle tItem; 
 Rect box; 
 char n[31];

 GetDItem(d,i,&j,&tItem,&box);
 if(j==ctrlItem+btnCtrl || 
 j==ctrlItem+btnCtrl+itemDisable){
 SetCtlColor(tItem,CtrlCTab);
 (**((ControlHandle)tItem)).contrlDefProc=myCDEF;
 j&=127;
 SetDItem(d,i,j,tItem,&box); 
 }
}
 Here's the CDEF code.

pascal long main(var,CH,msg,par)
int msg,var;
ControlHandle CH;
long par;
{
 long l;

 l=0L;
 switch(msg){
 case 0: 
 doDraw(CH); 
 break;
 case 1: 
 l=(long)doTest(par,CH); 
 break;
 case 2: 
 doCalc(par,CH); 
 break;
 }
 return l;
}

doTest(par,CH)
long par;
ControlHandle CH;
{
 Point pt;

 pt.v=HiWord(par); 
 pt.h=LoWord(par);
 return (int)PtInRect(pt,&((**CH).contrlRect));
}

doCalc(par,CH)
RgnHandle par;
ControlHandle CH;
{
 par=(RgnHandle)((long)par&0x7FFFFFFF);
 RectRgn(par,&((**CH).contrlRect));
}

doDraw(CH)
ControlHandle CH;
{
 int j,k,*p;
 Handle tItem;
 Rect r;
 RGBColor rgb,rgb1,rgb2; 
 AuxCtlHandle ax;
 FontInfo inf;
 
 r=(**CH).contrlRect; 
 j=StringWidth((**CH).contrlTitle); 
 GetFontInfo(&inf); 
 k=inf.ascent+inf.descent;
 k=(r.top+r.bottom+k)/2;
 MoveTo((r.left+r.right-j)/2,k-inf.descent);
 DrawString((**CH).contrlTitle);
 GetAuxCtl(CH,&ax);
 
 p=(int *)&(**(**ax).acCTable).ctTable[0].rgb.red; 
 rgb.red=p[0];   /* 21845, 0x5555*/
 rgb.green=p[1]; /* 21845, 0x5555*/
 rgb.blue=p[2];  /* 21845, 0x5555*/
 rgb1.red=p[4];  /* 34952, 0x8888*/
 rgb1.green=p[5];/* 34952, 0x8888*/
 rgb1.blue=p[6]; /* 34952, 0x8888*/
 rgb2.red=rgb2.green=rgb2.blue=0xFFFF;
 
 PenSize(2,2);
 RGBForeColor(&rgb);
 MoveTo(r.right-2,r.top); 
 LineTo(r.left,r.top);
 LineTo(r.left,r.bottom-2); 
 RGBForeColor(&rgb2);
 MoveTo(r.right-2,r.top+1);
 LineTo(r.right-2,r.bottom-2);
 LineTo(r.left,r.bottom-2); 
 rgb2.red=rgb2.green=rgb2.blue=0;
 RGBForeColor(&rgb2);
 InsetRect(&r,2,2);
 FrameRect(&r);

 InsetRect(&r,2,2);
 if(!(**CH).contrlHilite){
 PenSize(1,1);
 RGBForeColor(&rgb);
 MoveTo(r.left,r.top);
 LineTo(r.left,r.bottom-2);
 PenSize(2,2); 
 LineTo(r.right-2,r.bottom-2);
 Move(0,-1);
 PenSize(1,1);
 RGBForeColor(&rgb1);
 LineTo(r.left+1,r.bottom-3);
 LineTo(r.left+1,r.top);
 LineTo(r.right-1,r.top);
 Move(0,1);
 rgb2.red=rgb2.green=rgb2.blue=0xFFFF; 
 RGBForeColor(&rgb2);
 LineTo(r.left+2,r.top+1);
 }
 else {
 MoveTo(r.right-2,r.top);
 RGBForeColor(&rgb);
 LineTo(r.left,r.top);
 PenSize(1,1);
 LineTo(r.left,r.bottom-3);
 PenSize(3,3);
 LineTo(r.right-3,r.bottom-3); 
 PenSize(1,1);
 Move(2,-1);
 RGBForeColor(&rgb1); 
 LineTo(r.left+1,r.bottom-4);
 LineTo(r.left+1,r.top+2);
 LineTo(r.right-1,r.top+2);
 }
 rgb2.red=rgb2.green=rgb2.blue=0;
 RGBForeColor(&rgb2); 
}

The values for the color table resources for the example are as follows:

The control color table (type 'cctb') has two entries. The part codes are just 0 and 1 (the CDEF doesn't really use these) and the colors are { 0x5555,0x5555,0x5555 } and { 0x8888,0x8888,0x8888 }.

The dialog color table (type 'dctb') must have five entries, with part codes of 0-4, and colors as follows: { 0xAAAA,0xAAAA,0xAAAA }, { 0x5555,0x5555, 0x5555 }, { 0,0,0 }, { 0,0,0 }, { 0,0,0 }.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Latest Forum Discussions

See All

How to evolve Eevee in Pokemon GO
By now, almost everyone should be hip to how to evolve Pokemon in Pokemon GO (and if not, there's a guide for that). Just gather enough candy of the appropriate type, feed them all to the Pokemon, and evolution happens. It's a miracle that would... | Read more »
CSR Racing 2: Guide to all game modes
It might not seem like there are all that many ways to go fast in a straight line, but CSR Racing 2 begs to differ. [Read more] | Read more »
Bulb Boy (Games)
Bulb Boy 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Multi-award winning 2D point & click horror adventure about a boy with a glowing head. | Read more »
5 top free emoji keyboard apps
If we're not at peak emoji yet as a society, it feels like we definitely should be. The emoji concept has gone far beyond what anyone in Japan could have envisioned when the people there unleashed it on an unsuspecting world, but the West has... | Read more »
How to unlock more characters in Disney...
One of the big charms of Disney Emoji Blitz is seeing a wide variety of beloved Disney and Pixar characters transformed into smiling emojis. Even someone like the sneaky Randall from Monsters Inc., who probably never cracked a smile on film, is... | Read more »
Cubway (Games)
Cubway 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Cubway is a journey with an abstract story of lifecycle of rebirth, called Samsara. Guide the cube through the long way full of dangers... | Read more »
Colorcube (Games)
Colorcube 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Turn pieces and blend colours in this minimal yet visually stunning puzzler.Over 200 handcrafted and challenging levels. Features... | Read more »
Doodle God Griddlers (Games)
Doodle God Griddlers 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: | Read more »
Crusader Kings: Chronicles (Games)
Crusader Kings: Chronicles 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Crusader Kings: Chronicles is an interactive text based game that puts you in the shoes of Guy de Rose as you make... | Read more »
Roads of Rome: New Generation (Games)
Roads of Rome: New Generation 1.0 Device: iOS Universal Category: Games Price: $5.99, Version: 1.0 (iTunes) Description: | Read more »

Price Scanner via MacPrices.net

Charitybuzz Set to Auction Unique Apple-1 Com...
Offering an opportunity to own the computer that sparked a revolution, on Monday, July 25, leading online charity auction platform Charitybuzz will auction what is claimed to be the world’s most... Read more
MacBook Airs on sale for up to $150 off MSRP
Amazon has 11″ and 13″ MacBook Airs on sale for up to $150 off MSRP for a limited time. Shipping is free: - 13″ 1.6GHz/128GB MacBook Air (sku MMGF2LL/A): $899.99 $100 off MSRP - 13″ 1.6GHz/256GB... Read more
Apple refurbished 13-inch Retina MacBook Pros...
Apple has Certified Refurbished 13″ Retina MacBook Pros available for up to $270 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 13″ 2.7GHz... Read more
Apple refurbished 11-inch MacBook Airs availa...
Apple has Certified Refurbished 11″ MacBook Airs (the latest models), available for up to $170 off the cost of new models. An Apple one-year warranty is included with each MacBook, and shipping is... Read more
Apple iPad Pro Sales Far Outpacing Microsoft...
A report on Appleinsider notes that despite Microsoft Surface tablet PC sales growing by 9 percent year over year, revenues remained below $1 billion, and are down sequentially from the $1.1 billion... Read more
DEVONthink 2.9 Features Ultra-fast, Robust, A...
DEVONthink 2.9 allows users to keep databases synchronized using many means of transport. It transmits them between Macs on the local network or stores them in a syncable form on removable hard... Read more
12-inch WiFi Apple iPad Pros on sale for up t...
B&H Photo has 12″ WiFi iPad Pros on sale for up to $100 off MSRP, each including free shipping. B&H charges sales tax in NY only: - 12″ Space Gray 32GB WiFi iPad Pro: $749 $50 off MSRP - 12″... Read more
Apple refurbished 15-inch Retina MacBook Pros...
Apple has Certified Refurbished 2015 15″ Retina MacBook Pros available for up to $380 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 15″ 2... Read more
Apple refurbished Mac minis available for up...
Apple has Certified Refurbished Mac minis available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $80 off MSRP - 2.6GHz Mac... Read more
Apple Mac Sales Finally Colliding With ‘Innov...
After successfully swimming against a tide of diminishing PC sales through 2014 and 2015, it appears that Apple has finally stopped defying gravity and is running up against the unwritten “innovate... Read more

Jobs Board

*Apple* Solutions Consultant - APPLE (United...
Job Summary As an Apple Solutions Consultant, you'll be the link between our future customers and our products. You'll showcase your entrepreneurial spirit as you Read more
*Apple* Professional Learning Specialist - A...
Job Summary The Apple Professional Learning Specialist is a full-time position for one year with Apple in the Phoenix, AZ area. This position requires a high Read more
*Apple* Picker - Apple Hill Orchard (United...
Apple Hill Orchard, Co. Rte. 21,Whitehall, NY 9/7/16-10/228/16. Pick fresh market or processing apples Productivity of 60 boxes and 80 boxes processing fruit per Read more
*Apple* Solutions Consultant - APPLE (United...
Job Summary As an Apple Solutions Consultant, you'll be the link between our future customers and our products. You'll showcase your entrepreneurial spirit as you Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description:SalesSpecialist - Retail Customer Service and SalesTransform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.