TweetFollow Us on Twitter

May 93 - Three MacApp 3.0.1 Shortcuts

Three MacApp 3.0.1 Shortcuts

Ken Victor

The following three shortcuts have made my life much simpler while developing a new MacApp 3.0.1 application using C++.

Try and Catch Macros

In a past issue of "Develop" magazine, the C macros for Try and Catch were defined for MacApp 2. I got used to using these when I was developing a MacApp 2 product using C++, and although the MacApp 3 approach to exception handling is easier to use with C++, I wanted to continue to use Try and Catch. I find this more meaningful to read than if fi.Try(). So here is my version for MacApp 3:
#define try                    \
    FailInfo fi;            \
    if (fi.Try()) {
#define catch               \
    fi.Success();           \
    }                       \
    else
#define try2                \
    if (fi.Try()) {
#define success     fi.Success()
#define resignal    fi.ReSignal()

Thus you can write code that looks like the following:

try {
    …
    }
catch {
    …
    resignal;
    }

    or:

try …
catch ;

    or:

try {
    …
    success;
    return;
    …
    }
catch ;

These macros nest properly so that you can write the following:

try {
    …
    try {
        …
        }
    catch {
        …
        resignal;
        }
    …
    }
catch {
    …
    resignal;
    }

The Try2 macro is used if you want a second, or third, Try clause at the same level as a previous one. E.g.:

try {
    …
    }
catch {
    …
    resignal;
    }
…
try2 {
    …
    }
catch {
    …
    resignal;
    }

The Catch macro could easily be modified to automatically resignal, but I felt it best not to hide this, and to save the few bytes in the situation where I didn't need to resignal.

TMyDocument Shortcut

When developing a new application, each time you add, change, or delete a class variable from your TMyDocument class, there are up to 8 different methods that you may have to change:
Initialize
IMyDocument
DoInitialState
Free
FreeData
DoNeedDiskSpace
DoRead
DoWrite

And it is important that DoRead and DoWrite perform operations in the same order. I got tired of trying to remember to update each of these methods, and of having to go back and forth between DoRead and DoWrite to make sure I was doing things in the right order. I therefore decided to localize all these functions into one common method. The price I pay for this is a slight performance hit due to the extra switches in my common routine, a slight violation of clean segmentation, and a violation of the tenant of a single routine performing a single function. I felt that these were a small price to pay for the increased convenience. When my app is complete, I can always do away with this common routine, and place the appropriate code in each of the specific methods.

My common routine is defined as follows:

enum tDocIterType {
    forReading,
    forWriting,
    forSizing,
    forInitialize,
    forIDoc,
    forDoInitial,
    forFreeData,
    forFree
    };
void    DoSRWIIDF(  tDocIterType iterType,
                    TFile* aFile,
                    long& dataForkBytes,
                    long& rsrcForkBytes,
                    Boolean modifier = false);

Each of my standard methods is now quite simple and implemented similarly to the following:

pascal void TMyDocument::DoNeedDiskSpace(
                        TFile* itsFile,
                        long& dataForkBytes,
                        long& rsrcForkBytes) {
    // count us
    DoSRWIIDF(  forSizing,
                itsFile, 
                dataForkBytes, 
                rsrcForkBytes);
    }   //  end of TMyDocument :: DoNeedDiskSpace 

My common routine locks the document, so I can read and write to it comfortably, allocates any needed Streams, and for each member variable in the document performs a switch to perform the required action. The core of the code follows:

#pragma segment DocReadWriteEtc
void TMyDocument::DoSRWIIDF(    tDocIterType iterType,
                    TFile* aFile,
                    long& dataForkBytes,
                    long& rsrcForkBytes,
                    Boolean modifier) {
TStream*        aStream = NULL;
VOLATILE( aStream);

// lock us just in case
    SignedByte myState = LockHandleHigh( (Handle) this);

    try {
    // get stream for i/o
        switch (iterType) {
            case forSizing:
                aStream = new TCountingStream;
                ((TCountingStream*) aStream)->ICountingStream();
                aStream->SetPosition( 0);
                inherited::DoNeedDiskSpace( aFile,
                                        dataForkBytes,
                                        rsrcForkBytes);
                break;
            case forReading:
            case forWriting:
                aStream = new TFileStream;
                ((TFileStream*) aStream)->IFileStream( aFile);
                aStream->SetPosition( 0);
                if (iterType == forReading)
                    inherited::DoRead( aFile, modifier);
                else inherited::DoWrite( aFile, modifier);
                break;
            }
    //  field 1
        switch (iterType) {
            case forSizing:     // fall thru
            case forWriting:
                aStream->WriteBytes( &field1, sizeof( field1));
                break;
            case forReading:    
                aStream->ReadBytes( &field1, sizeof( field1));
                break;
            case forInitialize:
                …
                break;
            case forIDoc:
                …
                break;
            case forDoInitial:
                …
                break;
            case forFreeData:
                …
                break;
            case forFree:
                …
                break;
            }
    //  field 2
        …
    // free stream
        if (iterType == forSizing)
            dataForkBytes += aStream->GetSize();
        FreeIfObject( aStream);
    // unlock us
        HSetState( (Handle) this, myState);
    }
catch {
    // free stream
        FreeIfObject( aStream);
    // unlock us
        HSetState( (Handle) this, myState);
    resignal;
    }
}   //  end of TMyDocument :: DoSRWIIDF

Now whenever I add, change, or delete a field, it is a simple matter of modifying the one "block" of code.

Floating TEditTexts

In several of my dialogs, I had fields in which I wanted to restrict what characters the user could enter. I wanted to beep if the user typed an illegal character. In looking at the MacApp3Tech$ archives, the suggestions for accomplishing this basically involved subclassing TEditText and a few other classes so that you could create you own floating TEView with its appropriate behavior. Nick Nallick, in his article "Text Filtering with Behaviors" in the July 1992 FrameWorks describes such an approach. I decided to try the different approach of attaching a Behavior to the dialog floating TEView, and much to my relief this worked out even better than I thought it would, and is in fact a very general approach. You can even attach multiple instances of this behavior to the floating view, and each instance can act on different characters and/or be applied to different TEditTexts in the dialog.

The Behavior basically looks at each character the user types into a TEditText and beeps if this is an illegal character, or if it is a legal character simply passes it along the behavior chain for normal operation. The behavior will also examine each character in a pasted string and beep if the string contains any illegal characters or pass the string along. Using the behavior is quite simple and relies on the fact that there is only one floating TEView per dialog window and that this view is usually the window's target after the window has been created. First create your window and establish it as a dialog so that the floating TEView will exist. Then create the behavior:

TBhvrInputFilter* aCharBeeper = new TBhvrInputFilter;

Then call the '"I" method, passing the window:

aCharBeeper->IBhvrInputFilter( aWindow);

This will initialize the Behavior and attach it to the floating TEView. It finds the floating TEView by first looking at the window's target to see if is a member of TDialogTEView; if not, it searches the window's sub views until it finds a TDialogTEView to attach to.

Next tell the Behavior which TEditText views you wish to check by passing the identifier(s) of these views:

aCharBeeper->AddView( aEditText->GetIdentifier());
aCharBeeper->AddView( anotherEditText->GetIdentifier());

And lastly, tell the behavior which characters are allowed. The default is to not allow any characters. However there are several methods for specifying the legal characters.

aCharBeeper->AllowNumbers();
aCharBeeper->AllowControlChars();
aCharBeeper->AllowChar( '/');

The above sequence will allow numbers and the slash character, the common characters for a date input view, but will beep on all other characters. It will also allow all control characters so that normal editing can take place.

Advantages

This approach relies on the fact that a common single floating TEView is passed around, rather than each TEditText having its own floating TEView. This leads to both the advantages and disadvantages of this approach, as opposed to subclassing TEditText to install your own floating TEView. This approach is simpler to use and requires less code since there is no need to subclass. The disadvantage is that since this behavior is attached to the only floating TEView, each TEditText that you use uses this behavior, even if you don't want to filter that TEditText. The list of views to filter is maintained as a TLongintList and I haven't noticed any unacceptable performance (but I have not made any measurements). This approach is especially useful if you have several TEditTexts that require the same filtering. And, as mentioned above, if you have different filtering requirements, you can simply install multiple instances of this behavior, each with their own set of views to check, and their own set of legal characters.

Post processing

While further developing my app, I had a need to process TEditText after each character's editing action had taken place, but before any other processing could occur. (What I wanted was to perform name lookup and recognition based on the user's [partial] input string.) Since my use of behaviors for filtering input worked so well, I decided to capitalize on what I already had. I broke up TBhvrInputFilter into two classes: TBhvrFTEVFilter and TBhvrInputFilter. TBhvrFTEVFilter is an abstract class with methods for attaching itself to the floating TEView, and for adding, removing, and checking which sub views to work with. TBhvrInputFilter is now a subclass of TBhvrFTEVFilter and contains the specific methods having to do with filtering characters.

