1 line
3.0 KiB
R
Executable File
1 line
3.0 KiB
R
Executable File
#include "EudoraTypes.r"
|
|
#include "::tabmania.r"
|
|
|
|
resource 'eTAB' (131, "Other Tab", purgeable) {
|
|
'CSOm',
|
|
'Nick',
|
|
'Othr',
|
|
"Other",
|
|
0,
|
|
12,
|
|
12,
|
|
{
|
|
// Object 0 (note that 33% of the tab height results in a "short" final field. If should be 33% of tab height - defaultMargin
|
|
// but there's not yet a way to express this. Or, we say that this is item 1 of 3 and the math is taken
|
|
// care of for us)
|
|
fieldObject {
|
|
objectFlagAcceptsFocus | objectFlagExportable,
|
|
"otheremail", // tag
|
|
"Other Email Addresses:", // label
|
|
"Other Email:", // Field name
|
|
0, // label height (and we don't care)
|
|
labelFlushLeft, // label justification
|
|
labelDisplayAboveField | labelAutoSizeFieldHeight | labelWrapField, // label field flags
|
|
peNoStyledPaste, // PETE flags for the field
|
|
{
|
|
left { 0, tabObject, relToLeft, rfDefaultMargin }, // left coordinate
|
|
top { 0, tabObject, relToTop, rfDefaultMargin }, // top coordinate
|
|
right { 0, tabObject, relToRight, rfNegativeDefaultMargin }, // right coordinate
|
|
bottom { 33, tabObject, relToHeight, rfNone } // bottom coordinate
|
|
}
|
|
};
|
|
|
|
// Object 1
|
|
fieldObject {
|
|
objectFlagAcceptsFocus | objectFlagExportable,
|
|
"otherphone", // tag
|
|
"Other Phone Numbers:", // label
|
|
"Other Phone:", // Field name
|
|
0, // label height (and we don't care)
|
|
labelFlushLeft, // label justification
|
|
labelDisplayAboveField | labelAutoSizeFieldHeight | labelWrapField, // label field flags
|
|
peNoStyledPaste, // PETE flags for the field
|
|
{
|
|
left { 0, 0, relToLeft, rfNone }, // left coordinate
|
|
top { 0, 0, relToBottom, rfDefaultMargin }, // top coordinate
|
|
right { 0, 0, relToRight, rfNone }, // right coordinate
|
|
bottom { 66, tabObject, relToHeight, rfNone } // bottom coordinate
|
|
}
|
|
};
|
|
|
|
// Object 2
|
|
fieldObject {
|
|
objectFlagAcceptsFocus | objectFlagExportable,
|
|
"otherweb", // tag
|
|
"Other Web Pages:", // label
|
|
"Other Web:", // Field name
|
|
0, // label height (and we don't care)
|
|
labelFlushLeft, // label justification
|
|
labelDisplayAboveField | labelAutoSizeFieldHeight | labelWrapField, // label field flags
|
|
peNoStyledPaste, // PETE flags for the field
|
|
{
|
|
left { 0, 1, relToLeft, rfNone }, // left coordinate
|
|
top { 0, 1, relToBottom, rfDefaultMargin }, // top coordinate
|
|
right { 0, 1, relToRight, rfNone }, // right coordinate
|
|
bottom { 0, tabObject, relToBottom, rfNegativeDefaultMargin } // bottom coordinate
|
|
}
|
|
}
|
|
}
|
|
};
|