home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1993 #2
/
Image.iso
/
lan
/
pmail301.zip
/
RESOURCE.ZIP
/
BASIC.R
next >
Wrap
Text File
|
1993-08-22
|
3KB
|
97 lines
#
# BASIC.R
# Sample programmable mail form for Pegasus Mail v3.0
# Copright (c) 1993, David Harris, All Rights Reserved.
#
# You are granted the right to modify and distribute this
# form in any way you wish provided you do not sell it or
# any derivative either on its own or as part of any other
# package.
#
# By using this form you agree to hold the author blameless
# for all or any damages or losses resulting from its use.
#
# This form duplicates the standard PMail message editing
# screen in every way.
#
include defines.rh
include forms.rh
string form_title "Basic Message Editor";
window fwindow # The window in which the form appears
{
1, 1, 80, 25, BBLUE | LIGHTGREY | wplain,
BBLUE | LIGHTGREY, ' ', BSINGLE,
" Send Message: Editing Screen "
};
block field_text
{
2, 1, BBLUE | LIGHTGREY,
"To :",
"Subj :"
};
data to # The "to" field when sending files or messages
{
10, 1, 65, 179, 0, 0, 0, GT_STRING, GNOCLEAR
};
data subject # The "subject" field when sending files or messages
{
10, 2, 63, 64, 0, 0, 0, GT_STRING, 0
};
text subject_help
{
" The Subject Field \n",
"The subject is a one-line précis of the contents of the\n",
"message which will be displayed in the recipient's browse\n",
"list. You may leave this field blank, but it is considered\n",
"good e-mail etiquette to provide a meaningful subject."
};
line xline_1
{
0, 3, 80, 0, LIGHTGREY, '─'
};
line xline_2
{
0, 21, 80, 0, LIGHTGREY, '─'
};
line xline_3
{
1, 20, 80, 0, BLIGHTGREY, ' '
};
editor message
{
1, 4, 77, 16, 70, 0, 0, BBLUE | LIGHTGREY
};
block help_text
{
1, 22, dim | wcentre,
"F1-Help F2-Local user lists F3-Address books F6-Distribution lists",
"F7-File attachments F9-More options Ctrl-Enter-Send the message"
};
formtable formdata
{
# Name........ Correlation. Help text.... Validation... Status...... Default
fwindow, F_WINDOW, 0, 0, 0, 0,
field_text, 0, 0, 0, 0, 0,
help_text, 0, 0, 0, 0, 0,
xline_1, 0, 0, 0, 0, 0,
xline_2, 0, 0, 0, 0, 0,
xline_3, 0, 0, 0, 0, 0,
to, F_TO, 0, 0, 0, 0,
subject, F_SUBJECT, subject_help, 0, 0, 0,
message, F_MESSAGE, 0, 0, 0, 0
};