I then subclassed TBhvrFTEVFilter again to create a class that would do post processing of the user's input. This turned out to be a little more difficult than I thought it would be at first, but still simpler than any other way I could think of. The difficulty lay in the fact that when I call inherited::DoKeyEvent or inherited::DoMenuCommand, the TDialogTEView actually created command objects, rather than acting immediately. This was solved by my examining the event queue after calling the inherited method, looking for a TTECommand. If I find one, I remove it from the queue, call its DoIt, Commit, and Free methods. I can then easily get the resulting edited text and act as I wish.

In hindsight, I realized that I may have been able to use MacApp's dependency and notification techniques to accomplish this post processing. However, I now had something that worked, and I believe I might have had problems with characters after the first typed character, and "if it ain't broke..."

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Affinity Designer 1.5.5 - Vector graphic...
Affinity Designer is an incredibly accurate vector illustrator that feels fast and at home in the hands of creative professionals. It intuitively combines rock solid and crisp vector art with... Read more
djay Pro 1.4.3 - Transform your Mac into...
djay Pro provides a complete toolkit for performing DJs. Its unique modern interface is built around a sophisticated integration with iTunes and Spotify, giving you instant access to millions of... Read more
Jamf Pro 9.98 - Powerful sysadmin/enterp...
Jamf Pro (formerly Casper Suite) is the EMM tool that delights IT pros and the users they support by delivering on the promise of unified endpoint management for Apple devices. At Jamf, connecting... Read more
Airmail 3.2.4 - Powerful, minimal email...
Airmail is an mail client with fast performance and intuitive interaction. Support for iCloud, MS Exchange, Gmail, Google Apps, IMAP, POP3, Yahoo!, AOL, Outlook.com, Live.com. Airmail was designed... Read more
RapidWeaver 7.3.1 - Create template-base...
RapidWeaver is a next-generation Web design application to help you easily create professional-looking Web sites in minutes. No knowledge of complex code is required, RapidWeaver will take care of... Read more
PopChar 7.7 - $16.99 (51% off)
PopChar helps you get the most out of your font collection. With its crystal-clear interface, PopChar provides a frustration-free way to access any font's special characters. Features Expanded... Read more
Apple iTunes 12.6 - Play Apple Music and...
Apple iTunes lets you organize and stream Apple Music, download and watch video and listen to Podcasts. It can automatically download new music, app, and book purchases across all your devices and... Read more
MacPilot 9.0.6 - Enable over 1,200 hidde...
MacPilot gives you the power of UNIX and the simplicity of Macintosh, which means a phenomenal amount of untapped power in your hands! Use MacPilot to unlock over 1,200 features, and access them all... Read more
Sparkle Pro 2.1.4 - $79.99
Sparkle Pro will change your mind if you thought building websites wasn't for you. Sparkle is the intuitive site builder that lets you create sites for your online portfolio, team or band pages, or... Read more
TextSoap 8.3.3 - Automate tedious text d...
TextSoap can automatically remove unwanted characters, fix up messed up carriage returns, and do pretty much anything else that we can think of to text. Save time and effort. Be more productive. Stop... Read more

