/* This is the source file for the resource file for Windows Write.  The
resource file is generated by running this file through the resouce compiler
RC.EXE. */



#define INTL /* International version */

#define NOGDICAPMASKS
#define NOWINMESSAGES
#define NOSYSMETRICS
#define NOICON
#define NOKEYSTATE
#define NOSYSCOMMANDS
#define NOSHOWWINDOW
#define NOATOM
#define NOGDI
#define NOFONT
#define NOBRUSH
#define NOCLIPBOARD
#define NOCOLOR
#define NOCREATESTRUCT
#define NODRAWTEXT
#define NOMB
#define NOMEMMGR
#define NOMETAFILE
#define NOMINMAX
#define NOOPENFILE
#define NOPEN
#define NOREGION
#define NOSCROLL
#define NOSOUND
#define NOTEXTMETRIC
#define NOWH
#define NOWINOFFSETS
#define NOWNDCLASS
#define NOCOMM
#include <windows.h>
#include "menudefs.h"
#include "dlgdefs.h"
#include "str.h"
#define DI_QUESTION         32514  /* have to match windows.h MAKEINTRESOURCE(n) */
#define DI_EXCLAMATION      32515  /* have to match windows.h MAKEINTRESOURCE(n) */

STRINGTABLE
BEGIN

IDS_MERGE1	"%%"   /* relocatable message symbol */

/*    Menu and Undo strings */
/* WARNING: The length of the longest UNDO string is kept as a constant
  in str.h.  This constant must be updated along with the strings */
IDSTRUndoBase,"~Undo "
IDSTRUndoEdit,"Editing"
IDSTRUndoLook,"Formatting"
IDSTRUndoTyping,"Typing"
IDSTRShowRuler,"Ruler On"
IDSTRHideRuler,"Ruler Off"

#ifdef ONLINEHELP
IDSTRAbout, "About...\tF1"
#else /* not ONLINEHELP */
IDSTRAbout, "About..."
#endif /* not ONLINEHELP */

/*    File names */
IDSTRHELPF,"WRITE.HLP"

/*    Search/Change strings */
IDSTRChangeSel,"Change Selection"
IDSTRChangeAll,"Change All"

/*    String for "(page)" and "Page nnnn" */
IDSTRChPage,"page"

IDSTROn, " on "
IDSTRReplaceFile,"Replace Existing %%?"
IDSTRChars, " Chars."
IDSTRSearching, "Searching..."


/***** FOLLOWING MESSAGES ARE "*" LEVEL MESSAGES */

IDPMTSearchDone,"Search complete."
IDPMTNotFound,"Search text not found."
IDPMTNoReplace,"No changes were made."
IDPMTCancelSearch, "Search canceled."
IDPMTDelPicture, "Any pictures will be deleted."

/***** FOLLOWING MESSAGES ARE "?" LEVEL MESSAGES */

IDPMTAddFont "Add font to list?"
IDPMTTruncateSz,"String is too long.  Proceed with the first 255 characters?"

/***** FOLLOWING MESSAGES ARE "!" LEVEL MESSAGES */

IDPMTBadFile,"Not a valid Write document."
IDPMTCantOpen,"Cannot find document."
IDPMTDirtyDoc,"%% has changed.  Save current changes?"
IDPMTCantRunM,"Not enough memory to run Write."
IDPMTCantRunD,"Not enough disk space to run Write."
IDPMTCantRunF,"Cannot run Write.  Unable to create temporary file."
IDPMTNoPath,"Directory does not exist."
IDPMTNoAvail,"File is not available."
IDPMTReadOnly,"Read-only file must be saved under a different name."

/*    Dialog field errors */

IDPMTNoPage,"No such page."
IDPMTNOTNUM,"Not a valid number."
IDPMTBFS,"Font sizes must be between 4 and 127."
IDPMTNPI,"Number must be a whole number between 1 and 32767."
IDPMTNOTDXA,"Not a valid measurement."
IDPMTNPDXA,"Measurement must be larger than zero."
IDPMTMTL,"Margin too large."
IDPMTBadFilename,"Not a valid filename."

