project_files/hwc/rtl/Types.h
author nemo
Sun, 25 Jan 2015 14:48:02 -0500
changeset 10808 1e39630d7c2e
parent 10015 4feced261c68
permissions -rw-r--r--
Add a couple of more variable bindings, make all the set visual gear values optional, to allow skipping trailing params or specifying ones in the middle as nil to not set. Should make using it more convenient in simple cases.

#ifndef _TYPES_H_
#define _TYPES_H_

#include "pas2c.h"

/*
 * Not very useful currently
 */

typedef double TDate;
typedef double TTime;
typedef double TDateTime;
typedef string255 TMonthNameArray[13];
typedef string255 TWeekNameArray[8];

typedef struct {
    Byte CurrencyFormat;
    Byte NegCurrFormat;
    Char ThousandSeparator;
    Char DecimalSeparator;
    Byte CurrencyDecimals;
    Char DateSeparator;
    Char TimeSeparator;
    Char ListSeparator;
    string255 CurrencyString;
    string255 ShortDateFormat;
    string255 LongDateFormat;
    string255 TimeAMString;
    string255 TimePMString;
    string255 ShortTimeFormat;
    string255 LongTimeFormat;
    TMonthNameArray ShortMonthNames;
    TMonthNameArray LongMonthNames;
    TWeekNameArray ShortDayNames;
    TWeekNameArray LongDayNames;
    Word TwoDigitYearCenturyWindow;
}TFormatSettings;

#endif