TweetFollow Us on Twitter

Dec 95 Top 10
Volume Number:11
Issue Number:12
Column Tag:Symantec Top 10

Symantec Top 10

This monthly column, written by Symantec’s Technical Support Engineers, aims to provide you with technical information based on the use of Symantec products.

By Craig Conner

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

This month, we are going to answer some questions about using the TCL class CStyleText with Visual Architect. A project demonstrating CStyleText is available on either CompuServe or America Online, or on ftp.devtools.symantec.com.

Q: How do I create a CStyleText pane in Visual Architect?

A: Since this class does not appear in the VA Base Class popup in the Classes dialog you cannot override it in the standard way. You can, however, create a class based on CEditText and use CStyleText as a Library Class.

To review how library classes work: Usually, VA produces x_class classes derived from the class specified in the Base Class popup menu. When you use a Library Class, VA bases the x_class on the library class and assumes the library class is derived from the base class.

Creating a class in this fashion causes VA to generate an x_class derived from CStyleText, which in turn is based on CEditText, so everything is right with the world. You can then assign this class to a panorama created with the normal panorama tool, not the EditText-like tool, which is actually a CDialogText pane.

Note: For the rest of this article, I will refer to this view with the name TextPane (real original, huh?) and the class as CStyledTextEditPano, for short. I also call the document class CStyledDoc, and the application class CStyleApp.

Q: I have problems aligning the pane into the window correctly. What is the best way to set this up?

A: The easy way to set up a pane or panorama to completely cover a window is to adjust the bounds using the edit boxes. You will want to overlap the pane one pixel on each side. For example, when I look in the View Info dialog for my project, it lists the Width as 471 and Height as 443. So my CStyleText panorama is positioned at (-1, -1), and has a Width of 473 and a Height of 445.

Q: How do I set up the Font, Style and Size menus?

A: The Add Menu popup for the Menu Bar dialog box contains pre-created Font, Size and Style menus. Add these menus to the current menu bar. The Style menu has commands associated with each menu item, so TCL will take care of changing styles for the current selection. Both the default Font and Size menus are empty, so we will have to add items programmatically.

To add items we must override CApplication::SetUpMenus(), and then we revert to standard Macintosh Toolbox practices to add items. For example:

 void CStyleApp::SetUpMenus()
{
    // To handle standard initialization.
 CApplication::SetUpMenus();

    // Add the system fonts the standard way
 AddResMenu(GetMHandle(MENUfont), 'FONT');

 MenuHandle sizeMenuH = GetMHandle(MENUsize);

    // I’ve got other things planned, so we might as well 
    // account for that possibility now
 short numItems = CountMItems(sizeMenuH);

 InsMenuItem(sizeMenuH, "\p9", numItems + 1);
 
    // Similarly for other sizes...

    // Now deal with keeping items highlighted and uncheck all items   
    // when Update menus called for ease of dealing with at that time.
 gBartender -> SetDimOption(MENUfont, dimNone);
 gBartender -> SetUnchecking(MENUfont, TRUE);

    // do the same for MENUsize and MENUstyle...
}

These Font and Style menus do not have commands
associated with them because of the generic way TCL handles font and size changes. Look in CAbstractText::DoCommand() and CTextStyleTask::Do() for more information.

Having added and configured the menus, we now have to handle checking the correct menu item when the menus are displayed. We do this in the CStyledDoc::UpdateMenus(), like so:

CStyledDoc::UpdateMenus()
{
 short whichAttributes = doFont | doSize | doFace;
 TextStyle theStyle;
 Str255 itemString;
 short fontNumber;
 long fontSize;
 short count;
 
 inherited::UpdateMenus();
 
 MenuHandle fontMenu = GetMHandle(MENUfont);
 count = CountMItems(fontMenu);
 
 for (int n = 1; n <= count; n++)
 {
 GetItem(fontMenu, n, itemString);
 GetFNum(itemString, &fontNumber);
 
 if(fontNumber == theStyle.tsFont)
 CheckItem(fontMenu, n, TRUE);
 }

 
 MenuHandle sizeMenu = GetMHandle(MENUsize);
 count = CountMItems(sizeMenu);
 
 for (n = 3; n <= count; n++)
 {
 GetItem(sizeMenu, n, itemString);
 StringToNum(itemString, &fontSize);
 
 if(fontSize == theStyle.tsSize)
 CheckItem(sizeMenu, n, TRUE);
 }

    // handle easy case first
 if (theStyle.tsFace == normal)
 gBartender->CheckMarkCmd(cmdPlain, TRUE);
 else
 {
    // Turn on the correct ones
 if(theStyle.tsFace & bold)
 gBartender->CheckMarkCmd(cmdBold, TRUE);
 
    // similarly for italic, underline, etc.
 } 
}

