TweetFollow Us on Twitter

Oct 93 Tips, Tidbits
Volume Number:9
Issue Number:10
Column Tag:Tips & Tidbits

Tips & Tidbits

By Neil Ticktin, Editor-in-Chief

This column is your opportunity to spread the word about little bits of information that you find out about. These tidbits can be programming related or they can be user tips that are particularly useful to programmers.

MacTech Magazine will pay $25 for every tip used, and $50 for the Tip of the Month. Or you can take your award in orders or subscriptions.

To submit a tip, send in a letter to the magazine. E-mail is our preferred method, but feel free to send something via the US Mail. See page two for all addresses. If you do send snail mail, enclose a printed copy and a disk copy of the letter so that it does not have to be retyped.

Tip of the Month

Sometimes there are times that you will want to hide the menu bar. You shouldn’t plan on doing this often, but in the proper situation (i.e., a presentation package displaying a slide on the screen), here’s an example of how it might be done.

/* 1 */

int        saveMBarHeight;
RgnHandle  saveGrayRgn;

HideMenuBar (void)
{
    RgnHandle  mBarRgn;
    RgnHandle  theGrayRgn;
   
    theGrayRgn = GetGrayRgn ();
    saveMBarHeight = MBarHeight;
    saveGrayRgn = NewRgn ();
    CopyRgn (theGrayRgn, saveGrayRgn);
    mBarRgn = NewRgn ();
    SetRectRgn (mBarRgn, screenBits.bounds.left, screenBits.bounds.top,
       screenBits.bounds.right, screenBits.bounds.top + saveMBarHeight);
    MBarHeight = 0;
    UnionRgn (theGrayRgn, mBarRgn, theGrayRgn);
    PaintBehind (FrontWindow (), mBarRgn);
    CalcVisBehind (FrontWindow (), mBarRgn);
    DisposeRgn (mBarRgn);
}

ShowMenuBar (void)
{
    MBarHeight = saveMBarHeight;
    CopyRgn (saveGrayRgn, GetGrayRgn ());
    DisposeRgn (saveGrayRgn);
    DrawMenuBar ();
}

- Steve Wagy, Spring, Texas

Compile options in THINK Pascal - saving Time

If you are using Think Pascal you may set your compiler variables using the Compile Options in the Project menu. Compile Options serve as directives for the compiler. For example, if qCompileOption = FALSE the expressions within the $IFC - $ENDC statement don't get compiled into your code.

{2}

{$IFC  qCompileOption}
 expression1; expression2; .........
{$ENDC}

Suppose you have several units in your project and only one of the units uses qCompileOption. At the time, qCompileOption = TRUE in the Compile Options. You are about to run your code and want to set qCompileOption = FALSE. Do you find yourself going to the Compile Options in the Project menu and setting qCompileOption = FALSE? If you do, you know the unpleasant side effect - every unit in the project, whether it uses qCompileOption or not, gets recompiled. What a time waster! There is an easier way to reset qCompileOption for a particular unit. In the unit where you want qCompileOption reset, write this statement at the top of the unit following the IMPLEMENTATION keyword:

{$SETC  qCompileOption = FALSE}

This resets qCompileOption for this unit only and only this unit gets recompiled.

- Marek Hajek, Reno, Nevada

Assembler Editing through Hex Editor

I picked up a copy of MacTech at the Developer's Conference. I meant to respond to an article entitled "The Secrets of the Machine" earlier, but didn't until now. The article mentioned ResEdit's CODE resource extension. In paragraph three of pg 53 it stated that the extension doesn't allow editing of Assembler. This is not strictly true. I use the extension in conjunction with the Hex Editor (under the Resource menu) all the time.

The strategy is to have both the extension and the hex editor open and in sync with one another (an option under the Hex Editor menu). Then select what you would like to edit in the far right hand side of the CODE extension window. With the selection enforced, bring the hex editor to the forefront, make your modification, then return to the CODE extension window for an up-to-date disassembly of the hex you've just entered. I've found this approach to be very viable indeed. The instantaneous feedback has allowed me to make small patches on-the-fly quickly and effectively.