IDPMT2Complex,"Formatting too complex."
IDPMTBadMove,"Cannot move text to that position."
IDPMTNoHelpFile,"The help file WRITE.HLP is incorrect or missing."
IDPMTDFULL,"Disk is full.  Please save document on a different disk."
IDPMTPRFAIL, "Insufficient memory to repaginate/print this document."
IDPMTWPR, "Disk is write protected.  Please remove write protect tab."
IDPMTDRFULL, "Disk directory is full.  Please use a different disk."
IDPMTClipLarge,"Clipboard too big for available memory."
IDPMTClipQuest,"  Discard Clipboard?"
IDPMTBadPrinter, "Printer error"
IDPMTCantPrint, "Unable to print "
IDPMTRenameFail, "Unable to replace %%"
IDPMTPrPictErr, "Error while printing picture.  Picture ignored."
IDPMTPrDiskErr, "Insufficient disk space to print this document."


/***** FOLLOWING MESSAGES ARE "<hand>" LEVEL MESSAGES */

IDPMTSDE,"Disk error on file."
/* IDPMTSDN,"Unrecoverable disk error on file:" */
IDPMTNoMemory,"Low on memory.  Save your document."
IDPMTSFER,"Session too long.  Save now, then quit."
IDPMTWinFailure, "Low on memory.  Please close an application."

END


/* Windows WRITE accelerator table */

/* WARNING: The Accelerator table is duplicated in a switch statement in
cmd.c.  If the accelerator table is changed, the switch statement must
be changed */
mw_acctb ACCELERATORS
BEGIN
#ifdef ONLINEHELP
    VK_F1, imiHelp, VIRTKEY
#endif /* ONLINEHELP */
    VK_F2, imiCopy, VIRTKEY
    VK_F3, imiFindAgain, VIRTKEY
    VK_F4, imiGoTo, VIRTKEY
    VK_F5, imiCharNormal, VIRTKEY
    VK_F6, imiBold, VIRTKEY
    VK_F7, imiItalic, VIRTKEY
    VK_F8, imiUnderline, VIRTKEY
    VK_F9, imiSmFont, VIRTKEY
    VK_F10, imiLgFont, VIRTKEY
END

/* Windows WRITE Icon */

mw_icon         ICON    write.ico

/* Windows WRITE Cursors */

mwlores         CURSOR  mwlores.cur
mwhires         CURSOR  mwhires.cur
pmscur          CURSOR  pmscur.cur

/* Windows WRITE Bitmaps */

rbutton         BITMAP  rbutton.bmp
rmark           BITMAP  rmark.bmp

/* Windows WRITE Command Menu */

mw_menu         MENU
    begin
    popup "~File"
        begin
        menuitem "~New",                    imiNew
        menuitem "~Open...",                imiOpen
        menuitem "~Save",                   imiSave
        menuitem "Save ~As...",             imiSaveAs
        menuitem SEPARATOR
        menuitem "~Print...",               imiPrint
        menuitem "C~hange Printer...",      imiPrintSetup
        menuitem "~Repaginate...",          imiRepaginate
        menuitem SEPARATOR
        menuitem "E~xit",                   imiQuit
        menuitem SEPARATOR
        menuitem "A~bout Write...",         imiAbout
        end

    popup "~Edit"
        begin

        menuitem "~Undo\tAlt+Bksp",         imiUndo
        menuitem SEPARATOR
        menuitem "Cu~t\tDel",               imiCut
        menuitem "~Copy\tCtrl+Ins",         imiCopy
        menuitem "~Paste\tShift+Ins",       imiPaste
        menuitem SEPARATOR
        menuitem "~Move Picture",           imiMovePicture
        menuitem "~Size Picture",           imiSizePicture
        end

    popup "~Search"
        begin
        menuitem "~Find...",                imiFind
        menuitem "~Repeat Last Find\tF3",   imiFindAgain
        menuitem "~Change...",              imiChange
        menuitem SEPARATOR
        menuitem "~Go To Page...\tF4",      imiGoTo
        end

    popup "~Character"
        begin
        menuitem "~Normal\tF5",             imiCharNormal
        menuitem SEPARATOR
        menuitem "~Bold\tF6",               imiBold
        menuitem "~Italic\tF7",             imiItalic
        menuitem "~Underline\tF8",          imiUnderline
        menuitem "Su~perscript",            imiSuper
        menuitem "Subs~cript",              imiSub
        menuitem SEPARATOR
        menuitem "",                        imiFont1
        menuitem "",                        imiFont2
        menuitem "",                        imiFont3
        menuitem SEPARATOR
        menuitem "~Reduce Font\tF9",        imiSmFont
        menuitem "~Enlarge Font\tF10",      imiLgFont
        menuitem SEPARATOR
        menuitem "~Fonts...",               imiCharFormats
        end

    popup "~Paragraph"
        begin
        menuitem "~Normal",                 imiParaNormal
        menuitem SEPARATOR
        menuitem "~Left",                   imiLeft
        menuitem "~Centered",               imiCenter
        menuitem "~Right",                  imiRight
        menuitem "~Justified",              imiJustified
        menuitem SEPARATOR
        menuitem "~Single Space",           imiSingleSpace
        menuitem "~1 1/2 Space",            imiOneandhalfSpace
        menuitem "~Double Space",           imiDoubleSpace
        menuitem SEPARATOR
        menuitem "~Indents...",             imiParaFormats
        end

    popup "~Document"
        begin
        menuitem "~Header...",              imiHeader
        menuitem "~Footer...",              imiFooter
        menuitem SEPARATOR
        menuitem "~Ruler On",               imiShowRuler
        menuitem "~Tabs...",                imiTabs
        menuitem SEPARATOR
        menuitem "~Page Layout...",         imiDivFormats
        end
    end