Q: What happens if I want to use a different font size than what is in the menu?

A. Well, we can add an Other menu item to the Size menu in VA, and for correctness there should be a line between this item and the font sizes, so add one of those too. These need to be at the top of the menu, so TCL does not lose track of where it is in the menu. (All items with commands need to appear in menus before items without commands associated with them.)

Create a modal dialog view that has a DialogText item in it, so we can have the user enter the size. The item should be set to be of type CIntegerText. You should also set a range in the Pane Info dialog under CIntegerText, for example from 4 to 256. Also check the showRangeOnErr checkbox to inform the user if they make a mistake. (It’s the Macintosh Way.)

Now to complete the VA part of this, create a cmdOtherSize and associate it with the Other menu item. Have the command generate code to open the newly created dialog in the CStyleText derived class.

Next, we have to add code to handle the size change. We add this to an override of ProviderChanged() in CStyledTextEditPano:

 if(reason == kFontSizeDialogEnding)
 {
 long size;
 size = ((CFontSizeDialogData *)info)
  -> fPointSizeDialog_PointSizeEditText;
 
    // To fake out the CStyleText operations and handle a 
    // non-menu item size, we throw a new item into the menu and
    // call the command, then delete menu item
 long theCmd = (MENUsize << 16) + 3;
 Str255 string;
 
 NumToString(size, string);
 gBartender->InsertMenuCmd
 (theCmd, string, MENUsize, 2);
 
    // negate the command, so TCL knows it does not have an
    // associated command and send it.
 DoCommand(-theCmd);

 gBartender->RemoveMenuCmd(theCmd);
 }
 else
 inherited::ProviderChanged(aProvider,reason,info);

Q: After generating and compiling, why isn’t the cursor in the pane when I open a view?

A: Currently, the gopher is assigned to theMainPane of the window. To associate the gopher with the style text pane, we can re-assign it:

       
       itsGopher = fTextPane_StyleTextPano;

Do this at the end of CStyleDoc::ContentsToWindow().

Q: How do I save and read in a styled text document?

A: Saving a styled text document requires saving the text, and saving the style of that text. An easy way to do this is to use the CSimpleSaver class. In VA, make CSimpleSaver a library class for CStyledDoc. You will also need to override ReadContents() and WriteContents() (they can have empty bodies) in CStyledDoc to complete the class definition.

You can save the text using the CDataFile object member of CStyledDoc, itsFile. To save the style of the text, we need to save it into a 'styl' resource with the ID number 128. This is the standard location for style information. To save into the resource you can create a CResFile object.

Add something like this to

CStyledDoc::ContentsToWindow():

 if(itsFile)
 {
    // Deal with the text first
 Handle text = 
 fTextPane_StyleTextPano->GetTextHandle();
 ((CDataFile *)itsFile)->WriteAll(text);
 
    // And now deal with the style info
 FSSpec theSpec;

 itsFile->GetFSSpec(&theSpec);
 
 CResFile theResFile;
 
 theResFile.SpecifyFSSpec(&theSpec);

 if(!theResFile.HasResFork())
 theResFile.CreateNew('ttxt','TEXT');

 theResFile.Open(fsRdWrPerm);
 
 Handle theStyle, newStyle;
 
 theStyle = GetResource('styl', 128);
 
    // as per IM:Text p. 2-52 with a little TCL thrown in
 long savedStart, savedEnd;

 fTextPane_StyleTextPano->
 GetSelection(&savedStart, &savedEnd);
 
 (*fTextPane_StyleTextPano->macTE)->selStart = 0;
 (*fTextPane_StyleTextPano->macTE)->selEnd = 
 fTextPane_StyleTextPano->GetLength();
 
 newStyle = (Handle)fTextPane_StyleTextPano ->
 GetTheStyleScrap();
 
 (*fTextPane_StyleTextPano->macTE)->selStart =
 savedStart;
 (*fTextPane_StyleTextPano->macTE)->selEnd =
 savedEnd;
 
 HLock(theStyle);
 HLock(newStyle);
 
 if(theStyle)
 {
 long len = GetHandleSize(newStyle);
 
 SetHandleSize(theStyle, len);

 BlockMove(*newStyle, *theStyle, len);
 
 ChangedResource((Handle)theStyle);
 WriteResource(theStyle);
 }
 else
 {
 AddResource(
 newStyle , 'styl', 128, "\ptext style"
 );
 WriteResource(newStyle);
 }

 HUnlock(theStyle);
 HUnlock(newStyle);
 
 theResFile.Update();
 }

Reading in a styled text document is basically the reverse of this, and left as an exercise for the reader.

