ftp.nice.ch/pub/next/tools/business/QTax.1.1.NIHS.b.tar.gz#/QTax_1.1/Source/RegularObject.m

This is RegularObject.m in view mode; [Download] [Up]

#import "RegularObject.h"

@implementation RegularObject

- Calc:sender
{

    char dummyString[20];
    float price;
    float tps;
    float subtotal;
    float tvq;
    float total;


	price = [Price floatValue];

	tps = (price*0.07);
 
        subtotal = (price+tps);

        tvq = (subtotal*0.065);

        total = (subtotal+tvq);

	sprintf(dummyString, "$%.2f", tps); // Convert float to a string
	[TPS setStringValue:dummyString];// Display result
	[TPS display];

	sprintf(dummyString, "$%.2f", subtotal); // Convert float to a string
	[SubTotal setStringValue:dummyString];// Display result
	[SubTotal display];

	sprintf(dummyString, "$%.2f", tvq); // Convert float to a string
	[TVQ setStringValue:dummyString];// Display result
	[TVQ display];
     	
	sprintf(dummyString, "$%.2f", total); // Convert float to a string
	[Total setStringValue:dummyString];// Display result
	[Total display];

	[Price selectText:self];

    return self;
}

// AWAKEFROMNIB
// This is one of the last methods executed after the nib file is loaded.
// This is the BEST way I know how to initialize an object and jump into
// a method after the nib file was loaded, because you are all the methods
// and variables needed can be used. (Unlike init which is not compeletly
// ready when that message is sent
- awakeFromNib
{
 
	[RegularPanel makeKeyAndOrderFront:NULL];
	[Price selectText:self];

    	return self;
}

@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.