/* Windows Word Dialog Boxes */

#define WS_TABONLY  (WS_TABSTOP | WS_GROUP) /* only tab can get to the item */

dlgOpen         DIALOG   30, 40, 160, 118
STYLE WS_DLGFRAME | WS_POPUP
    begin
    ltext       "Open File ~Name:", idiNil, 6,  4, 64, 12
    edittext    idiOpenFile, 6, 16, 110, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Files in", idiNil, 6, 34, 32, 12
    listbox     idiOpenLB, 6, 48, 70, 64, LBS_NOTIFY | WS_VSCROLL | WS_BORDER | WS_VISIBLE | WS_TABSTOP
    ltext       "",        idiOpenDir, 42, 34, 76, 12
    defpushbutton  "~Open",    idiOk, 96, 67, 50, 14, WS_TABONLY
    pushbutton "Cancel",  idiCancel, 96, 89, 50, 14, WS_TABONLY
    end

#ifdef INTL /* International version */

dlgSaveAs       DIALOG   30, 40, 210, 70

#else

dlgSaveAs       DIALOG   30, 40, 210, 53

#endif  /* International version */

STYLE WS_DLGFRAME | WS_POPUP
    begin
    ltext       "Save File ~Name As:", idiNil, 5, 5, 72, 10
    edittext    idiSavFile, 5, 17, 122, 12, WS_TABSTOP | ES_AUTOHSCROLL
    control     "", idiSavDir, static, WS_VISIBLE | SS_CENTER, 78, 5, 76, 12
    checkbox    "~Make Backup", idiSavBackup, 5, 35, 60, 12, WS_TABONLY
    checkbox "~Text Only", idiSavTextOnly, 5, 52, 52, 12, WS_TABONLY

#ifdef INTL /* International version */

    checkbox "Microsoft ~Word Format", idiSavWordFmt, 70, 52, 100, 12, WS_TABONLY

#endif  /* International version */

    defpushbutton  "OK", idiOk, 155, 17, 50, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 155, 34, 50, 14, WS_TABONLY
    end


  /* note this may be a child of dlgOpen, so its start is based on its parent */
dlgWordCvt   DIALOG  02, 05, 171, 54
STYLE WS_DLGFRAME | WS_POPUP
    begin
    ltext "Convert Text to", idiNil, 5, 5, 138, 12
    ltext "Microsoft Write Format", idiNil, 5, 13, 138, 12
    defpushbutton "~Convert", idiOk, 100, 5, 48, 14, WS_TABONLY
    pushbutton "~No Conversion", idiNo, 100, 20, 65, 14, WS_TABONLY
    pushbutton "Cancel", idiCancel, 100, 35, 40, 14, WS_TABONLY
    end


