windows-server-2003/base/mvdm/wow16/write/messages/usa/write.dlg

/************************************************************/
/* Windows Write, Copyright 1985-1992 Microsoft Corporation */
/************************************************************/


/* Dialog Boxes */


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

#define WDialog     DIALOG MOVEABLE
#define WStyle      STYLE  DS_MODALFRAME|WS_SYSMENU|


  /* note this may be a child of dlgOpen, so its start is based on its parent */
dlgWordCvt WDialog                              22, 22, 220, 60
WStyle WS_DLGFRAME | WS_POPUP
FONT 8 "Helv"
CAPTION "Write"
    begin
    icon DI_EXCLAMATION, idiNil,                15, 8, 0, 0
    ctext "", idiConvertPrompt,                 35, 14, 180, 20
    defpushbutton "&Convert", idiOk,            25, 39, 48, 14, WS_TABONLY
    pushbutton "&No Conversion", idiNo,         81, 39, 65, 14, WS_TABONLY
    pushbutton "Cancel", idiCancel,             155, 39, 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 WDialog                                     30, 20, 160, 100
WStyle WS_POPUP | WS_DLGFRAME
FONT 8 "Helv"
CAPTION "About Write"
    begin
#ifdef OS2
    ctext       "Microsoft OS/2", idiNil,           41, 10, 78, 8
    ctext       "Version 2.0", idiNil,              60, 44, 40, 8
#else
    ctext       "Microsoft Windows", idiNil,        41, 10, 78, 8
    ctext       "Version 3.0", idiNil,              60, 44, 40, 8
#endif
    ctext       "Write", idiNil,                    70, 20, 20, 8
    ctext       "Copyright \0251 1985-1990 Microsoft Corp." idiNil, 12, 56, 136, 8
    icon        "mw_icon", idiNil,                  12, 24, 0, 0
    defpushbutton  "OK", idiOk,                     60, 75, 40, 14, WS_TABONLY
    end
#endif

dlgCancelPrint WDialog                              20,20,90, 64
WStyle WS_BORDER | WS_POPUP | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
FONT 8 "Helv"
CAPTION "Write"
    begin
    ctext "Now Printing",  -1,                      0,  8, 90,  8
    ctext "", idiPrCancelName,                      0, 18, 90,  8, SS_NOPREFIX
    defpushbutton "Cancel", idiCancel,             29, 44, 32, 14, WS_TABONLY
    end

dlgRepaginate WDialog                               90, 100, 155, 45
WStyle WS_DLGFRAME | WS_POPUP
FONT 8 "Helv"
CAPTION "Repaginate Document"
    begin
    checkbox "Confirm Page &Breaks", idiRepageConfirm, 5, 15, 100, 12, WS_TABONLY
    defpushbutton "OK", idiOk, 110, 5, 40, 14, WS_TABONLY
    pushbutton "Cancel", idiCancel, 110, 25, 40, 14, WS_TABONLY
    end

dlgCancelRepage WDialog                             15, 50, 94, 50
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
FONT 8 "Helv"
CAPTION "Write"
    begin
    ctext "Repaginating", idiNil, 5, 5, 84, 8
    ctext "document", idiNil, 5, 14, 84, 8
    defpushbutton "Cancel", idiCancel, 27, 28, 40, 14, WS_TABONLY
    end

dlgSetPage WDialog                                  90, 120, 192, 50
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
FONT 8 "Helv"
CAPTION "Repaginating Document"
    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 WDialog                                 90, 100, 135, 58
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
FONT 8 "Helv"
CAPTION "Repaginating Document"
    begin
    icon    DI_EXCLAMATION, 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

dlgFind DIALOG LOADONCALL MOVEABLE DISCARDABLE
30, 73, 236, 62
CAPTION "Find"
STYLE WS_BORDER | WS_CAPTION | DS_MODALFRAME | WS_POPUP | WS_SYSMENU | WS_VISIBLE
FONT 8, "Helv"
BEGIN
    CONTROL "Fi&nd What:", idiNil, "static", SS_LEFT | WS_CHILD,
        4, 8, 42, 8
    CONTROL "", idiFind, "edit", ES_LEFT | ES_AUTOHSCROLL | WS_BORDER | WS_GROUP |
            WS_TABSTOP | WS_CHILD | WS_BORDER,
        47, 7, 128, 12

    CONTROL "Match &Whole Word Only", idiWholeWord, "button", WS_TABSTOP | WS_CHILD | WS_GROUP | BS_CHECKBOX,
        4, 26, 100, 12
    CONTROL "Match &Case", idiMatchCase, "button", WS_TABSTOP | WS_CHILD | BS_CHECKBOX,
        4, 42, 64, 12

    CONTROL "&Find Next", idiFindNext, "button", BS_DEFPUSHBUTTON | WS_CHILD |
            WS_TABSTOP | WS_GROUP,
       182, 5, 50, 14
    CONTROL "Cancel", idiCancel, "button", BS_PUSHBUTTON | WS_CHILD | 
            WS_TABSTOP | WS_GROUP,
       182, 23, 50, 14