Failbetter Games details changes coming...
Sunless Sea, Failbetter Games' dark and gloomy sea explorer, sets sail for the iPad tomorrow. Ahead of the game's launch, Failbetter took to Twitter to discuss what will be different in the mobile version of the game. Many of the changes make... | Read more »
Splish, splash! The Pokémon GO Water Fes...
Niantic is back with a new festival for dedicated Pokémon GO collectors. The Water Festival officially kicks off today at 1 P.M. PDT and runs through March 29. Magikarp, Squirtle, Totodile, and their assorted evolved forms will be appearing at... | Read more »
Death Road to Canada (Games)
Death Road to Canada 1.0 Device: iOS Universal Category: Games Price: $7.99, Version: 1.0 (iTunes) Description: Get it now at the low launch price! Price will go up a dollar every major update. Update news at the bottom of this... | Read more »
Bean's Quest Beginner's Guide:...
Bean's Quest is a new take on both the classic platformer and the endless runner, and it's free on the App Store for the time being. Instead of running constantly, you can't stop jumping. That adds a surprising new level of challenge to the game... | Read more »
How to rake in the cash in Bit City
Our last Bit City guide covered the basics. Now it's time to get into some of the more advanced techniques. In the later cities, cash flow becomes much more difficult, so you'll want to develop some strategies if you want to complete each level.... | Read more »
PixelTerra (Games)
PixelTerra 1.1.1 Device: iOS Universal Category: Games Price: $.99, Version: 1.1.1 (iTunes) Description: The world of PixelTerra is quite dangerous so you need to build a shelter, find some food supply and get ready to protect... | Read more »
Tokaido™ (Games)
Tokaido™ 1.0 Device: iOS Universal Category: Games Price: $6.99, Version: 1.0 (iTunes) Description: Discover the digital adaptation of Tokaido, the boardgame phenomenon that has already sold more than 250,000 copies worldwide, and... | Read more »
Card Thief (Games)
Card Thief 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Card Thief is a solitaire style stealth game played with a deck of cards. In Card Thief you move through a deck of cards as a... | Read more »
Smilegate’s crafting battler Super Tank...
Super Tank Rumbleputs you in the seat of your very own, handcrafted tank. You can choose from over 100 different parts to create your Super Tank before taking it out to wreak havoc on your opponents in glorious PVP combat. Now, Smilegate is upping... | Read more »
The best games to play while you wait fo...
Mass Effect: Andromeda arrives this coming Tuesday and people are getting understandably antsy. There's a whole weekend standing between us and a brand new Bioware adventure. What's a geek to do? Well, you could certainly give these fine mobile... | Read more »