/*  By popular demand, this dialog box bites the dust
dlgSaveScrap      DIALOG   66, 63, 192, 60
STYLE WS_BORDER | WS_POPUP | WS_CAPTION
CAPTION "Write"
    begin
    icon           DI_QUESTION, idiNil, 5, 5, 0, 0
    ctext          "Large Clipboard", idiNil, 30, 12, 90, 12
    defpushbutton  "~Save", idiOk, 18, 35, 40, 14, WS_TABONLY
    pushbutton     "~Discard", idiNo, 76, 35, 40, 14, WS_TABONLY
    pushbutton     "Cancel", idiCancel, 134, 35, 40, 14, WS_TABONLY
    end
*/

#ifdef ONLINEHELP
dlgHelp         DIALOG   30, 20, 280, 120
    style       WS_POPUP | WS_DLGFRAME | WS_VISIBLE
    begin
    ltext       "Windows Write  V0.53", idiNil, 180, 10, 90, 12
    ltext       "June 19, 1985", idiNil, 180, 20, 90, 12
    ltext       "", idiMemFree, 180, 30, 16, 12
    ltext       "% free memory", idiNil, 200, 30, 70, 12
    listbox     idiHelp, 5, 5, 160, 112, LBS_NOTIFY | WS_VSCROLL | WS_VISIBLE | WS_TABSTOP | WS_BORDER
    defpushbutton  "~Help", idiOk, 180, 90, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 230, 90, 40, 14, WS_TABONLY
    end

/* The real size of this dialog box and its children is calculated in help. c */

dlgHelpInner    DIALOG  30, 40, 110, 80
    style       WS_POPUP | WS_BORDER | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
    caption     "About Windows Write"
    begin
    ltext       "", idiHelpName, 5, 5, 1, 1
    control     "", idiHelpScroll, "ScrollBar",
                WS_TABONLY | SBS_VERT, 1,1,1,1
    defpushbutton  "Topics", idiHelpTopics, 1, 1, 1, 1, WS_TABONLY
    pushbutton  "Next", idiHelpNext, 2, 2, 1, 1, WS_TABONLY
    pushbutton  "Previous", idiHelpPrev, 3, 3, 1, 1, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 4, 4, 1, 1, WS_TABONLY
    end

#else
dlgHelp         DIALOG   30, 20, 150, 100
    style       WS_POPUP | WS_DLGFRAME
    begin
    ctext       "Microsoft Windows", idiNil, 0, 5, 150, 8
    icon        "mw_icon", idiNil, 9, 23, 0, 0
    ctext       "Write", idiNil, 0, 14, 150, 8
    ctext       "Version 2.0", idiNil, 35, 34, 80, 8
    ctext       "Copyright (c) 1985, 1986, 1987, Microsoft Corp." idiNil,  0, 47, 150, 8
    defpushbutton  "Ok", idiOk, 55, 80, 40, 14, WS_TABONLY
    end
#endif

dlgPrint        DIALOG   17, 50, 130, 77
STYLE WS_POPUP | WS_DLGFRAME
    begin
    ltext       "~Copies:", idiNil, 5, 7, 30, 12
    edittext    idiPrtCopies, 35, 5, 30, 12, WS_TABSTOP | ES_AUTOHSCROLL
    checkbox    "~Draft Quality", idiPrtDraft, 5, 20, 74, 12, WS_TABONLY
    ltext       "Page Range:", idiNil, 5, 37, 50, 12
    radiobutton "~All", idiPrtAll, 10, 47, 50, 12, WS_TABSTOP | WS_GROUP
    radiobutton "~From:", idiPrtFrom, 10, 60, 30, 12
    edittext    idiPrtPageFrom, 41, 61, 30, 12, WS_TABONLY | ES_AUTOHSCROLL
    ltext       "~To:", idiNil, 78, 63, 12, 12
    edittext    idiPrtPageTo, 92, 61, 30, 12, WS_TABONLY | ES_AUTOHSCROLL
    defpushbutton  "Ok", idiOk, 85, 5, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 85, 25, 40, 14, WS_TABONLY
    end

dlgCancelPrint DIALOG 15, 50, 134, 52
STYLE WS_BORDER | WS_POPUP | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
CAPTION "Printing"
    begin
    ltext "Write is sending your document", idiNil, 5, 5, 128, 8
    ltext "to the printer.", idiNil, 5, 14, 128, 8
    defpushbutton "Cancel", idiCancel, 47, 30, 40, 14, WS_TABONLY
    end

