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

Minecraft 302 - Popular sandbox building...
Minecraft allows players to build constructions out of textured cubes in a 3D procedurally generated world. Other activities in the game include exploration, gathering resources, crafting, and combat... Read more
FotoMagico 5.2b8 - Powerful slideshow cr...
FotoMagico lets you create professional slideshows from your photos and music with just a few, simple mouse clicks. It sports a very clean and intuitive yet powerful user interface. High image... Read more
TeamViewer 11.0.65452 - Establish remote...
TeamViewer gives you remote control of any computer or Mac over the Internet within seconds, or can be used for online meetings. Find out why more than 200 million users trust TeamViewer! Free for... Read more
Dropbox 9.4.49 - Cloud backup and synchr...
Dropbox is an application that creates a special Finder folder that automatically syncs online and between your computers. It allows you to both backup files and keep them up-to-date between systems... Read more
Geekbench 4.0.0 - Measure processor and...
Geekbench provides a comprehensive set of benchmarks engineered to quickly and accurately measure processor and memory performance. Designed to make benchmarks easy to run and easy to understand,... Read more
Nisus Writer Pro 2.1.5 - Multilingual wo...
Nisus Writer Pro is a powerful multilingual word processor, similar to its entry level products, but brings new features such as table of contents, indexing, bookmarks, widow and orphan control,... Read more
Default Folder X 5.0.6 - Enhances Open a...
Default Folder X attaches a toolbar to the right side of the Open and Save dialogs in any OS X-native application. The toolbar gives you fast access to various folders and commands. You just click on... Read more
Alfred 3.1 - Quick launcher for apps and...
Alfred is an award-winning productivity application for OS X. Alfred saves you time when you search for files online or on your Mac. Be more productive with hotkeys, keywords, and file actions at... Read more
MYStuff Pro 2.0.25 - Create inventories...
MYStuff Pro is the most flexible way to create detail-rich inventories for your home or small business. Add items to MYStuff by dragging and dropping existing information, uploading new images, or... Read more
OmniOutliner Pro 4.6 - Pro version of th...
OmniOutliner Pro is a flexible program for creating, collecting, and organizing information. Give your creativity a kick start by using an application that's actually designed to help you think. It's... Read more