Q: Why does the application crash when I try to open a currently open document?

A: In x_CStyledDoc::FailOpen(), you will see that it calls Failure() if the file is already open. You will want to override FailOpen() to open a dialog or otherwise handle the situation.

Q: How do I get the document to print?

A: TCL has code to handle this for you. Make sure you have the Print checkbox checked in the View Info dialog for the main window.

Q: When I print, why does it cut lines in half at the bottom of the page?

A: You have the fixedLineHeights checkbox checked in the Pane Info for the StyledText panorama. (I did not tell you to turn it off earlier because I would then have only nine questions.) Uncheck that and TCL will handle printing styled text correctly.

Q: When there is no current selection, changing the Font, Size, or Style menus do not affect what I type next. Why not?

A: TCL relies on the style of the current selection to set the menus when that information is needed. To change this behavior we need to create a data member of type TextStyle for our CStyledTextEditPano to save the menu choices. I called it theStyle. Then we need to save this information:

void CStyledTextEditPano::
 DoKeyDown(
 char theChar, Byte keyCode, EventRecord *macEvent
 )
{
 long selStart, selEnd;
 
 CStyleText::GetSelection(&selStart,&selEnd);
 
// The case we want to change behavior of
 if(selStart == selEnd)
 {
 short whichAttributes = doFont | doSize | doFace;
 GetTextStyle(&whichAttributes, &theStyle);
 }
 
 inherited::DoKeyDown(theChar, keyCode, macEvent);
}

and restore the correct style:

void CStyledTextEditPano::TypeChar(
 char theChar, short theModifers
)
{
 short whichAttributes = doFont | doSize | doFace;
 
 TESetStyle(
 whichAttributes, &theStyle, FALSE, macTE
 );
 
 inherited::TypeChar(theChar, theModifers);
}

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

TunnelBear 3.0.1 - Subscription-based pr...
TunnelBear is a subscription-based virtual private network (VPN) service and companion app, enabling you to browse the internet privately and securely. Features Browse privately - Secure your data... Read more
ExpanDrive 5.4.0 - Access cloud storage...
ExpanDrive builds cloud storage in every application, acts just like a USB drive plugged into your Mac. With ExpanDrive, you can securely access any remote file server directly from the Finder or... Read more
Opera 40.0.2308.62 - High-performance We...
Opera is a fast and secure browser trusted by millions of users. With the intuitive interface, Speed Dial and visual bookmarks for organizing favorite sites, news feature with fresh, relevant content... Read more
Apple iOS 10.0.2 - The latest version of...
iOS 10 is the biggest release of iOS ever. A massive update to Messages brings the power of the App Store to your conversations and makes messaging more personal than ever. Find your route with... Read more
Herald 7.0 - Notification plugin for Mai...
Note: Versions 2.1.3 (for OS X 10.7), 3.0.6 (for OS X 10.8), 4.0.8 (for OS X 10.9), 5.0.2 (for OS X 10.10), and 6.0.3 (for OS X 10.11) are no longer supported by the developer. Herald is a... Read more
Postbox 5.0.2 - Powerful and flexible em...
Postbox is a new email application that helps you organize your work life and get stuff done. It has all the elegance and simplicity of Apple Mail, but with more power and flexibility to manage even... Read more
Yummy FTP Pro 1.11.10 - $29.99
Yummy FTP Pro is an advanced Mac file transfer app which provides a full-featured professional toolkit combined with blazing speeds and impeccable reliability, so whether you want to transfer a few... Read more
Tidy Up 4.1.17 - $29.99
Tidy Up is a full-featured duplicate finder and disk-tidiness utility. Features With Tidy Up you can search for duplicate files and packages by the owner application, content, type, creator,... Read more
Logitech Control Center 3.9.5 - Keyboard...
Logitech Control Center (LCC) is designed to support OS X and allows you to take full advantage of your Logitech keyboard, mouse, or trackball. With the LCC you can: Browse the Internet using... Read more
Macgo Blu-ray Player 2.16.17 - Blu-ray p...
Macgo Blu-ray Player can bring you the most unforgettable Blu-ray experience on your Mac. Overview Macgo Mac Blu-ray Player can satisfy just about every need you could possibly have in a Blu-ray... Read more