dlgRepaginate   DIALOG  90, 100, 155, 45
STYLE WS_DLGFRAME | WS_POPUP
    begin
    ltext "Repaginate Document", idiNil, 5, 5, 80, 12
    checkbox "Confirm Page ~Breaks", idiRepageConfirm, 5, 25, 100, 12, WS_TABONLY
    defpushbutton "Ok", idiOk, 110, 5, 40, 14, WS_TABONLY
    pushbutton "Cancel", idiCancel, 110, 25, 40, 14, WS_TABONLY
    end

dlgCancelRepage DIALOG 15, 50, 94, 50
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
CAPTION "Repaginating"
    begin
    ltext "Write is repaginating", idiNil, 5, 5, 84, 8
    ltext "your document", idiNil, 5, 14, 52, 8
    defpushbutton "Cancel", idiCancel, 27, 28, 40, 14, WS_TABONLY
    end

dlgSetPage DIALOG 90, 120, 192, 50
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
CAPTION "Repaginating"
    begin
    ltext "Use up and down buttons", idiNil, 5, 5, 92, 8
    ltext "to move page break", idiNil, 5, 14, 72, 8
    ltext "if necessary,", idiNil, 5, 23, 52, 8
    ltext "then confirm.", idiNil, 5, 32, 52, 8
    pushbutton "Up", idiRepUp, 102, 8, 40, 14, WS_TABONLY
    pushbutton "Down", idiRepDown, 102, 28, 40, 14, WS_TABONLY
    defpushbutton "~Confirm", idiOk, 147, 8, 40, 14, WS_TABONLY
    pushbutton "Cancel", idiCancel, 147, 28, 40, 14, WS_TABONLY
    end

dlgPageMark DIALOG 90, 100, 135, 58
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
CAPTION "Repaginating"
    begin
    icon    DI_QUESTION, idiNil, 5, 5, 0, 0
    ltext "Would you like to keep", idiNil, 30, 7, 92, 12
    ltext "this existing page break?", idiNil, 30, 19, 100, 12
    pushbutton "Cancel", idiCancel, 7, 35, 35, 14, WS_TABONLY
    defpushbutton "Keep", idiKeepPgMark, 49, 35, 35, 14, WS_TABONLY
    pushbutton "Remove", idiRemovePgMark, 91, 35, 35, 14, WS_TABONLY
    end

dlgPrinterSetup DIALOG 30, 40, 190, 80
STYLE WS_DLGFRAME | WS_POPUP | WS_VISIBLE
    begin
    ltext      "~Select a Printer:", idiNil, 5, 5, 70, 12
    listbox    idiPrterName, 5, 20, 132, 56, LBS_STANDARD | WS_VISIBLE | WS_TABONLY
    defpushbutton  "Ok", idiOk, 145, 20, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 145, 50, 40, 14, WS_TABONLY
    end

dlgFind  DIALOG  40, 165, 200, 55
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
CAPTION "Find"
    begin
    ltext "~Find What:", idiNil, 5, 7, 45, 12
    edittext idiFind, 50, 5, 140, 12, WS_TABSTOP | ES_AUTOHSCROLL
    checkbox "~Whole Word", idiWholeWord, 5, 20, 60, 12, WS_TABONLY
    checkbox "~Match Upper/Lowercase", idiMatchCase, 100, 20, 95, 12, WS_TABONLY
    defpushbutton "Find ~Next", idiFindNext, 70, 35, 60, 14, WS_TABONLY
    end

dlgChange  DIALOG  60, 150, 249, 70
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
CAPTION "Change"
    begin
    ltext "~Find What:", idiNil, 5, 7, 45, 12
    edittext idiFind, 50, 5, 150, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext "Change ~To:", idiNil, 5, 22, 45, 12
    edittext idiChangeTo, 50, 20, 150, 12, WS_TABSTOP | ES_AUTOHSCROLL
    checkbox "~Whole Word", idiWholeWord, 5, 35, 60, 12, WS_TABONLY
    checkbox "~Match Upper/Lowercase", idiMatchCase, 100, 35, 195, 12, WS_TABONLY
    defpushbutton "Find ~Next", idiFindNext, 5, 50, 44, 14, WS_TABONLY
    pushbutton "C~hange, then Find", idiChangeThenFind, 54, 50, 76, 14, WS_TABONLY
    pushbutton "~Change", idiChange, 135, 50, 32, 14, WS_TABONLY
    pushbutton "   Change ~All   ", idiChangeAll, 172, 50, 72, 14, WS_TABONLY
    end