Six! Tips, tricks, and hints for beginne...
There's nothing pretentious about Six!, the latest release from Gram Games. As puzzlers go, it's so unassuming that it took me some time to even realize why it was called what it was. Somewhere, my high school geometry teacher is now sobbing... | Read more »
Mobius Final Fantasy: Multiplayer update...
Up until now, Mobius Final Fantasy has been about as single-player an experience as an RPG can be. Not only do you play solo, but you are literally one among a seemingly unending wave of faceless warriors on the road toward the same goal. [Read... | Read more »
Find out the story behind League of Ange...
If you’re looking for a new thrilling MMORPG to play with your friends then you’ll be excited to hear that there is a sequel to one of the most well known titles in the genre – namely League of Angels 2. With a brand new 3D engine offering... | Read more »
Naruto Shippuden: Ultimate Ninja Blazing...
I'm not sure if it's possible to say you are an anime fan but also never have seen one episode of Naruto. If it is, then I resemble that remark, and if not, I offer a hearty apology. [Read more] | Read more »
5 mobile games that let you explore spac...
No Man's Sky hasn't exactly turned out to be everything it was promised. Though its core concept of exploring an unimaginably vast universe of different planets is an intriguing one, the execution has left many PS4 and PC gamers feeling like they... | Read more »
Mummy madness in new action game Tomb He...
Hot on the tail of Bump Hero, ZPlay is giving gamers another reason to get screen bashing with a brand new release. Tomb Heroes is a challenging action game in which you battle enemies in various tombs around the world. You can select from nine... | Read more »
Siralim 2 (RPG / Roguelike) (Games)
Siralim 2 (RPG / Roguelike) 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Siralim 2 is an old-school monster catching RPG. Summon and customize hundreds of creatures to fight for you as... | Read more »
Clean Text (Productivity)
Clean Text 1.0 Device: iOS Universal Category: Productivity Price: $3.99, Version: 1.0 (iTunes) Description: | Read more »
Gemini - A Journey of Two Stars (Games)
Gemini - A Journey of Two Stars 1.0.1 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.1 (iTunes) Description: *** SPECIAL LAUNCH SALE: $2.99 (25% off) *** "A mesmerizing and unexpectedly emotional journey." -- Los... | Read more »
How to get four NFL superstars for your...
Even though you're probably well on your way to building a top notch squad for the new season in Madden NFL Mobile, let's say you could beef it up by adding Rob Gronkowski, Antonio Brown, Von Miller, and Todd Gurley to your roster. That's... | Read more »

Price Scanner via MacPrices.net

Tim Cook Posts Open Letter To The Apple Commu...
Apple Inc. CEO Tim Cook has posted an open letter commenting on the European Commission’s bizarre demand that Apple pay more than $14 billion in allegedly underpaid back taxes on its Irish... Read more
Streetwise Drivers Club App Now Features Open...
Streetwise Drivers Club, an app that rewards drivers with deals on everything from dining and gift cards to tires and insurance, has announced the launch of a new enhancement connecting app users... Read more
15-inch Retina MacBook Pros on sale for up to...
B&H Photo has 15″ Retina Apple MacBook Pros on sale for up to $200 off MSRP. Shipping is free, and B&H charges NY tax only: - 15″ 2.2GHz Retina MacBook Pro: $1799 $200 off MSRP - 15″ 2.5GHz... Read more
RESCUECOM 2016 Semi-Annual Computer Reliabili...
The beginning of a new school year is upon us again, in which students and parents have some very important choices to make, often including the purchase of a computer or tablet. Whether you are... Read more
VRS Design Damda Glide Series iPhone 7 and 7...
What makes the Damda Glide Series for the iPhone 7 and iPhone 7 Plus special? Case maker VRS Design says its Damda Glide Series is the first mobile case to incorporate a semi-automatic mechanism for... Read more
Apple refurbished iMacs available for up to $...
Apple has Certified Refurbished 2015 21″ & 27″ iMacs available for up to $350 off MSRP. Apple’s one-year warranty is standard, and shipping is free. The following models are available: - 21″ 3.... Read more
Clearance 2015 13-inch MacBook Airs available...
B&H Photo has clearance 2015 13″ MacBook Airs available for $350 off original MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 1.6GHz/4GB/128GB MacBook Air (MJVE2LL/A): $829... Read more
Check Apple prices on any device with the iTr...
MacPrices is proud to offer readers a free iOS app (iPhones, iPads, & iPod touch) and Android app (Google Play and Amazon App Store) called iTracx, which allows you to glance at today’s lowest... Read more
Save $120 with Apple refurbished Time Capsule...
Apple has certified refurbished Time Capsules available for $120 off MSRP. Apple’s one-year warranty is included with each Time Capsule, and shipping is free: - 2TB Time Capsule: $179, $120 off (not... Read more
9-inch 32GB iPad Pros on sale for $70 off MSR...
B&H Photo has 9″ 32GB WiFi Apple iPad Pros on sale for $70 off MSRP, each including free shipping. B&H charges sales tax in NY only: - 9″ Space Gray 32GB WiFi iPad Pro: $529 $70 off MSRP - 9... Read more

Jobs Board

*Apple* Solutions Consultant - Apple (United...
Apple Solutions ConsultantJob Number: 51218534Pleasant Hill, California, United StatesPosted: Aug. 18, 2016Weekly Hours: 40.00Job SummaryAs an Apple Solutions Read more
*Apple* Solutions Consultant - Apple (United...
# Apple Solutions Consultant Job Number: 51218354 Fredericksburg, Virginia, United States Posted: Aug. 18, 2016 Weekly Hours: 40.00 **Job Summary** As an Apple 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
*Apple* /Mac Support Engineer - GFI Digital,...
FI Digital, Inc. is currently seeking candidates for a full time Apple Support Engineer to add to our Maryland Heights, Missouri IT team. Candidates must be dynamic Read more
*Apple* Solutions Consultant - Apple (United...
Apple Solutions ConsultantJob Number: 51218534Pleasant Hill, California, United StatesPosted: Aug. 18, 2016Weekly Hours: 40.00Job SummaryAs an Apple Solutions Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.