At work I spend a great amount of time translating software via Echo Logic's FlashPort. The code extension simplifies this process by allowing patches as mentioned above, and by making it easier to distinguish between CODE and data, a common necessity in FlashPort. Sometimes disassemblies become out of sync around embedded data. Using the hex editor and CODE extension, one can make a fake CODE resource {just needs a segment loader header and to end with an RTS}, paste the questionable data into the new CODE resource's hex window, and suffix the listing with 4E75 {RTS}. Then, by removing a word at a time from the beginning of the listing in the hex window and switching to the corresponding CODE extension window to see the effect, one can gain valuable insight by noting when the remaining instructions make sense. This approach is great for finding embedded jump table information.

I hope you find this information useful. In summary, use the hex editor for all editing, and the CODE extension for all viewing.

- Marisano James, Sent via AppleLink

Double Click in THINK Pascal

In the Think Pascal environment, hold down the option key and double click on a function name anywhere in your project and Think Pascal will take you to the function definition.

- Lillian Thompson, Reno, Nevada

Mousepositioning

The user should be the only one to wield the mouse. The position of the mouse should not change by program control. In some cases however, it is might be necessary to do so. A user-interface macro program, for example, or for a practical joke

The code snippet below does the trick. It is a macro that sets the position of the mouse to a given point (the argument to SETMOUSE, is of type Point).

/* 3 */

extern Point MTemp :   0x0828 ;    /* some Low Memory Globals  */ extern 
Point RawMouse : 0x082C ;
extern Byte  CrsrNew : 0x08CE ;

#define SETMOUSE(_pt)  {   \
   MTemp = _pt ;   \
   RawMouse = _pt ;\
   CrsrNew = 0xFF ;}

- Jan Bruyndonckx, Wave Research, Belgium

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Latest Forum Discussions

See All


Price Scanner via MacPrices.net

Take $150 off every Apple 11-inch M3 iPad Air
Amazon is offering a $150 discount on 11-inch M3 WiFi iPad Airs right now. Shipping is free: – 11″ 128GB M3 WiFi iPad Air: $449, $150 off – 11″ 256GB M3 WiFi iPad Air: $549, $150 off – 11″ 512GB M3... Read more
Apple iPad minis back on sale for $100 off MS...
Amazon is offering $100 discounts (up to 20% off) on Apple’s newest 2024 WiFi iPad minis, each with free shipping. These are the lowest prices available for new minis among the Apple retailers we... Read more
Apple’s 16-inch M4 Max MacBook Pros are on sa...
Amazon has 16-inch M4 Max MacBook Pros (Silver and Black colors) on sale for up to $410 off Apple’s MSRP right now. Shipping is free. Be sure to select Amazon as the seller, rather than a third-party... Read more
Red Pocket Mobile is offering a $150 rebate o...
Red Pocket Mobile has new Apple iPhone 17’s on sale for $150 off MSRP when you switch and open up a new line of service. Red Pocket Mobile is a nationwide MVNO using all the major wireless carrier... Read more
Switch to Verizon, and get any iPhone 16 for...
With yesterday’s introduction of the new iPhone 17 models, Verizon responded by running “on us” promos across much of the iPhone 16 lineup: iPhone 16 and 16 Plus show as $0/mo for 36 months with bill... Read more
Here is a summary of the new features in Appl...
Apple’s September 2025 event introduced major updates across its most popular product lines, focusing on health, performance, and design breakthroughs. The AirPods Pro 3 now feature best-in-class... Read more
Apple’s Smartphone Lineup Could Use A Touch o...
COMMENTARY – Whatever happened to the old adage, “less is more”? Apple’s smartphone lineup. — which is due for its annual refresh either this month or next (possibly at an Apple Event on September 9... Read more
Take $50 off every 11th-generation A16 WiFi i...
Amazon has Apple’s 11th-generation A16 WiFi iPads in stock on sale for $50 off MSRP right now. Shipping is free: – 11″ 11th-generation 128GB WiFi iPads: $299 $50 off MSRP – 11″ 11th-generation 256GB... Read more
Sunday Sale: 14-inch M4 MacBook Pros for up t...
Don’t pay full price! Amazon has Apple’s 14-inch M4 MacBook Pros (Silver and Black colors) on sale for up to $220 off MSRP right now. Shipping is free. Be sure to select Amazon as the seller, rather... Read more
Mac mini with M4 Pro CPU back on sale for $12...
B&H Photo has Apple’s Mac mini with the M4 Pro CPU back on sale for $1259, $140 off MSRP. B&H offers free 1-2 day shipping to most US addresses: – Mac mini M4 Pro CPU (24GB/512GB): $1259, $... Read more

Jobs Board

All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.