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

Tidy Up 5.3.7 - Find duplicate files and...
Tidy Up is a full-featured duplicate finder and disk-tidiness utility. Features: Supports Lightroom: it is now possible to search and collect duplicates directly in the Lightroom library. Multiple... Read more
Pinegrow 5.97 - Mockup and design web pa...
Pinegrow (was Pinegrow Web Designer) is desktop app that lets you mockup and design webpages faster with multi-page editing, CSS and LESS styling, and smart components for Bootstrap, Foundation,... Read more
BlueStacks 4.210.0 - Run Android applica...
BlueStacks App Player lets you run your Android apps fast and fullscreen on your Mac. Feature comparison chart How to install Bluestacks on your Mac Go to MacUpdate and click the green "Download"... Read more
WhatsApp 2.2027.10 - Desktop client for...
WhatsApp is the desktop client for WhatsApp Messenger, a cross-platform mobile messaging app which allows you to exchange messages without having to pay for SMS. WhatsApp Messenger is available for... Read more
Art Text 4.0.1 - $29.99
Art Text is graphic design software specifically tuned for lettering, typography, text mockups and various artistic text effects. Supplied with a great variety of ready to use styles and materials,... Read more
Adobe Dreamweaver CC 2020 20.2 - Build w...
Dreamweaver CC 2020 is available as part of Adobe Creative Cloud for as little as $20.99/month (or $9.99/month if you're a previous Dreamweaver customer). Adobe Dreamweaver CC 2020 allows you to... Read more
Adobe Acrobat DC 20.009.20074 - Powerful...
Acrobat DC is available only as a part of Adobe Creative Cloud, and can only be installed and/or updated through Adobe's Creative Cloud app. Adobe Acrobat DC with Adobe Document Cloud services is... Read more
beaTunes 5.2.10 - Organize your music co...
beaTunes is a full-featured music player and organizational tool for music collections. How well organized is your music library? Are your artists always spelled the same way? Any R.E.M. vs REM?... Read more
DiskCatalogMaker 8.1.5 - Catalog your di...
DiskCatalogMaker is a simple disk management tool which catalogs disks. Simple, light-weight, and fast Finder-like intuitive look and feel Super-fast search algorithm Can compress catalog data for... Read more
Meteorologist 3.4.1 - Popular weather ap...
Meteorologist is a simple interface to weather provided by weather.com. It provides the ability to show the weather in the main menu bar, displaying more detail in a pop-up menu, whose contents are... Read more

Latest Forum Discussions

See All

Steam Link Spotlight - Disco Elysium
Steam Link Spotlight is a feature where we look at PC games that play exceptionally well using the Steam Link app. Our last entry was Signs of the Sojourner Read about how it plays using Steam Link over here. | Read more »
Distract Yourself With These Great Mobil...
There’s a lot going on right now, and I don’t really feel like trying to write some kind of pithy intro for it. All I’ll say is lots of people have been coming together and helping each other in small ways, and I’m choosing to focus on that as I... | Read more »
Pokemon Go's July Community Day wil...
Pokemon Go developers have announced the details concerning the upcoming Gastly Community Day. This particular event was selected by the players of the game after the Gas Pokemon came in second place after a poll that decided which Pokemon would... | Read more »
Clash Royale: The Road to Legendary Aren...
Supercell recently celebrated its 10th anniversary and their best title, Clash Royale, is as good as it's ever been. Even for lapsed players, returning to the game is as easy as can be. If you want to join us in picking the game back up, we've put... | Read more »
Detective Di is a point-and-click murder...
Detective Di is a point-and-click murder mystery set in Tang Dynasty-era China. You'll take on the role of China's best-known investigator, Di Renjie, as he solves a series of grisly murders that will ultimately lead him on a collision course with... | Read more »
Dissidia Final Fantasy Opera Omnia is se...
Dissidia Final Fantasy Opera Omnia, one of Square Enix's many popular mobile RPGs, has announced a plethora of in-game events that are set to take place over the summer. This will include several rewards, Free Multi Draws and more. [Read more] | Read more »
Sphaze is a neat-looking puzzler where y...
Sphaze is a neat-looking puzzler where you'll work to guide robots through increasingly elaborate mazes. It's set in a visually distinct world that's equal parts fantasy and sci-fi, and it's finally launched today for iOS and Android devices. [... | Read more »
Apple Arcade is in trouble
Yesterday, Bloomberg reported that Apple is disappointed in the performance of Apple Arcade and will be shifting their approach to the service by focusing on games that can retain subscribers and canceling other upcoming releases that don't fit... | Read more »
Pixel Petz, an inventive platform for de...
Pixel Petz has built up a sizeable player base thanks to its layered, easy-to-understand creative tools and friendly social experience. It revolves around designing, trading, and playing with a unique collection of pixel art pets, and it's out now... | Read more »
The King of Fighters Allstar's late...
The King of Fighters ALLSTAR, Netmarble's popular action RPG, has once again been updated with a plethora of new content. This includes battle cards, events and 21 new fighters, which increases the already sizeable roster even more. [Read more] | Read more »

Price Scanner via MacPrices.net

$219 Apple AirPods Pro are back at Verizon, s...
Verizon has Apple AirPods Pro on sale again for a limited time for $219.99 on their online store. Their price is $30 off Apple’s MSRP, and it’s the lowest price we’ve seen for AirPods Pro. Available... Read more
Apple’s $779 13″ MacBook Air deal returns to...
Apple has clearance, Certified Refurbished, 2019 13″ MacBook Airs available again starting at $779. Each MacBook features a new outer case, comes with a standard Apple one-year warranty, and is... Read more
$200 13″ MacBook Pro discounts are back at Am...
Amazon has 2020 13″ 2.0GHz MacBook Pros on sale again today for $150-$200 off Apple’s MSRP. Shipping is free. Be sure to purchase the MacBook Pro from Amazon, rather than a third-party seller, and... Read more
Deal Alert! Apple AirPods with Wireless Charg...
Sams Club has Apple AirPods with Wireless Charging Case on sale on their online store for only $149.98 from July 6, 2020 to July 9, 2020. Their price is $50 off Apple’s MSRP, and it’s the lowest... Read more
Xfinity Mobile promo: Apple iPhone XS models...
Take $300 off the purchase of any Apple iPhone XS model at Xfinity Mobile while supplies last. Service plan required: – 64GB iPhone XS: $599.99 save $300 – 256GB iPhone XS: $749.99 save $300 – 512GB... Read more
New July 2020 promo at US Cellular: Switch an...
US Cellular has introduced a new July 2020 deal offering free 64GB Apple iPhone 11 smartphones to customers opening a new line of service. No trade-in required, and discounts are applied via monthly... Read more
Apple offers up to $400 Education discount on...
Apple has launched their Back to School promotion for 2020. They will include one free pair Apple AirPods (with charging case) with the purchase of a MacBook Air, MacBook Pro, iMac, or iMac Pro (Mac... Read more
July 4th Sale: Woot offers wide range of Macs...
Amazon-owned Woot is blowing out a wide range of Apple Macs and iPads for July 4th staring at $279 and ranging up to just over $1000. Models vary from older iPads and 11″ MacBook Airs to some newer... Read more
Apple Pro Display XDR with Nano-Texture Glass...
Abt Electronics has Apple’s new 32″ Pro Display XDR model with the nano-texture glass in stock and on sale today for up to $144 off MSRP. Shipping is free: – Pro Display XDR (nano-texture glass): $... Read more
New 2020 Mac mini on sale for up to $100 off...
Amazon has Apple’s new 2020 Mac minis on sale today for $40-$100 off MSRP with prices starting at $759. Shipping is free: – 2020 4-Core Mac mini: $759 $40 off MSRP – 2020 6-Core Mac mini: $998.99 $... Read more

Jobs Board

Physical Therapist Assistant - *Apple* Hill...
Physical Therapist Assistant - Apple Hill Rehab - Full Time Tracking Code 62519 Job Description General Summary: Under the direct supervision of a licensed Physical Read more
Operating Room Assistant, *Apple* Hill Surg...
Operating Room Assistant, Apple Hill Surgical Center - Full Time, Day Shift, Monday - Saturday availability required Tracking Code 62363 Job Description Operating Read more
Perioperative RN - ( *Apple* Hill Surgical C...
Perioperative RN - ( Apple Hill Surgical Center) Tracking Code 60593 Job Description Monday - Friday - Full Time Days Possible Saturdays General Summary: Under the Read more
Product Manager, *Apple* Commercial Sales -...
Product Manager, Apple Commercial Sales Austin, TX, US Requisition Number:77652 As an Apple Product Manager for the Commercial Sales team at Insight, you Read more
*Apple* Mac Product Engineer - Barclays (Uni...
Apple Mac EngineerWhippany, NJ Support the development and delivery of solutions, products, and capabilities into the Barclays environment working across technical Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.