dlgGoTo         DIALOG  87, 63, 95, 40
STYLE WS_POPUP | WS_DLGFRAME
    begin
    ltext       "~Page Number:", idiNil, 5, 7, 50, 12
    edittext    idiGtoPage, 56, 5, 30, 12, WS_TABSTOP | ES_AUTOHSCROLL
    defpushbutton  "Ok", idiOk, 5, 22, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 50, 22, 40, 14, WS_TABONLY
    end

dlgCharFormats  DIALOG   80, 36, 180, 100
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
CAPTION "Fonts"
    begin
    ltext       "Font ~Name:", idiNil, 5, 5, 45, 12
    edittext    idiChrFontName, 5, 16, 125, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Fonts:", idiNil, 5, 33, 24, 12
    listbox     idiChrLBFontName, 5, 47, 105, 48, LBS_STANDARD | WS_VISIBLE | WS_TABSTOP
    ltext       "~Sizes:", idiNil, 115, 42, 24, 12
    listbox     idiChrLBFontSize, 115, 55, 24, 40, LBS_STANDARD | WS_VISIBLE | WS_TABSTOP
    ltext       "~Point", idiNil, 144, 61, 20, 12
    edittext    idiChrFontSize, 144, 83, 30, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "Size:", idiNil, 144, 71, 20, 12
    defpushbutton  "Ok", idiOk, 135, 5, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 135, 25, 40, 14, WS_TABONLY
    end

dlgParaFormats  DIALOG  28, 36, 150, 52
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
CAPTION "Indents"
    begin
    ltext       "~Left Indent:", idiNil, 3, 7, 48, 12
    edittext    idiParLfIndent, 56, 5, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~First Line:", idiNil, 3, 22, 44, 12
    edittext    idiParFirst, 56, 20, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Right Indent:", idiNil, 3, 37, 52, 12
    edittext    idiParRtIndent, 56, 35, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    defpushbutton  "Ok", idiOk, 105, 8, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 105, 27, 40, 14, WS_TABONLY
    end

dlgRunningHead  DIALOG  80, 110, 228, 42
STYLE WS_POPUP | WS_CAPTION | WS_BORDER | WS_SYSMENU | WS_VISIBLE
CAPTION "Page Header"
    begin
    ltext       "~Distance from Top: ", idiNil, 5, 7, 76, 12
    edittext    idiRHDx, 80, 5, 38, 12, WS_TABSTOP | ES_AUTOHSCROLL
    checkbox    "~Print on First Page", idiRHFirst, 133, 5, 90, 12, WS_TABONLY
    pushbutton  "~Insert Page #", idiRHInsertPage, 12, 22, 64, 14, WS_TABONLY
    pushbutton  "~Clear", idiRHClear, 88, 22, 30, 14, WS_TABONLY
    defpushbutton  "~Return to Document", idiOk, 130, 22, 85, 14, WS_TABONLY
    end

dlgFooter  DIALOG  80, 110, 228, 42
STYLE WS_POPUP | WS_CAPTION | WS_BORDER | WS_SYSMENU | WS_VISIBLE
CAPTION "Page Footer"
    begin
    ltext       "~Distance from Bottom: ", idiNil, 5, 7, 88, 12
    edittext    idiRHDx, 90, 5, 38, 12, WS_TABSTOP | ES_AUTOHSCROLL
    checkbox    "~Print on First Page", idiRHFirst, 133, 5, 90, 12, WS_TABONLY
    pushbutton  "~Insert Page #", idiRHInsertPage, 12, 22, 64, 14, WS_TABONLY
    pushbutton  "~Clear", idiRHClear, 88, 22, 30, 14, WS_TABONLY
    defpushbutton  "~Return to Document", idiOk, 130, 22, 85, 14, WS_TABONLY
    end

