TweetFollow Us on Twitter

June 94 - Newton Q & A: Ask the Llama

Newton Q & A: Ask the Llama

Newton Developer Techical Support

Q Here's something that's been puzzling me a bit: I want to pop up something like a copyright message for ten seconds when my application starts up. So I drew up a layout called Presents with a protoFloater containing all the necessary text. In my main layout is a link to Presents called presentsLink. The following is the viewShowScript for the topmost view in my application:

func()
begin
	presentsLink:open();
	AddDelayedAction(presentsLink:close(), nil, 10000)
end

This says to me: open the linked view, wait ten seconds, and close it. And that's exactly what it does, except that after the view is closed, there's an exception. What am I doing wrong and how do I fix it? 

The short answer is that the second argument to the AddDelayedAction function is of the wrong type. This argument is supposed to be an array of parameters to be passed to the delayed function, and nil is not an array. The proper syntax for no arguments is [] instead of nil.

But there's more: Although the closure you supplied in the first argument works in this case, you should get out of the habit of using that type of function call for delayed or deferred actions. You're better off providing a full closure and sending in the view you want closed, as in this:

func()
begin
	// Define a closure to use in the delayed action.
	local myClose := func(whichView)
		whichView:Close();

	presentsLink:Open();
	AddDelayedAction(myClose, [presentsLink], 10000);
end

Unfortunately, things do not end there. You also need to make sure that the myClose function is in internal RAM. The best way to do this is to use DefConst to define the function:

// In your ProjectData file:
DefConst('kDelayedClose, func(whichView) whichView:Close());

// This changes the function above:
func()
begin
	presentsLink:Open();
	AddDelayedAction(EnsureInternal(kDelayedClose),
		[presentsLink], 10000);
end

However, there is an easier solution. Instead of doing a delayed action you can use the view idle mechanism to do what you want. All you need to do is add a viewIdleScript and viewIdleFrequency to the presentsLink top-level view. The viewIdleScript simply sends a Close message. The viewIdleFrequency is set to the desired delay (10000 in this case).

The really short answer is that you can just use protoGlance. This proto has the show-and- disappear behavior built in. You can set the viewIdleFrequency to 10000 to get the behavior you want.

Q I have an alphabetically sorted list of items in a protoTable and I want to use protoa2z to quickly move through the table (like the cardfile overview). How do I do it? 

The first thing you need to do is find the index in the protoTable of the correct item (that is, find the right item in the def.tabValues array of the protoTable). How you do this will depend on what type of data you're representing. Then you can figure out how high each item in the protoTable is, set the VOrg slot of the table to the correct line, and force the protoTable to redraw. You probably want to make sure that you don't scroll off the bottom of the table. Below is a method you can add to your protoTable that will do what you want. You can then send the message from your a2zChanged method (make sure you send the message to the protoTable).

func(index)
begin
	// Figure out the height of an item in the table.
	local childHeight := if def.tabProtos.viewFont exists then
		fontHeight(def.tabProtos.viewFont)
	else
		fontHeight(viewFont);
	
	// Make sure that the table will not scroll off the end
	// by calculating the index of the bottommost item that
	// will be displayed.
	local largestIndex := def.tabDown - ((:LocalBox().bottom -
		:LocalBox().top) DIV childHeight) - 1;
	
	// Use the bottommost item (largestIndex) to make sure
	// the table has no empty space on the bottom.
	vOrg := MIN(index, largestIndex);
	
	// Now force the table to redraw.
	:RedoChildren();
end

Q I would like to use the protoa2z sample code in my application, but I can't figure out how to set the highlighted letter when the user scrolls through my data. 

It's easy once you realize that protoa2z is based on a protoPictIndexer. All you have to do is a SetValue of the currIndex slot to the correct index. This will change the highlighting of the protoa2z.

Note that using SetValue will not call the IndexClickScript, but this is probably what you want. If you do want it to be called, you'll have to manually unhighlight the current selection, set the currIndex slot, and then highlight the new item. The appropriate code would be

a2z:Unhilite();
a2z.currIndex := newIndex;
a2z:Hiliter(newIndex);

Q What is your quest? 

To answer the questions of those who develop for Newton.

Q I tried to use a protoPictRadioButton in my application but the highlight rectangle isn't the right size. I know that I need to write some code to draw the correct-sized highlight, but where do I hook it in? 

Minimally you need to override the viewDrawScript of the protoPictRadioButton. You may also want to change the viewFormat since it defaults to a thick rounded-rectangle border. Assuming that you wanted some sort of rectangle highlight around the selected button, you could use the following viewDrawScript:

func()
begin
	// If the button is selected, highlight it.
	if viewValue then
	begin
	// Get the bounds of the protoPictRadioButton.
	local b := :LocalBox();
	
	// Inset the bounds.
	b.top := b.top + 2;
	b.left := b.left + 2;
	b.bottom := b.bottom - 2;
	b.right := b.right - 2;
	
	// Now draw a rectangle.
	:DrawShape(MakeRect(b.left, b.top, b.right, b.bottom), nil);
	end;
end

Q What is the AutoClose checkbox in the Newton Toolkit for? Why should I use it? 

The AutoClose flag causes all other AutoClose applications to be closed when your application is clicked. The effect is that only one "auto-close" application can be open at one time. You should always  make your application auto-close, to help conserve memory and other resources, unless it's providing special functionality to other applications (like the built-in Calculator or Styles application).

Q How do I create my own class of binary object? 

To get a binary object of your own class, you first need to create a binary object, then change its class to your own. The easiest way to do this is to create a string that's the same length as your intended binary object and then change (coerce) the class of this new object to your own class. You can use the string class as your basic binary object.

Suppose you wanted to have a binary class called CharID for an ID consisting of four ASCII characters. You could write a NewID function in your ProjectData file that would create the object and optionally initialize it, like this:

// Define a constant for a default CharID object. This constant
// can be cloned at run time. kDefaultCharIDObj will be a CharID
// object with 4 bytes that are set to 0x00.
DefConst('kDefaultCharIDOBj, SetClass(SetLength("", 4),
         'CharID));

// CharString is a string of 4 characters or nil.
NewCharID := func(CharString)
begin
	// Create a binary object of the correct length.
	local newObj := Clone(kDefaultCharIDObj);
	
	// Optionally initialize it.
	if CharString then
	for i := 0 to 3 do
		StuffChar(newObj, i, CharString[i]);
	
	// Return the new object.
	newObj;
end;

To see this code in action, you can type it into the Inspector window in the Newton Toolkit and evaluate it. Note that you cannot use DefConst in the Inspector since it's a compile-time function. Just substitute the second argument in the DefConst function for kDefaultCharIDObj in the function to evaluate it. Then you can try things like this:
x := :NewCharID(nil);
#440DD01 <CharID, length 4>
ExtractChar(x, 2);
#6 $\00
x := NewCharID("abcd");
#4410FC9 <CharID, length 4>
ExtractChar(x, 2);
#636 $c
ExtractByte(x, 2);
#18C 99

Q What is your favorite color? 

Llama fur beige.

Q In my application I have a clPictureView that can display a variable number of pictures. Right now I create a bunch of picture slots in my application and then make another slot at run time that is an array of those items. There must be an easier way. 

You're right; there is an easier way. You can use the GetPictAsBits function in your ProjectData file to read in the bitmaps. Note that you'll first have to open the resource file that contains the pictures.

// Open the resource file that contains the pictures.
// Assumes the file "Pictures" exists in the project folder.
r := OpenResFileX("Pictures");

// Get an array of pictures.
myPictures := [
	GetPictAsBits("TARDIS", nil),
	GetPictAsBits("Planet", nil)
];

// Now close the resource file.
CloseResFileX(r);

Once you have the myPictures array, you can create a slot of type Evaluate and just type "myPictures" in the editor for the slot. Then you can use SetValue to set the icon slot of the clPicture view to one of the elements of the array.

Q How do I put my own default person in the fax information slip? 

You can set up a default person in your SetupRoutingSlip method, which is called before the fax slip is shown. The argument to that method is used to set up the particular routing slip. In the case of a fax slip, there's a slot called "alternatives" which is an array of cardfile entries for the possible people to fax to. If there's just one entry, that's the person. The fax number will be set from the cardfile entry. So your SetupRoutingSlip method would look like this:

func(fields)
begin
	// Check for a fax.
	if fields.category = 'faxSlip then
	fields.alternatives := SmartCFQuery("Llama");
	// Do other stuff here, like put a title for the out box.
end

Note that the fields.category is set to the same value you set in the routeSlip slot of a frame in your application's entry in the global routing frame. The SmartCFQuery function returns an array of cardfile entries that have strings starting with the string passed in.

Q I noticed that every soup entry has a _uniqueID slot. Just how unique is it? 

The _uniqueID slot is only unique within that soup on that particular store. The ID will never be reused in that soup on that store. However, it's not necessarily unique across stores (say, RAM and a PCMCIA card).

Q What is the ground velocity of an unladen llama climbing a 5% grade? 

What do you mean -- Mexican or Venezuelan?


The llama is Thanks Have more questions?

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

OmniOutliner Pro 4.2 - 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
VLC Media Player 2.2.1 - Popular multime...
VLC Media Player is a highly portable multimedia player for various audio and video formats (MPEG-1, MPEG-2, MPEG-4, DivX, MP3, OGG, ...) as well as DVDs, VCDs, and various streaming protocols. It... Read more
Nisus Writer Pro 2.1.1 - 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
Tinderbox 6.2.0 - Store and organize you...
Tinderbox is a personal content management assistant. It stores your notes, ideas, and plans. It can help you organize and understand them. And Tinderbox helps you share ideas through Web journals... Read more
OmniOutliner 4.2 - Organize your ideas,...
OmniOutliner 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
Things 2.5.4 - Elegant personal task man...
Things is a task management solution that helps to organize your tasks in an elegant and intuitive way. Things combines powerful features with simplicity through the use of tags and its intelligent... Read more
NeoOffice 2014.10 - Mac-tailored, OpenOf...
NeoOffice is a complete office suite for OS X. With NeoOffice, users can view, edit, and save OpenOffice documents, PDF files, and most Microsoft Word, Excel, and PowerPoint documents. NeoOffice 3.x... Read more
iPhoto Library Manager 4.2 - Manage mult...
iPhoto Library Manager allows you to organize your photos among multiple iPhoto libraries, rather than having to store all of your photos in one giant library. You can browse the photos in all your... Read more
Web Snapper 3.3.8 - Capture entire Web p...
Web Snapper lets you capture Web pages exactly as they appear in your browser. You can send them to a file as images or vector-based, multi-page PDFs. It captures the whole Web page - eliminating the... Read more
TeamViewer 10.0.41404 - 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

Kids Can Practice Healthy Living With Gr...
Bobaka is releasing a new interactive book called Green Riding Hood  in May. The app teaches kids about yoga and organic style of life through mini-games and a fun take on the classic Little Red Riding Hood fairy tale. | Read more »
Chainsaw Warrior: Lords of the Night has...
It's time to put the Darkness back in its place now that Chainsaw Warrior: Lords of the Night has officially made it to iOS. | Read more »
A World of Ice and Fire Lets You Stalk 2...
George R. R. Martin’s A World of Ice and Fire, by Random House, is a mobile guide to the epic series. The new update gives you the Journeys map feture that will let you track the movements of 25 different characters. But don't worry, you can protect... | Read more »
Gameloft Announces Battle Odyssey, a New...
Battle Odyssey, Gameloft's newest puzzle RPG, is coming to the App Store next week. Set in the world of Pondera, you will need to control the power of the elements to defend the world from evil. You'll be able to entlist over 500 allies to aid you... | Read more »
Here's How You Can Get 5 Free Pro D...
It's only been a couple of days since Gamevil released MLB Perfect Inning 15, so building up a decent roster could still take a little time. If you'd like to speed things up a bit, then we've got a deal for you. How does five free Pro drafts sound?... | Read more »
Fusion - HDR Camera (Photography)
Fusion - HDR Camera 1.0.0 Device: iOS Universal Category: Photography Price: $1.99, Version: 1.0.0 (iTunes) Description: Fusion creates HDR (high dynamic range) photos by capturing different exposures and then combining them into one... | Read more »
Sago Mini Toolbox (Education)
Sago Mini Toolbox 1.1 Device: iOS Universal Category: Education Price: $2.99, Version: 1.1 (iTunes) Description: Come build with the Sago Mini friends! Use a wrench, try a saw, or hammer some nails. From sewing hand puppets to... | Read more »
You Should Probably Grab Hitman GO While...
Hitman GO is a surprisingly cool (yet also incredibly drastic) departure from the Hitman series. It's well worth playing for any puzzle game fans out there, and at the moment you can get your hands - or garrotte if you will - on it for a mere $0.99... | Read more »
IFTTT is Bringing Do Button and Do Note...
IFTTT has announced Do Button and Do Note for the Apple Watch. Do Button lets you make your own personalized button that can connect to things like your Google Drive, control the temperature in your home with Nest Thermostat, or turn the lights on... | Read more »
How Many Days, Hours, and Minutes Are Le...
Countdown, by Yves Tscherry, is now available on the App Store. The app keeps track of countdowns to your favorite things such as someones birthday or days till the New Year. You can display the time in seconds, minutes, hours, days, weeks, months,... | Read more »

Price Scanner via MacPrices.net

TigerText Introduces First Secure Enterprise...
TigerText, a provider of secure, real-time messaging for the enterprise, has announced the launch of TigerText for the Apple Watch. TigerText for the Apple Watch enables users to securely send and... Read more
The Conservation Fund Partners with Apple To...
The Conservation Fund has announced that it will partner with Apple to help protect working forests in the United States. The Apple initiative will conserve more than 36,000 acres of working... Read more
Clearance 13-inch 2.6GHz Retina MacBook Pro a...
B&H Photo has clearance 2014 13″ 2.6GHz/128GB Retina MacBook Pros now available for $1099, or $200 off original MSRP. Shipping is free, and B&H charges NY sales tax only. Read more
Apple refurbished 2014 13-inch Retina MacBook...
The Apple Store has Apple Certified Refurbished 2014 13″ Retina MacBook Pros available for up to $400 off original MSRP, starting at $979. An Apple one-year warranty is included with each model, and... Read more
iMacs on sale for up to $205 off MSRP, NY tax...
B&H Photo has 21″ and 27″ iMacs on sale for up to $205 off MSRP including free shipping plus NY sales tax only: - 21″ 1.4GHz iMac: $1019 $80 off - 21″ 2.7GHz iMac: $1189 $110 off - 21″ 2.9GHz... Read more
Sale! 16GB iPhone 5S for $1 with service
Best Buy is offering 16GB iPhone 5Ss for $1.00 with 2-year activation at a participating cellular provider. Choose free home shipping and activation, or buy online and activate during in-store pickup... Read more
Apple refurbished 2014 MacBook Airs available...
The Apple Store has Apple Certified Refurbished 2014 MacBook Airs available starting at $679. An Apple one-year warranty is included with each MacBook, and shipping is free. These are currently the... Read more
27-inch 3.5GHz 5K iMac on sale for $2349, sav...
 Adorama has the 27″ 3.5GHz 5K iMac in stock today and on sale for $2349 including free shipping plus NY & NJ sales tax only. Their price is $150 off MSRP. For a limited time, Adorama will... Read more
Save up to $380 on an iMac with Apple refurbi...
The Apple Store has Apple Certified Refurbished iMacs available for up to $380 off the cost of new models. Apple’s one-year warranty is standard, and shipping is free: - 27″ 3.5GHz 5K iMac – $2119 $... Read more
iFixIt Teardown Awards 12-IInch Retina MacBoo...
iFixIt has posted its illustrated teardown of the new 12-inch MacBook Retina. They note that this new MacBook is less than half the thickness of the last Apple notebook called just “MacBook” back in... Read more

Jobs Board

Event Director, *Apple* Retail Marketing -...
…This senior level position is responsible for leading and imagining the Apple Retail Team's global engagement strategy and team. Delivering an overarching brand Read more
*Apple* Retail - Multiple Positions (US) - A...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
Communication Manager - *Apple* Pay - Apple...
**Job Summary** This position works within the Apple Pay Merchant Solutions team to create, as well as oversee the development of, materials for use by Apple Pay Read more
Project Manager / Business Analyst, WW *Appl...
…a senior project manager / business analyst to work within our Worldwide Apple Fulfillment Operations and the Business Process Re-engineering team. This role will work Read more
Marketing Program Manager, *Apple* Retail O...
**Job Summary** Imagine what you could do here. At Apple , great ideas have a way of becoming great products, services, and customer experiences very quickly. Bring Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.