Price Scanner via MacPrices.net

13-inch Touch Bar MacBook Pros on sale for up...
B&H Photo has the Apple 13″ Touch Bar MacBook Pros in stock today and on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.9GHz/512GB Touch Bar... Read more
Today only! 15-inch 2.7GHz Space Gray Touch B...
B&H Photo has the new 2016 15″ 2.7GHz Space Gray Apple Touch Bar MacBook Pro in stock today and on sale for $300 off MSRP for today only. Shipping is free, and B&H charges NY sales tax only... Read more
New $329 iPad A Fabulous Value; 10.5-Inch iPa...
Part of the iPad upgrade/new model puzzle is now in place. Yesterday, as KGI Securities financial services group analyst Ming-Chi Kuo last summer predicted they would, Apple released a new low-cost 9... Read more
New 9.7-Inch iPad Features All Of The Fun...
Apple today updated its most popular-sized iPad, featuring a brighter 9.7-inch Retina display and best-in-class performance at its most affordable price ever, starting at $329 (US) with 32GB of... Read more
Apple Introduces iPhone 7 and iPhone 7 Plus (...
Apple today announced iPhone 7 and iPhone 7 Plus (PRODUCT)RED Special Edition in a vibrant red matte aluminum finish, in recognition of more than 10 years of partnership between Apple and (RED). This... Read more
Apple now offering Certified Refurbished 15-i...
Apple is now offering Certified Refurbished 2016 15″ Touch Bar MacBook Pros for $360-$420 off original MSRP. An Apple one-year warranty is included with each model, and shipping is free: - 15″ 2.6GHz... Read more
Apple Introduces Clips: A Free Innovative Way...
Apple today introduced Clips, a new app that makes it quick and fun for anyone to create expressive videos on iPhone and iPad. The app features a unique design for combining video clips, photos and... Read more
Urban Armor Gear Unveils Case For 4th Generat...
Orange County, California based Urban Armor Gear (UAG), designers of rugged, lightweight protective cases for phones, tablets and laptops, has released its latest drop-tested cases for Apple’s 4th... Read more
Most Users Continue To Prefer 5.0 to 5.3 Inch...
In the first half of 2016, US and UK smartphone users were most likely to be interested in purchasing a device with a 5.3″ or 5.0″ display. Findings in a new report from the User Experience... Read more
12-inch 1.2GHz Retina MacBooks on sale for up...
B&H has 12″ 1.2GHz Retina MacBooks on sale for up to $200 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 12″ 1.2GHz Space Gray Retina MacBook: $1439.99 $160 off MSRP - 12″ 1... Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Fulltime aan de slag als shopmanager in een h...
Ben jij helemaal gek van Apple -producten en vind je het helemaal super om fulltime shopmanager te zijn in een jonge en hippe elektronicazaak? Wil jij werken in Read more
Starte Dein Karriere-Abenteuer in den Hauptst...
…mehrsprachigen Teams betreust Du Kunden von bekannten globale Marken wie Apple , Mercedes, Facebook, Expedia, und vielen anderen! Funktion Du wolltest schon Read more
Starte Dein Karriere-Abenteuer in den Hauptst...
…mehrsprachigen Teams betreust Du Kunden von bekannten globale Marken wie Apple , Mercedes, Facebook, Expedia, und vielen anderen! Funktion Du wolltest schon Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform 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.