How to build and care for your team in D...
Before you hit the trail and become a dog sledding legend, there’s actually a fair bit of prep work to be done. In Dog Sled Saga, you’re not only racing, you’re also building and caring for a team of furry friends. There’s a lot to consider—... | Read more »
How to win every race in Dog Sled Saga
If I had to guess, I’d say Dog Sled Saga is the most adorable racing game on the App Store right now. It’s a dog sled racing sim full of adorable, loyal puppies. Just look at those fluffy little tails wagging. Behind that cute, pixelated facade is... | Read more »
Let the war games commence in Gunship Ba...
Buzz Lightyear famously said, “This isn’t flying, this is falling – with style!” In the case of Gunship Battle: Second War, though, this really is flying - with style! The flight simulator app from Joycity puts you in control of 20 faithfully... | Read more »
How to get a high score in Fired Up
Fired Up is Noodlecake Games’ high score chasing, firefighting adventure. You take control of a wayward firefighter who propels himself up the side of a highrise with blasts of water. Sound silly? It is. It’s also pretty difficult. You can’t... | Read more »
NBA 2K17 (Games)
NBA 2K17 1.0 Device: iOS iPhone Category: Games Price: $7.99, Version: 1.0 (iTunes) Description: Following the record-breaking launch of NBA 2K16, the NBA 2K franchise continues to stake its claim as the most authentic sports video... | Read more »
Dog Sled Saga (Games)
Dog Sled Saga 1.0.1 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.1 (iTunes) Description: A game by Dan + Lisa As a rookie musher, foster a dogsledding team whose skills will grow if they're treated right. Week by... | Read more »
60 Seconds! Atomic Adventure (Games)
60 Seconds! Atomic Adventure 1.2 Device: iOS Universal Category: Games Price: $2.99, Version: 1.2 (iTunes) Description: 60 Seconds! is a dark comedy atomic adventure of scavenge and survival. Collect supplies and rescue your family... | Read more »
Tons of Bullets! (Games)
Tons of Bullets! 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Tons of BulletsA retro 2D pixel platformer infused with tons of bullets and tons of features!Fight as Kenji the Ninja and... | Read more »
Sorcery! 4 (Games)
Sorcery! 4 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: *** PLEASE NOTE: Sorcery! 4 requires a minimum of iPad 3 or iPhone 4 *** An epic adventure through a cursed citadel of monsters,... | Read more »
Building the perfect Animation Throwdown...
Animation Throwdown is a casual card game full of plenty of inside jokes from some of your favorite cartoons. It’s accessible as far as card games go, but that’s not to say that it hands your victories to you easily. There’s quite a bit that goes... | Read more »

Price Scanner via MacPrices.net

Duplicate Sweeper Free On Mac App Store For O...
To celebrate the launch of Apple’s latest macOS Sierra, Stafford, United Kingdom based Wide Angle Software has announced that its duplicate file finder software, Duplicate Sweeper, is now available... Read more
13-inch Retina MacBook Pros on sale for up to...
B&H Photo has 13″ Retina Apple MacBook Pros on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY tax only: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1174.99 $125 off MSRP - 13... Read more
Evidence Surfaces Pointing To New A10X Chip F...
Citing a job description for a Project Lead position at Apple’s Austin, Texas engineering labs, Motley Fool’s Ashraf Eassa deduces that development is progressing well on Apple’s next-generation in-... Read more
Check Print’R for macOS Allows Anyone to Easi...
Delaware-based Match Software has announced the release and immediate availability of Check Print’R 3.21, an important update to their easy-to-use check printing application for macOS. Check Print’R... 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 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
Major Version 5 Release Of Free myTuner Radio...
AppGeneration Software has announced the release of myTuner Radio 5.0.1, an important update to their live radio app for iOS and Android platforms. With myTuner Radio, you can listen to more than 30,... Read more
TheAppStore Searches And Filters iOS And macO...
Boston based InchWest has announced the official launch of TheAppStore, a free web based service that lets users search iOS and Mac apps on the web without iTunes or the App store. TheAppStore... Read more
2TB Time Capsule on sale for $199, save $100
Amazon has 2TB Apple Time Capsules on sale for $199 including free shipping. Their price is $100 off MSRP. Choose Amazon as the seller when making your purchase, rather than a third party seller. Read more
12-inch 1.2GHz Rose Gold Retina MacBook on sa...
Amazon.com has the 2016 12″ 1.2GHz Rose Gold Retina MacBook on sale for $1254.02 including free shipping. Their price is $345 off MSRP, and it’s the lowest price available for this model from any... Read more

Jobs Board

Senior *Apple* Administrator - Pratt Instit...
POSITION SUMMARY: Directs the coordination and standardization of campus-wide Apple systems, including planning, analysis and implementation of Apple -related Read more
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
*Apple* Retail - Multiple Positions- Napervi...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
US- *Apple* Store Leader Program - Apple (Un...
…Summary Learn and grow as you explore the art of leadership at the Apple Store. You'll master our retail business inside and out through training, hands-on Read more
*Apple* Retail - Multiple Positions (US) - A...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.