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

The secrets of Penacony might soon come...
Version 2.2 of Honkai: Star Rail is on the horizon and brings the culmination of the Penacony adventure after quite the escalation in the latest story quests. To help you through this new expansion is the introduction of two powerful new... | Read more »
The Legend of Heroes: Trails of Cold Ste...
I adore game series that have connecting lore and stories, which of course means the Legend of Heroes is very dear to me, Trails lore has been building for two decades. Excitedly, the next stage is upon us as Userjoy has announced the upcoming... | Read more »
Go from lowly lizard to wicked Wyvern in...
Do you like questing, and do you like dragons? If not then boy is this not the announcement for you, as Loongcheer Game has unveiled Quest Dragon: Idle Mobile Game. Yes, it is amazing Square Enix hasn’t sued them for copyright infringement, but... | Read more »
Aether Gazer unveils Chapter 16 of its m...
After a bit of maintenance, Aether Gazer has released Chapter 16 of its main storyline, titled Night Parade of the Beasts. This big update brings a new character, a special outfit, some special limited-time events, and, of course, an engaging... | Read more »
Challenge those pesky wyverns to a dance...
After recently having you do battle against your foes by wildly flailing Hello Kitty and friends at them, GungHo Online has whipped out another surprising collaboration for Puzzle & Dragons. It is now time to beat your opponents by cha-cha... | Read more »
Pack a magnifying glass and practice you...
Somehow it has already been a year since Torchlight: Infinite launched, and XD Games is celebrating by blending in what sounds like a truly fantastic new update. Fans of Cthulhu rejoice, as Whispering Mist brings some horror elements, and tests... | Read more »
Summon your guild and prepare for war in...
Netmarble is making some pretty big moves with their latest update for Seven Knights Idle Adventure, with a bunch of interesting additions. Two new heroes enter the battle, there are events and bosses abound, and perhaps most interesting, a huge... | Read more »
Make the passage of time your plaything...
While some of us are still waiting for a chance to get our hands on Ash Prime - yes, don’t remind me I could currently buy him this month I’m barely hanging on - Digital Extremes has announced its next anticipated Prime Form for Warframe. Starting... | Read more »
If you can find it and fit through the d...
The holy trinity of amazing company names have come together, to release their equally amazing and adorable mobile game, Hamster Inn. Published by HyperBeard Games, and co-developed by Mum Not Proud and Little Sasquatch Studios, it's time to... | Read more »
Amikin Survival opens for pre-orders on...
Join me on the wonderful trip down the inspiration rabbit hole; much as Palworld seemingly “borrowed” many aspects from the hit Pokemon franchise, it is time for the heavily armed animal survival to also spawn some illegitimate children as Helio... | Read more »

Price Scanner via MacPrices.net

Apple Magic Keyboards for iPads are on sale f...
Amazon has Apple Magic Keyboards for iPads on sale today for up to $70 off MSRP, shipping included: – Magic Keyboard for 10th-generation Apple iPad: $199, save $50 – Magic Keyboard for 11″ iPad Pro/... Read more
Apple’s 13-inch M2 MacBook Airs return to rec...
Apple retailers have 13″ MacBook Airs with M2 CPUs in stock and on sale this weekend starting at only $849 in Space Gray, Silver, Starlight, and Midnight colors. These are the lowest prices currently... Read more
Best Buy is clearing out iPad Airs for up to...
In advance of next week’s probably release of new and updated iPad Airs, Best Buy has 10.9″ M1 WiFi iPad Airs on record-low sale prices for up to $200 off Apple’s MSRP, starting at $399. Sale prices... Read more
Every version of Apple Pencil is on sale toda...
Best Buy has all Apple Pencils on sale today for $79, ranging up to 39% off MSRP for some models. Sale prices for online orders only, in-store prices may vary. Order online and choose free shipping... Read more
Sunday Sale: Apple Studio Display with Standa...
Amazon has the standard-glass Apple Studio Display on sale for $300 off MSRP for a limited time. Shipping is free: – Studio Display (Standard glass): $1299.97 $300 off MSRP For the latest prices and... Read more
Apple is offering significant discounts on 16...
Apple has a full line of 16″ M3 Pro and M3 Max MacBook Pros available, Certified Refurbished, starting at $2119 and ranging up to $600 off MSRP. Each model features a new outer case, shipping is free... Read more
Apple HomePods on sale for $30-$50 off MSRP t...
Best Buy is offering a $30-$50 discount on Apple HomePods this weekend on their online store. The HomePod mini is on sale for $69.99, $30 off MSRP, while Best Buy has the full-size HomePod on sale... Read more
Limited-time sale: 13-inch M3 MacBook Airs fo...
Amazon has the base 13″ M3 MacBook Air (8GB/256GB) in stock and on sale for a limited time for $989 shipped. That’s $110 off MSRP, and it’s the lowest price we’ve seen so far for an M3-powered... Read more
13-inch M2 MacBook Airs in stock today at App...
Apple has 13″ M2 MacBook Airs available for only $849 today in their Certified Refurbished store. These are the cheapest M2-powered MacBooks for sale at Apple. Apple’s one-year warranty is included,... Read more
New today at Apple: Series 9 Watches availabl...
Apple is now offering Certified Refurbished Apple Watch Series 9 models on their online store for up to $80 off MSRP, starting at $339. Each Watch includes Apple’s standard one-year warranty, a new... Read more

Jobs Board

Licensed Practical Nurse - Womens Imaging *A...
Licensed Practical Nurse - Womens Imaging Apple Hill - PRN Location: York Hospital, York, PA Schedule: PRN/Per Diem Sign-On Bonus Eligible Remote/Hybrid Regular Read more
DMR Technician - *Apple* /iOS Systems - Haml...
…relevant point-of-need technology self-help aids are available as appropriate. ** Apple Systems Administration** **:** Develops solutions for supporting, deploying, Read more
Operating Room Assistant - *Apple* Hill Sur...
Operating Room Assistant - Apple Hill Surgical Center - Day Location: WellSpan Health, York, PA Schedule: Full Time Sign-On Bonus Eligible Remote/Hybrid Regular Read more
Solutions Engineer - *Apple* - SHI (United...
**Job Summary** An Apple Solution Engineer's primary role is tosupport SHI customers in their efforts to select, deploy, and manage Apple operating systems and Read more
DMR Technician - *Apple* /iOS Systems - Haml...
…relevant point-of-need technology self-help aids are available as appropriate. ** Apple Systems Administration** **:** Develops solutions for supporting, deploying, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.