dlgTabs         DIALOG  26, 41, 278, 97
STYLE WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
CAPTION "Tabs"
    begin
    ltext       "~Positions:", idiNil, 3, 7, 40, 12
    edittext    idiTabPos0, 45, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    ltext       "~Decimal:", idiNil, 3, 22, 40, 12
    checkbox    ".", idiTabDec0, 51, 20, 18, 12, WS_TABONLY
    edittext    idiTabPos1, 83, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec1, 89, 20, 18, 12, WS_TABONLY
    edittext    idiTabPos2, 121, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec2, 127, 20, 18, 12, WS_TABONLY
    edittext    idiTabPos3, 159, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec3, 165, 20, 18, 12, WS_TABONLY
    edittext    idiTabPos4, 197, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec4, 203, 20, 18, 12, WS_TABONLY
    edittext    idiTabPos5, 235, 5, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec5, 241, 20, 18, 12, WS_TABONLY

    ltext       "~Positions:", idiNil, 3, 42, 40, 12
    edittext    idiTabPos6, 45, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    ltext       "~Decimal:", idiNil, 3, 57, 40, 12
    checkbox    ".", idiTabDec6, 51, 55, 18, 12, WS_TABONLY
    edittext    idiTabPos7, 83, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec7, 89, 55, 18, 12, WS_TABONLY
    edittext    idiTabPos8, 121, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec8, 127, 55, 18, 12, WS_TABONLY
    edittext    idiTabPos9, 159, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec9, 165, 55, 18, 12, WS_TABONLY
    edittext    idiTabPos10, 197, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec10, 203, 55, 18, 12, WS_TABONLY
    edittext    idiTabPos11, 235, 40, 38, 12, WS_TABONLY | ES_AUTOHSCROLL
    checkbox    ".", idiTabDec11, 241, 55, 18, 12, WS_TABONLY
    defpushbutton  "Ok", idiOk, 20, 75, 50, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 90, 75, 50, 14, WS_TABONLY
    pushbutton  "Clear ~All", idiTabClearAll, 160, 75, 50, 14, WS_TABONLY
    end


#ifdef INTL /* International version */

dlgDivision     DIALOG  26, 30, 180, 110

#else

dlgDivision     DIALOG  26, 30, 180, 80

#endif  /* International version */

STYLE  WS_POPUP | WS_DLGFRAME
    begin
    ltext       "~Start Page Numbers At:", idiNil, 5, 7, 88, 12
    edittext    idiDivPNStart, 95, 5, 30, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "Margins:", idiNil, 5, 33, 40, 12
    ltext       "~Left:", idiNil, 12, 48, 20, 12
    edittext    idiDivLMarg, 35, 46, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Right:", idiNil, 85, 48, 30, 12
    edittext    idiDivRMarg, 117, 46, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Top:", idiNil, 12, 65, 20, 12
    edittext    idiDivTMarg, 35, 63, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL
    ltext       "~Bottom:", idiNil, 85, 65, 30, 12
    edittext    idiDivBMarg, 117, 63, 40, 12, WS_TABSTOP | ES_AUTOHSCROLL

#ifdef INTL /* International version */

    ltext       "Measurements:", idiNil, 5, 84, 63, 12
    radiobutton "~inch", idiDivInch, 12, 94, 27, 12, WS_TABSTOP | WS_GROUP
    radiobutton "~cm", idiDivCm, 44, 94, 26, 12

#endif  /* International version */

    defpushbutton  "Ok", idiOk, 135, 5, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 135, 23, 40, 14, WS_TABONLY
    end

dlgBadMargins DIALOG 50, 20, 235, 65
STYLE  WS_POPUP | WS_BORDER | WS_CAPTION
CAPTION "Write"
    begin
    icon        DI_EXCLAMATION, idiNil, 5, 5, 0, 0
    ltext       "Current printer cannot print outside these margins", idiNil, 30, 5, 200, 12
    ltext       "Left:", idiNil, 30, 17, 20, 12
    ltext       "", idiBMrgLeft, 60, 17, 40, 12
    ltext       "Right:", idiNil, 130, 17, 24, 12
    ltext       "", idiBMrgRight, 168, 17, 40, 12
    ltext       "Top:", idiNil, 30, 29, 16, 12
    ltext       "", idiBMrgTop, 60, 29, 40, 12
    ltext       "Bottom:", idiNil, 130, 29, 28, 12
    ltext       "", idiBMrgBottom, 168, 29, 40, 12
    defpushbutton  "Ok", idiOk, 97, 44, 40, 14, WS_TABSTOP
    end