END


dlgChange DIALOG LOADONCALL MOVEABLE DISCARDABLE
36, 44, 257, 80
CAPTION "Replace"
STYLE WS_BORDER | WS_CAPTION | WS_SYSMENU | DS_MODALFRAME | WS_POPUP | WS_VISIBLE
FONT 8, "Helv"
BEGIN
    CONTROL "Fi&nd What:", idiNil, "static", SS_LEFT | WS_CHILD,
        4, 9, 48, 8
    CONTROL "", idiFind, "edit", ES_LEFT | ES_AUTOHSCROLL | WS_BORDER | 
            WS_TABSTOP | WS_CHILD | WS_GROUP,
        54, 7, 114, 12
    CONTROL "Re&place With:", idiNil, "static", SS_LEFT | WS_CHILD,
        4, 26, 48, 8
    CONTROL "", idiChangeTo, "edit", ES_LEFT | ES_AUTOHSCROLL | WS_BORDER |
            WS_TABSTOP | WS_CHILD | WS_GROUP,
        54, 24, 114, 12

    CONTROL "Match &Whole Word Only", idiWholeWord, "button", WS_TABSTOP | WS_CHILD | WS_GROUP | BS_CHECKBOX,
        5, 46, 104, 12
    CONTROL "Match &Case", idiMatchCase, "button",  WS_TABSTOP  | BS_CHECKBOX | WS_CHILD,
        5, 62, 59, 12

    CONTROL "&Find Next", idiFindNext, "button", BS_DEFPUSHBUTTON | WS_CHILD |
            WS_TABSTOP | WS_GROUP,
        174, 4, 77, 14
    CONTROL "&Replace", idiChangeThenFind, "button", BS_PUSHBUTTON | WS_CHILD | 
            WS_TABSTOP | WS_GROUP,
        174, 21, 77, 14
    CONTROL "Replace &All", idiChangeAll, "button", BS_PUSHBUTTON | WS_CHILD | 
            WS_TABSTOP | WS_GROUP,
        174, 38, 77, 14
    CONTROL "C&lose", idiCancel, "button", BS_PUSHBUTTON | WS_CHILD |
            WS_TABSTOP | WS_GROUP,
        174, 55, 77, 14
END

dlgGoTo WDialog                                     87, 63, 95, 40
WStyle WS_POPUP | WS_DLGFRAME
FONT 8 "Helv"
CAPTION "Go To"
    begin
    ltext       "&Page Number:", idiNil,            5, 7, 55, 12
    edittext    idiGtoPage,                         69, 5, 21, 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 WDialog                              80, 36, 180, 100
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
FONT 8 "Helv"
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, 41, 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, 70, 20, 12
    defpushbutton  "OK", idiOk, 135, 5, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 135, 25, 40, 14, WS_TABONLY
    end

dlgParaFormats WDialog                              28, 36, 150, 52
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
FONT 8 "Helv"
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 WDialog                              80, 110, 228, 42
WStyle WS_POPUP | WS_CAPTION | WS_BORDER | WS_SYSMENU | WS_VISIBLE
FONT 8 "Helv"
CAPTION "Page Header"
    begin
    ltext       "&Distance from Top:", idiNil, 5, 7, 70, 12
    edittext    idiRHDx, 85, 5, 33, 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 WDialog                                   80, 110, 228, 42
WStyle WS_POPUP | WS_CAPTION | WS_BORDER | WS_SYSMENU | WS_VISIBLE
FONT 8 "Helv"
CAPTION "Page Footer"
    begin
    ltext       "&Distance from Bottom:", idiNil, 5, 7, 80, 12
    edittext    idiRHDx, 95, 5, 33, 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 WDialog                                     26, 41, 278, 97
WStyle WS_POPUP | WS_BORDER | WS_CAPTION | WS_SYSMENU
FONT 8 "Helv"
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


dlgDivision WDialog                                 26, 30, 180, 110
WStyle WS_POPUP | WS_DLGFRAME
FONT 8 "Helv"
CAPTION "Page Layout"
    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
    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
    defpushbutton  "OK", idiOk, 135, 5, 40, 14, WS_TABONLY
    pushbutton  "Cancel", idiCancel, 135, 23, 40, 14, WS_TABONLY
    end

dlgBadMargins WDialog                               50, 20, 235, 65
WStyle WS_POPUP | WS_BORDER | WS_CAPTION
FONT 8 "Helv"
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