TweetFollow Us on Twitter

Dec 91 Mousehole
Volume Number:7
Issue Number:2
Column Tag:Mousehole

STR# Hurdles

By Larry Nedry, Mousehole BBS SysOp

From: Jslee

Re: STR# Resource

From the frying pan, now into the fire. As you all know the Mac has a toolbox call called GetIndString. This is really cool, but I need to do the same function in reverse, that is, how can I add additional STR# resources to a list of resources? I have yet to find a code fragment demonstrating this technique. What I want to do is add a series of strings to the STR# resource via C (Think to be precise). Looking at IM I-476 I see that STR# resource consists of 2 bytes containing the number of strings then m bytes as the strings. Can I take this to mean:

typdef struct {
  short num_of_strings;
  str63 the_strings[max_strings];
} str_def;

Is this right? If not, how would I do it? I need to have a handle to each string item so that I can write it back to the resource. Any ideas would be great.

From: Mrteague

Re: STR# Resource

You have it partly wrong - because the “strings” are Pascal strings (and it wouldn’t matter of they were C strings), they are NOT of fixed size, which means you can’t use a struct as you have defined. There would be a number of different ways of doing what you need to do, but generally it involves parsing the resource structure yourself - i.e.

{1}

tempHandle = GetResource(‘STR#’,someID);
HLock(tempHandle); tempPtr = *tempHandle;
numStrings = *(short *)tempPtr;
tempPtr += sizeof(short);
for (i = 1; i <= numStrings; i++)
 {
 char tempchar[256];
 short theLength = *tempPtr++;

 strncpy(tempchar, tempPtr, theLength);
 dosomethingwithstring(tempchar);
 tempPtr += theLength;
 }

Then you have to output the new resource - either you have to create a new resource from scratch and add each string to it at a time (sort of the reverse of above), or you can attempt to modify the existing resource in place (remember to detach resource first) - this gets tricky when you insert strings, delete strings, or modify the length of existing strings.

I wrote a HyperCard XMCD that did something similar to this a long time ago, so if you are still stuck after trying my suggestions, I will see what I can do to help.

From: Jslee

Re: Writing to an STR# resource

Hurdle # 1: Parse out the strings from an STR# resource.

Hurdle # 2: Find out how the STR# is organized so you can write back to the resource file.

Hurdle # 3: How can I write out the data in my string to the STR# resource.

I figured out hurdle #1 and #2. #3 is a bit more perplexing. What I did was to create a string that looks like this: “/0/3/5Test1/5Test2/0”. The reason why the string is formatted this way is because this is the way the STR#128 resource (my own resource file in the THINK C project) looks. Now when I create a handle to this string, and try to write out the resource using AddResource nothing is written. When I perform a SizeResource to my handle it returns a -1 which means that the handle to the resource does not exist. I would like to create a handle to my string, then write it out to the STR# resource with a new id. Here is a code fragment:

/* 2 */

do_write()
{
OSErr oserr;
Handle dstHdl;
Ptr destPtr;
int newID;
int checkdigit;
int my_resfile;
OpenResFile(“\pNewRes”);
my_resfile = OpenResFile(“\pNewRes”);
UseResFile(my_resfile);
/*
newStr looks like this:
 “/0/3/5Test1/5Test2/0”
*/
dstHdl = NewHandle(sizeof((char *)&newStr));
oserr = PtrToHand((char *)&newStr,dstHdl,(long)sizeof(newStr));
if (oserr)
{
/*check os error here */
}
HLock(dstHdl);
newID = UniqueID(‘STR#’);
AddResource(dstHdl,’STR#’,newID,”\p”);
WriteResource(dstHdl);
checkdigit = HomeResFile(dstHdl);
/* always shows up as a -1
   meaning that this is not a handle to the resource
   why?,why?,why?
*/
HUnlock(dstHdl);
CloseResFile(my_resfile);
}

From: Mikel

Re: OOP Ignorance

When you say “get at” the Button, are you referring to getting control when the button’s smacked? If so (mind you, I’ve not used THINK C objects, just MacApp), odds are you should declare a class descendent from the type of AcceptButton (TButton, perhaps?) and override the appropriate method. Hope this makes sense.

From: Smug1

Re: OOP Ignorance

Thanks for the help, and I will try in that region. What I want to do is, When someone clicks on that button, to be able to send the message to my routine to do “Whatever”. Sort of like an “On MouseDown” script in HyperCard. I HAVE tried to make a Subclass; maybe I am doing it wrong. Using the same code as before, When I declare a new class (MyButton) and then try to access it, it tells me that “Acceptbutton is not declared. Do I redo the “new(AcceptButton)” routine ?

From: Mikel

Re: OOP Ignorance

I took a peek at some THINK C OOP code and saw that your CButton, when pressed, can send a message to its supervisor (I assume that’s the container view). Call the button’s SetClickCmd method with the appropriate command number (of your choosing). When the user presses the button, the supervisor’s DoCommand method is called with the button’s clickCmd.

In other words, don’t bother creating a new button class. The support is already there.

From: Smug1

Re: OOP Ignorance

Thanks for more of the help. I will give that a try. I figured it was that or “DoGoodClick” but I was not real sure where to assign it. (I am programming in Think Pascal w/TCL, by the way) I will keep marching on, and let you know how it goes.

From: Smug1

Re: OOP Ignorance (Still)

Sorry to keep bothering everyone. If I could get a hint...

Using Think Pascal 3.0 w/TCL & AppMaker, trying to get control of my controls (Mainly, my OK & Cancel buttons). They are made in my window initialization (AppMaker Generated). I try to get a hold of them by using:

Type

MyButton = Object(Cbutton)

Procedure DoGoodClick(WhichPart:integer);

Override;

end;

It shows up in the “Class Browser”, and compiles fine, but in my code area I put:

procedure MyButton.DoGoodClick(WhichPart:Integer);

begin

{Nothing here but a “stop sign” to wait for the step through}

end;

I was just check to see if it would use it, but when I put a “Stop” there, it never goes near it. It stops at CButton’s “DoGood Click” but not mine. Is it my breath ? Any help would be appreciated.

From: Mikel

Re: OOP Ignorance (Still)

Sounds like your object isn’t the one getting into your view. Are you sure your initialization code instantiates a MyButton and not a CButton?

From: Smug1

Re: OOP Ignorance (Still)

Thanks for all the assistance and help. I finally called Bowers Development to ask them if there was a “Suggested” method of overriding their buttons that they have generated.

(Some Background) If you have never used AppMaker (which is a neat program, I think and now supports MacApp) It generates 2 “Modules” for each area--a regular module, and one with a “Z” prefix. The “Z” module should remain unchanged, because it will be regenerated should you change something later with the AppMaker program. But the regular module will be untouched, so you can override & code away, safe in knowing that you won’t wipe out your work if you make a change in the interface.

So I called Bowers, and they said that although it is not recommended to change the “Z” module, you HAVE to change it to assign a “SetClickCmd” to the button, or else recode EVERYTHING. They said they will automatically do this for future versions, but as of yet, this is the way to do it. I feel a little sheepish, but it’s better than still not knowing. Such a simple solution, but the manual said...

From: Smug1

Re: OOP Ignorance (Still)

A better way for me to get control of my button (or anything else for that matter) is NOT to modify the “Z” module of AppMaker, but to override the “IMainWindow” method of the “Z” module in the regular module, “inherit” the “IMainWindow” methods & instance variables, and add the “SetClickCmd there instead. That way, the “Z” module” remains pristine (i.e. no extra coding should I regenerate it). This is getting interesting (dare I say it, almost “Fun”!).

From: Mikel

Re: OOP Ignorance (Still)

Bizarre. Anyway, I’m currently using ViewEdit with MacApp, which is pretty cool, but I’d certainly like to hear more about AppMaker. Do you have their phone number?

From: Smug1

Re: OOP Ignorance (Still)

Yes, I do. As a side note, I ordered this from Japan, as a trade up from Prototyper, and I got it in about 3 days after the transfer of funds reached them. Anyway, the number is: (508) 369-8175 (EST 9-5) or (508) 369-8224 FAX number. Compuserve 70731,3710. Applelink D1721. As I learn more about OOP, and find that AppMaker helps a lot in “Getting idea”, but it must be ok for others too.

From: Midiman

Re: Writing a Macintosh Application

Is there anyone out there who can offer me some guidance in converting a Turbo Pascal program to a Macintosh application? I’ve spent an hour scanning the shelves at Computer Literacy trying to find a book on writing applications but the only thing I could find is MPW and I don’t have the capital to purchase it at this time. I have a Turbo Pascal book by Borland and it has a few applications that come with the software but the documentation is pretty cryptic. One of the examples enables me to write a text file to the screen but I can’t seem to figure out how to write it to an array. I’ve managed to define my menus and my windows but I’m really not too clear on what I’m doing (other than copying the examples in Turbo Pascal).

I also have the first two volumes of Macintosh Revealed but I have had no success using the examples in those books with Turbo Pascal. Any ideas on why that might be? I am not an experienced programmer, I’m pretty much self taught, but I’m not too proud to ask for help from anyone who can point me in the right direction. Any information that you might have in this regard would be greatly appreciated.

From: Walrus

Re: Writing a Macintosh Application

One book I can recommend for Macintosh programming is Macintosh Programming Primer for Think Pascal. This is using a different programming environment than you are. Outside of that, you might be able to find a Mac Turbo Pascal book somewhere, but I’m not sure what kind of selection you have for that. As for your comment that you really don’t feel like you know what you’re doing -- I think that happens with experienced programmers going to the Mac for the first time. If you have little experience outside of the Mac, then your learning curve will be even steeper. But you just have to keep at it and after awhile you’ll get the hang of it. You are best advised to stick with small projects for now (like create a mini application that has a menu that creates different kinds of windows). That way you can get some confidence in using the Toolbox and all that. As your experience increases, then you can go ahead and do some scarier things.

From: Smug1

Re: Writing a Macintosh Application

If you already have Turbo Pascal Mac, then I suggest "Turbo Pascal Tutor" from Borland. It goes through everything, and is pretty easy to follow. If you have not purchased a language, THINK Pascal is a winner. If you buy THINK, then get Mark & Reed's Macintosh Pascal Programming Primer. It's good, and dedicated to THINK. If you want Interface code generators, Prototyper supports Turbo, Think, MPW & TML. It only does procedural code. AppMaker does OOP & Procedures, but not Turbo (Think, MPW, MacApp), however in the long run, it can "Grow" with you. For "Real" reference, you'll need IM 1-6, a wheelbarrow, and a loan. Check your latest "MacTutor" for Ads on these products. Good Luck ! Don't worry about being a beginner. I am too, and you should see (maybe you shouldn't) some of the questions I ask...

From: Midiman

Re: Writing a Macintosh Application

Thanks for the feedback. I don’t think it would be a quantum leap to switch from Turbo Pascal to Think Pascal, but what about doing it in C? I only ask because I’m using my girlfriend’s Mac and she already has Think C. The reason I originally wrote the program in Turbo Pascal is that I thought it would be logical to do it in Pascal (since that’s what the operating system is written in) but the only Pascal she has is the old Borland Turbo Pascal. As far as sticking with simple applications is concerned, I’ve already gotten that far. I have figured out how to define my own menus, windows and sizes. What I can’t seem to do is the simple stuff like a ReadLn. It worked in the original program (which now displaces 20K, and 12 pages of hardcopy), but now it chokes on the ReadLn command even though I think I’ve declared all the necessary resources. Anyway, it’s beginning to look more and more like I’m going to go the Think way (whether it’s C or Pascal remains to be seen). Thanks again for the feedback, if you think of anything else that I might be doing wrong drop me a line.

From: Midiman

Re: Writing a Macintosh Application

Thanks for the response about writing the Mac application. I’m probably going to have to get the loan first before I get the wheelbarrow and Inside Macintosh. I’m not familiar with MacTutor however, is that a magazine? Would I find it at Computer Literacy? Your continued feedback will be greatly appreciated.

From: Smug1

Re: Writing a Macintosh Application

MacTutor is the Mac Programmers Magazine. I’m not sure what Computer Literacy is (Take that how you will...). I live in Japan, so I get it at the T-Zone at outrageous prices (Subscribe? maybe). That’s how I found the Mouse Hole (this BBS) Have fun, don’t hesitate to ask.

From: Pkram

Re: Multifinder & MacTutor

Does anyone remember which issue of MacTutor discussed programming with WaitNextEvent? I only have IM vol’w 1-5, but I think MacTutor had an article about how to use it. (Try volume IV, numbers 2 & 3 for some good MultiFinder articles.-ed)

From: Grinch

Re: Multifinder & MacTutor

It’s in the Programmer’s Guide to Multifinder as well as IM6. Actually, IM6 is more authoritative and it covers system 6 with Multifinder as well as system 7.

From: Jslee

Re: Segment Loader Limits with TCL

Yeah, I am running out of JT during the build (i.e. “data segment too big”). I got rid of a lot of static vars that I did not need. But the strange thing is that this happens ONLY when I venture outside the use of the TCL Libs and functions. What I have done is made two modal dialog routines which have 3 editable text fields. Man, each section of code takes up about 6k of data space. Yeah, I am doing a lot of string manipulation stuff, but I figured that it would give me SOME overhead, but NOT as much as it does. Right now the whole thing is reasonable. I have about 14-15k of data segment space left, so I am being REAL careful.

From: Dave

Re: Segment Loader Limits with TCL

Your overruns MAY be due to too much global data use (strings/global static arrays, etc.) Separate STRs can fix that. So can THINK C 5.0 which is now shipping.

From: Scottab

Re: Think Reference 1.0

Yes, but will the THINK Reference be easier to lug around than Inside Macintosh 1-6 and the X-Ref and far more comprehensive than the Programmer’s Online Companion? If so, I’ll buy it.

From: Walrus

Re: Think Reference 1.0

Think Reference not only gives you the calls for the routines (usually in C rather than Pascal) but tells you what it’s for, what the parameters are and many times gives some snippets of code. It’s much more comprehensive than Online Companion (the Think Ref database is 2.2 Megs) and is easier to lug around and refer to than IM. I haven’t taken Inside Mac DA off my system yet but I certainly don’t use it as much. TR seems to be easier to use.

From: Scottab

Re: Patching Launch trap

It would probably be too much work to patch OpenResFile, as any application can open any other application (read ResEdit). How would you tell that the application was actually launching, and not just opening?

This is a good question. The INIT I wrote a while back that keeps track of the applications launched patches _InitGraf. I will have to dig it up and see if it works under MultiFinder. It seemed at the time to be the perfect trap to patch, as every application should call it, whether or not it has menus, windows, or dialogs.

From: Scottab

Re: HELP! Menu Bar Height

I have heard about this routine, but I couldn’t find any other mention of it, even in the THINK C Mac #interfaces. Have you been able to call it ? If so, how?

What I do now is declare:

      extern int MBarHt : 0x0BAA;

Then just use MBarHt like any other integer. If you desire, and as soon as I get home, I will upload a code fragment that works on every Mac I’ve tried it on.

From: Btoback

Re: HELP! Menu Bar Height

GetMBarHeight is documented in IM5, page 315.

From: Frankh

Re: Serius?

I recently downloaded a demo of Serius, and it looks like an interesting way of generating an application, and it can read externally compiled code (in just about any language, it seems). The demo is pretty simple, but interesting. Does anyone here use the Developer version? How hard is it to generate useful external code for it? What are the drawbacks? Are there any major speed hits?

From: Walrus

Re: Minix on the Mac

Does anyone out there have any experience with Minix on the Macintosh (it’s kind of like a Unix shell)? Does it support programming access to Unix system calls from C? What about awk and sed? The package I saw was for $169 (with source code!) , and I am curious to know how much it simulates a ‘real’ Unix environment.

Yes, I know Apple has A/UX but I have neither an ‘030 machine nor $800 to spring for ‘Unix for the rest of us’.

From: Femur

Re: sound software

I’m looking for a shareware file for the Mac that can let me attach sounds to finder activities. I know I’ve seen this program on some BBS, but I can’t remember what it’s called, or from where I can download it.

Does anyone know what I’m talking about? Thanks.

From: Sysop

Re: sound software

The name of the cdev is SoundMaster. I have just uploaded the latest version (1.7.1) to the System File LIB.

From: Chuckerp

Re: Hacking Laserprep / QuarkPrep

Is anyone else decoding Apple’s Laserprep postscript code? How about QuarkXpress’s preamble? I’ll show you mine if...

From: Smug1

Re: Kanji Fonts

Does anyone have/know of a decent public domain Kanji Laser Font that works with a QMS PS/410 ? I have the fonts that came with my Japanese System, but I can not get the “Font Downloader” utility to see them, and everything comes out Bitmapped. Any info would be appreciated.

From: Mrteague

Re: Sytem 7 and HP DeskWriter

Re your problem with the HP DeskWriter : it would help to tell us what model Mac you are using this printer with. I believe the IIfx has problems with this printer - due to the HP DeskWriter printer driver doing some low level things it shouldn’t have been. As I understand it, problems with the Mac and HP DeskWriter are a fault of HP, not Apple. I also believe HP have fixed this problem some time ago, and there is a new version of the driver available - suggest you contact HP.

From: Scottab

Re: System 7 and HP DeskWriter

Contacting HP is a long and arduous task: they’re too big. I’ve found that dealing with them rarely results in them mailing you the drivers that week. They tried to convince me that the old ones were adequate for my uses. In all, I was disappointed. Try contacting the store you bought it from: they should have a copy and copy it onto your disk for free.

From: Sonnyb

Re: System 7 and HP DeskWriter

I have had a similar problem with DeskWriter. I called HP and apparently there is a problem using the DeskWriter through the serial port while using virtual memory. That is when you get the message “DataComm buffer overrun - no DTR handshake.” HP is working on the problem and will be offering an upgrade soon. This problem does not occur if you use the DeskWriter over an AppleTalk network. If you turn off virtual memory, all is well.

From: Dirks

Re: System 7 and HP DeskWriter

Thanx. Turning off V-memory really solved the problem. Now all I need is a RAM upgrade...

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

The beginner's guide to Warbits
Warbits is a turn-based strategy that's clearly inspired by Nintendo's Advance Wars series. Since turn-based strategy games can be kind of tricky to dive into, see below for a few tips to help you in the beginning. Positioning is crucial [Read... | Read more »
How to upgrade your character in Spellsp...
So you’ve mastered the basics of Spellspire. By which I mean you’ve realised it’s all about spelling things in a spire. What next? Well you’re going to need to figure out how to toughen up your character. It’s all well and good being able to spell... | Read more »
5 slither.io mash-ups we'd love to...
If there's one thing that slither.io has proved, it's that the addictive gameplay of Agar.io can be transplanted onto basically anything and it will still be good fun. It wouldn't be surprising if we saw other developers jumping on the bandwagon,... | Read more »
How to navigate the terrain in Sky Charm...
Sky Charms is a whimsical match-'em up adventure that uses creative level design to really ramp up the difficulty. [Read more] | Read more »
Victorious Knight (Games)
Victorious Knight 1.3 Device: iOS Universal Category: Games Price: $1.99, Version: 1.3 (iTunes) Description: New challenges awaits you! Experience fresh RPG experience with a unique combat mechanic, packed with high quality 3D... | Read more »
Agent Gumball - Roguelike Spy Game (Gam...
Agent Gumball - Roguelike Spy Game 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Someone’s been spying on Gumball. What the what?! Two can play at that game! GO UNDERCOVERSneak past enemy... | Read more »
Runaway Toad (Games)
Runaway Toad 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: It ain’t easy bein’ green! Tap, hold, and swipe to help Toad hop to safety in this gorgeous new action game from the creators of... | Read more »
PsyCard (Games)
PsyCard 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: From the makers och Card City Nights, Progress To 100 and Ittle Dew PSYCARD is a minesweeper-like game set in a cozy cyberpunk... | Read more »
Sago Mini Robot Party (Education)
Sago Mini Robot Party 1.0 Device: iOS Universal Category: Education Price: $2.99, Version: 1.0 (iTunes) Description: -- Children's Technology Review Editor's Choice -- | Read more »
Egz – The Origin of the Universe (Games...
Egz – The Origin of the Universe 1.0.2 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.2 (iTunes) Description: ►►► Special offer until 2nd may : get the game at 2.99€ instead of 3.99€ ! ◄◄◄ Egz is a mesmerizing mix... | Read more »

Price Scanner via MacPrices.net

Apple restocks Certified Refurbished Mac mini...
Apple has restocked Certified Refurbished 2014 Mac minis, with models available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $... Read more
15-inch 2.2GHz Retina MacBook Pro on sale for...
Amazon.com has the 15″ 2.2GHz Retina MacBook Pro on sale for $1699.99 including free shipping. Their price is $300 off MSRP, and it’s the lowest price available for this model from any reseller (and... Read more
Apple Beats Microsoft at Own Game; Amazon Pri...
First quarter seasonality combined with an overall disinterested customer base led to an annual decline of 14.7% in worldwide tablet shipments during the first quarter of 2016 (1Q16). Worldwide... Read more
Tablets Had Worst Quarter Since 2012, says St...
The global tablet market began 2016 just as 2015 left off, down. Tablet shipments fell 10% to 46.5 million units during the Q1 2016, according to the new “Preliminary Global Tablet Shipments and... Read more
Clearance 13-inch MacBook Airs, Apple refurbi...
Apple recently dropped prices on certified refurbished 2015 13″ MacBook Airs with 4GB of RAM with models now available starting at $759. An Apple one-year warranty is included with each MacBook, and... Read more
Clearance 12-inch Retina MacBooks, Apple refu...
Apple has dropped prices on Certified Refurbished 2015 12″ Retina MacBooks with models now available starting at $929. Apple will include a standard one-year warranty with each MacBook, and shipping... Read more
Aleratec Releases Mac Software Upgrade for 1...
California based Aleratec Inc., designer, developer and manufacturer of Portable Device Management (PDM) charge/sync products for mobile devices and professional-grade duplicators for hard disk... Read more
Sale! Amazon offers 27-inch iMac, 13-inch 2.9...
Amazon has the 27″ 3.2GHz 5K iMac and the 13″ 3.9GHz Retina MacBook Pro on sale for $300 off MSRP, each including free shipping, for a limited time: - 27″ 3.2GHz/1TB HD 5K iMac (model MK462LL/A): $... Read more
Apple refurbished 13-inch Retina MacBook Pros...
Apple has Certified Refurbished 13″ Retina MacBook Pros available for up to $270 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 13″ 2.7GHz... Read more
13-inch 2.7GHz/128GB Retina MacBook Pro on sa...
Take $200 off MSRP on the price of a new 13″ 2.7GHz/128GB Retina MacBook Pro (model MF839LL/A) at Amazon. Shipping is free: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1099.99 $200 off MSRP Act now if... Read more

Jobs Board

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
Automotive Sales Consultant - Apple Ford Linc...
…you. The best candidates are smart, technologically savvy and are customer focused. Apple Ford Lincoln Apple Valley is different, because: $30,000 annual salary 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
*Apple* Solutions Consultant - Apple (United...
# Apple Solutions Consultant Job Number: 48260200 Phoenix, Arizona, United States Posted: Apr. 22, 2016 Weekly Hours: 40.00 **Job Summary** As an Apple Solutions 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
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.