home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 10 / ioProg_10.iso / soft / optima / samples.z / Options.wxf < prev    next >
Encoding:
Text File  |  1996-08-07  |  13.4 KB  |  651 lines

  1. Save Format v1.3
  2. @begin Form "Options"
  3.  Exported 0;
  4.  
  5.  @begin Object "WDialog"
  6.   WSCaption 1;
  7.   WSSizeable 1;
  8.   WSDlgBorder 1;
  9.   WSSysMenu 1;
  10.   WSSystemMenu 1;
  11.   WSMinimizeBox 1;
  12.   WSMaximizeBox 1;
  13.   WSGroup 1;
  14.   WSTabStop 1;
  15.   WSResizeBorder 1;
  16.   WSVisible 1;
  17.   Icon "WIcon( WResourceID( ICON_01 ) )";
  18.   FormPositionType "Centered";
  19.   FormAbsTop "106";
  20.   FormAbsLeft "13";
  21.   FDXStructName "OptionsFDXStruct";
  22.   Font "8.MS Sans Serif";
  23.   Text "Options";
  24.   @begin Event "Create"
  25.    GencodeSrcLine 287;
  26.    FunctionName "Options::Options_Create";
  27.   @end;
  28.   @begin UserFunction "Options()"
  29.    Compiler 1;
  30.    GencodeSrcLine 313;
  31.    FunctionName "Options::Options()";
  32.   @end;
  33.   @begin UserFunction "~Options()"
  34.    Compiler 1;
  35.    GencodeSrcLine 317;
  36.    FunctionName "Options::~Options()";
  37.   @end;
  38.   @begin UserFunction "Open( OptionsStruct *options )"
  39.    GencodeSrcLine 321;
  40.    FunctionName "Options::Open( OptionsStruct *options )";
  41.   @end;
  42.   @begin UserFunction "Prototype for Open( OptionsStruct *options )"
  43.    Private 1;
  44.    GencodeSrcLine 114;
  45.    FunctionName "Options::Prototype for Open( OptionsStruct *options )";
  46.   @end;
  47.   ResID 113;
  48.   DesignName Options;
  49.   TabIndex 0;
  50.   DesignRect 14,106,241,146;
  51.  @end;
  52.  
  53.  @begin Object "WCheckBox"
  54.   WBSAutoCheckBox 1;
  55.   WCCSTop 1;
  56.   WCCSNoMoveY 1;
  57.   WCCSBottom 1;
  58.   WSChild 1;
  59.   WSMaximizeBox 1;
  60.   WSTabStop 1;
  61.   WSVisible 1;
  62.   Checked "0";
  63.   FDXFieldName "checkbox_1_data";
  64.   FDXFieldType "WULong";
  65.   Text "&Free";
  66.   ResID 101;
  67.   DesignName checkFree;
  68.   TabIndex 0;
  69.   DesignRect 115,15,60,10;
  70.  @end;
  71.  
  72.  @begin Object "WGroupBox"
  73.   WCCSTop 1;
  74.   WCCSNoMoveY 1;
  75.   WCCSBottom 1;
  76.   WCCSNoResize 1;
  77.   WSChild 1;
  78.   WSVisible 1;
  79.   Text "State";
  80.   ResID 102;
  81.   DesignName groupb_1;
  82.   TabIndex 1;
  83.   DesignRect 110,5,70,85;
  84.  @end;
  85.  
  86.  @begin Object "WCheckBox"
  87.   WBSAutoCheckBox 1;
  88.   WCCSTop 1;
  89.   WCCSNoMoveY 1;
  90.   WCCSBottom 1;
  91.   WSChild 1;
  92.   WSMaximizeBox 1;
  93.   WSTabStop 1;
  94.   WSVisible 1;
  95.   Checked "0";
  96.   FDXFieldName "checkbox_1_data";
  97.   FDXFieldType "WULong";
  98.   Text "&Private";
  99.   ResID 103;
  100.   DesignName checkPrivate;
  101.   TabIndex 2;
  102.   DesignRect 115,45,60,10;
  103.  @end;
  104.  
  105.  @begin Object "WCheckBox"
  106.   WBSAutoCheckBox 1;
  107.   WCCSTop 1;
  108.   WCCSNoMoveY 1;
  109.   WCCSBottom 1;
  110.   WSChild 1;
  111.   WSMaximizeBox 1;
  112.   WSTabStop 1;
  113.   WSVisible 1;
  114.   Checked "0";
  115.   FDXFieldName "checkbox_1_data";
  116.   FDXFieldType "WULong";
  117.   Text "&Commit";
  118.   ResID 104;
  119.   DesignName checkCommit;
  120.   TabIndex 3;
  121.   DesignRect 115,25,60,10;
  122.  @end;
  123.  
  124.  @begin Object "WCheckBox"
  125.   WBSAutoCheckBox 1;
  126.   WCCSTop 1;
  127.   WCCSNoMoveY 1;
  128.   WCCSBottom 1;
  129.   WSChild 1;
  130.   WSMaximizeBox 1;
  131.   WSTabStop 1;
  132.   WSVisible 1;
  133.   Checked "0";
  134.   FDXFieldName "checkbox_1_data";
  135.   FDXFieldType "WULong";
  136.   Text "&Reserve";
  137.   ResID 105;
  138.   DesignName checkReserve;
  139.   TabIndex 4;
  140.   DesignRect 115,35,60,10;
  141.  @end;
  142.  
  143.  @begin Object "WCheckBox"
  144.   WBSAutoCheckBox 1;
  145.   WCCSTop 1;
  146.   WCCSNoMoveY 1;
  147.   WCCSBottom 1;
  148.   WSChild 1;
  149.   WSMaximizeBox 1;
  150.   WSTabStop 1;
  151.   WSVisible 1;
  152.   Checked "0";
  153.   FDXFieldName "checkbox_1_data";
  154.   FDXFieldType "WULong";
  155.   Text "&Mapped";
  156.   ResID 106;
  157.   DesignName checkMapped;
  158.   TabIndex 5;
  159.   DesignRect 115,55,60,10;
  160.  @end;
  161.  
  162.  @begin Object "WCheckBox"
  163.   WBSAutoCheckBox 1;
  164.   WCCSTop 1;
  165.   WCCSNoMoveY 1;
  166.   WCCSBottom 1;
  167.   WSChild 1;
  168.   WSMaximizeBox 1;
  169.   WSTabStop 1;
  170.   WSVisible 1;
  171.   Checked "0";
  172.   FDXFieldName "checkbox_1_data";
  173.   FDXFieldType "WULong";
  174.   Text "&Image";
  175.   ResID 107;
  176.   DesignName checkImage;
  177.   TabIndex 6;
  178.   DesignRect 115,65,60,10;
  179.  @end;
  180.  
  181.  @begin Object "WCheckBox"
  182.   WBSAutoCheckBox 1;
  183.   WCCSTop 1;
  184.   WCCSNoMoveY 1;
  185.   WCCSBottom 1;
  186.   WSChild 1;
  187.   WSMaximizeBox 1;
  188.   WSTabStop 1;
  189.   WSVisible 1;
  190.   Checked "0";
  191.   FDXFieldName "checkbox_1_data";
  192.   FDXFieldType "WULong";
  193.   Text "Read-&only";
  194.   ResID 108;
  195.   DesignName checkReadonly;
  196.   TabIndex 7;
  197.   DesignRect 10,15,60,10;
  198.  @end;
  199.  
  200.  @begin Object "WGroupBox"
  201.   WCCSTop 1;
  202.   WCCSNoMoveY 1;
  203.   WCCSBottom 1;
  204.   WCCSNoResize 1;
  205.   WSChild 1;
  206.   WSVisible 1;
  207.   Text "Protection";
  208.   ResID 109;
  209.   DesignName groupb_2;
  210.   TabIndex 8;
  211.   DesignRect 5,5,100,120;
  212.  @end;
  213.  
  214.  @begin Object "WCheckBox"
  215.   WBSAutoCheckBox 1;
  216.   WCCSTop 1;
  217.   WCCSNoMoveY 1;
  218.   WCCSBottom 1;
  219.   WSChild 1;
  220.   WSMaximizeBox 1;
  221.   WSTabStop 1;
  222.   WSVisible 1;
  223.   Checked "0";
  224.   FDXFieldName "checkbox_1_data";
  225.   FDXFieldType "WULong";
  226.   Text "Read-&write";
  227.   ResID 110;
  228.   DesignName checkReadwrite;
  229.   TabIndex 9;
  230.   DesignRect 10,25,60,10;
  231.  @end;
  232.  
  233.  @begin Object "WCheckBox"
  234.   WBSAutoCheckBox 1;
  235.   WCCSTop 1;
  236.   WCCSNoMoveY 1;
  237.   WCCSBottom 1;
  238.   WSChild 1;
  239.   WSMaximizeBox 1;
  240.   WSTabStop 1;
  241.   WSVisible 1;
  242.   Checked "0";
  243.   FDXFieldName "checkbox_1_data";
  244.   FDXFieldType "WULong";
  245.   Text "No access";
  246.   ResID 111;
  247.   DesignName checkNoaccess;
  248.   TabIndex 10;
  249.   DesignRect 10,35,60,10;
  250.  @end;
  251.  
  252.  @begin Object "WCheckBox"
  253.   WBSAutoCheckBox 1;
  254.   WCCSTop 1;
  255.   WCCSNoMoveY 1;
  256.   WCCSBottom 1;
  257.   WSChild 1;
  258.   WSMaximizeBox 1;
  259.   WSTabStop 1;
  260.   WSVisible 1;
  261.   Checked "0";
  262.   FDXFieldName "checkbox_1_data";
  263.   FDXFieldType "WULong";
  264.   Text "Execute-write-copy";
  265.   ResID 112;
  266.   DesignName checkExecute_writecopy;
  267.   TabIndex 11;
  268.   DesignRect 10,85,85,10;
  269.  @end;
  270.  
  271.  @begin Object "WCheckBox"
  272.   WBSAutoCheckBox 1;
  273.   WCCSTop 1;
  274.   WCCSNoMoveY 1;
  275.   WCCSBottom 1;
  276.   WSChild 1;
  277.   WSMaximizeBox 1;
  278.   WSTabStop 1;
  279.   WSVisible 1;
  280.   Checked "0";
  281.   FDXFieldName "checkbox_1_data";
  282.   FDXFieldType "WULong";
  283.   Text "Execute-read-write";
  284.   ResID 113;
  285.   DesignName checkExecute_readwrite;
  286.   TabIndex 12;
  287.   DesignRect 10,75,85,10;
  288.  @end;
  289.  
  290.  @begin Object "WCheckBox"
  291.   WBSAutoCheckBox 1;
  292.   WCCSTop 1;
  293.   WCCSNoMoveY 1;
  294.   WCCSBottom 1;
  295.   WSChild 1;
  296.   WSMaximizeBox 1;
  297.   WSTabStop 1;
  298.   WSVisible 1;
  299.   Checked "0";
  300.   FDXFieldName "checkbox_1_data";
  301.   FDXFieldType "WULong";
  302.   Text "Execute-read";
  303.   ResID 114;
  304.   DesignName checkExecute_read;
  305.   TabIndex 13;
  306.   DesignRect 10,65,60,10;
  307.  @end;
  308.  
  309.  @begin Object "WCheckBox"
  310.   WBSAutoCheckBox 1;
  311.   WCCSTop 1;
  312.   WCCSNoMoveY 1;
  313.   WCCSBottom 1;
  314.   WSChild 1;
  315.   WSMaximizeBox 1;
  316.   WSTabStop 1;
  317.   WSVisible 1;
  318.   Checked "0";
  319.   FDXFieldName "checkbox_1_data";
  320.   FDXFieldType "WULong";
  321.   Text "Execute";
  322.   ResID 115;
  323.   DesignName checkExecute;
  324.   TabIndex 14;
  325.   DesignRect 10,55,60,10;
  326.  @end;
  327.  
  328.  @begin Object "WCheckBox"
  329.   WBSAutoCheckBox 1;
  330.   WCCSTop 1;
  331.   WCCSNoMoveY 1;
  332.   WCCSBottom 1;
  333.   WSChild 1;
  334.   WSMaximizeBox 1;
  335.   WSTabStop 1;
  336.   WSVisible 1;
  337.   Checked "0";
  338.   FDXFieldName "checkbox_1_data";
  339.   FDXFieldType "WULong";
  340.   Text "Write-copy";
  341.   ResID 116;
  342.   DesignName checkWritecopy;
  343.   TabIndex 15;
  344.   DesignRect 10,45,60,10;
  345.  @end;
  346.  
  347.  @begin Object "WCheckBox"
  348.   WBSAutoCheckBox 1;
  349.   WCCSTop 1;
  350.   WCCSNoMoveY 1;
  351.   WCCSBottom 1;
  352.   WSChild 1;
  353.   WSMaximizeBox 1;
  354.   WSTabStop 1;
  355.   WSVisible 1;
  356.   Checked "0";
  357.   FDXFieldName "checkbox_1_data";
  358.   FDXFieldType "WULong";
  359.   Text "Guard";
  360.   ResID 117;
  361.   DesignName checkGuard;
  362.   TabIndex 16;
  363.   DesignRect 10,95,85,10;
  364.  @end;
  365.  
  366.  @begin Object "WCheckBox"
  367.   WBSAutoCheckBox 1;
  368.   WCCSTop 1;
  369.   WCCSNoMoveY 1;
  370.   WCCSBottom 1;
  371.   WSChild 1;
  372.   WSMaximizeBox 1;
  373.   WSTabStop 1;
  374.   WSVisible 1;
  375.   Checked "0";
  376.   FDXFieldName "checkbox_1_data";
  377.   FDXFieldType "WULong";
  378.   Text "No-cache";
  379.   ResID 118;
  380.   DesignName checkNocache;
  381.   TabIndex 17;
  382.   DesignRect 10,105,85,10;
  383.  @end;
  384.  
  385.  @begin Object "WCheckBox"
  386.   WBSAutoCheckBox 1;
  387.   WCCSTop 1;
  388.   WCCSNoMoveY 1;
  389.   WCCSBottom 1;
  390.   WSChild 1;
  391.   WSMaximizeBox 1;
  392.   WSTabStop 1;
  393.   WSVisible 1;
  394.   Checked "0";
  395.   FDXFieldName "checkbox_1_data";
  396.   FDXFieldType "WULong";
  397.   Text "&System";
  398.   @begin Event "Click"
  399.    GencodeSrcLine 328;
  400.    FunctionName "Options::checkSystem_Click";
  401.   @end;
  402.   ResID 119;
  403.   DesignName checkSystem;
  404.   TabIndex 18;
  405.   DesignRect 115,75,60,10;
  406.  @end;
  407.  
  408.  @begin Object "WCheckBox"
  409.   WBSAutoCheckBox 1;
  410.   WCCSTop 1;
  411.   WCCSNoMoveY 1;
  412.   WCCSBottom 1;
  413.   WSChild 1;
  414.   WSMaximizeBox 1;
  415.   WSTabStop 1;
  416.   WSVisible 1;
  417.   Checked "0";
  418.   FDXFieldName "checkbox_1_data";
  419.   FDXFieldType "WULong";
  420.   Text "Collapse adjacent similar &entries";
  421.   ResID 120;
  422.   DesignName collapse;
  423.   TabIndex 19;
  424.   DesignRect 115,95,115,15;
  425.  @end;
  426.  
  427.  @begin Object "WCommandButton"
  428.   WSChild 1;
  429.   WSMaximizeBox 1;
  430.   WSTabStop 1;
  431.   WSVisible 1;
  432.   Pressed "0";
  433.   Text "OK";
  434.   @begin Event "Click"
  435.    GencodeSrcLine 336;
  436.    FunctionName "Options::ok_Click";
  437.   @end;
  438.   ResID 121;
  439.   DesignName ok;
  440.   TabIndex 20;
  441.   DesignRect 190,10,40,15;
  442.  @end;
  443.  
  444.  @begin Object "WCommandButton"
  445.   WSChild 1;
  446.   WSMaximizeBox 1;
  447.   WSTabStop 1;
  448.   WSVisible 1;
  449.   Cancel "1";
  450.   Pressed "0";
  451.   Text "Cancel";
  452.   @begin Event "Click"
  453.    GencodeSrcLine 362;
  454.    FunctionName "Options::cancel_Click";
  455.   @end;
  456.   ResID 122;
  457.   DesignName cancel;
  458.   TabIndex 21;
  459.   DesignRect 190,30,40,15;
  460.  @end;
  461.  
  462.  @begin HPPPrefixBlock
  463. @begin-code HPPPrefix
  464.  
  465. struct OptionsStruct
  466. {
  467.     WBool    checkFree;
  468.     WBool    checkPrivate;
  469.     WBool    checkCommit;
  470.     WBool    checkReserve;
  471.     WBool    checkMapped;
  472.     WBool    checkImage;
  473.     WBool    checkReadonly;
  474.     WBool    checkReadwrite;
  475.     WBool    checkNoaccess;
  476.     WBool    checkExecute_writecopy;
  477.     WBool    checkExecute_readwrite;
  478.     WBool    checkExecute_read;
  479.     WBool    checkExecute;
  480.     WBool    checkWritecopy;
  481.     WBool    checkGuard;
  482.     WBool    checkNocache;
  483.     WBool    checkSystem;
  484.     WBool    collapse;
  485. };
  486.  
  487. @end-code;
  488.   GencodeSrcLine 10;
  489.  @end;
  490.  
  491.  @begin CPPPrefixBlock
  492. @begin-code CPPPrefix
  493.  
  494. // Code added here will be included at the top of the .CPP file
  495.  
  496. //  Include definitions for resources.
  497. #include "WRes.h"
  498.  
  499. @end-code;
  500.   GencodeSrcLine 10;
  501.  @end;
  502.  
  503.  @begin ClassContentsBlock
  504. @begin-code ClassContents
  505.  
  506.     public:
  507.         // add your public instance data here
  508.     private:
  509.         OptionsStruct   *_options;
  510.         WBool           _okClicked;
  511.         // add your private instance data here
  512.     protected:
  513.         // add your protected instance data here
  514.  
  515. @end-code;
  516.   GencodeSrcLine 106;
  517.  @end;
  518.  
  519. @begin-code GeneratedClassContents
  520.  
  521.         Options();
  522.         ~Options();
  523.  
  524. @end-code;
  525.  
  526. @begin-code Code "Options::Options()"
  527.  
  528. @@CLASSNAME@::@CLASSNAME@()
  529. {
  530.     
  531. }
  532.  
  533. @end-code;
  534.  
  535. @begin-code Code "Options::~Options()"
  536.  
  537. @@CLASSNAME@::~@CLASSNAME@()
  538. {
  539.     
  540. }
  541.  
  542. @end-code;
  543.  
  544. @begin-code Code "Options::Open( OptionsStruct *options )"
  545.  
  546. WBool @CLASSNAME@::Open( OptionsStruct *options )
  547. {
  548.     _options = options;
  549.     _okClicked = FALSE;
  550.     Create( NULL );
  551.     return( _okClicked );
  552. }
  553.  
  554. @end-code;
  555.  
  556. @begin-code Code "Options::Prototype for Open( OptionsStruct *options )"
  557.  
  558.     public:
  559.         WBool Open( OptionsStruct *options );
  560.  
  561. @end-code;
  562.  
  563. @begin-code Code "Options::Options_Create"
  564.  
  565. WBool @CLASSNAME@::Options_Create(
  566.     WObject *                 source,
  567.     WCreateEventData *        event )
  568. {
  569.     checkFree->SetChecked( _options->checkFree );
  570.     checkPrivate->SetChecked( _options->checkPrivate );
  571.     checkCommit->SetChecked( _options->checkCommit );
  572.     checkReserve->SetChecked( _options->checkReserve );
  573.     checkMapped->SetChecked( _options->checkMapped );
  574.     checkImage->SetChecked( _options->checkImage );
  575.     checkReadonly->SetChecked( _options->checkReadonly );
  576.     checkReadwrite->SetChecked( _options->checkReadwrite );
  577.     checkNoaccess->SetChecked( _options->checkNoaccess );
  578.     checkExecute_writecopy->SetChecked( _options->checkExecute_writecopy );
  579.     checkExecute_readwrite->SetChecked( _options->checkExecute_readwrite );
  580.     checkExecute_read->SetChecked( _options->checkExecute_read );
  581.     checkExecute->SetChecked( _options->checkExecute );
  582.     checkWritecopy->SetChecked( _options->checkWritecopy );
  583.     checkGuard->SetChecked( _options->checkGuard );
  584.     checkNocache->SetChecked( _options->checkNocache );
  585.     checkSystem->SetChecked( _options->checkSystem );
  586.     collapse->SetChecked( _options->collapse );
  587.     
  588.     
  589.     return FALSE;
  590. }
  591.  
  592. @end-code;
  593.  
  594. @begin-code Code "Options::checkSystem_Click"
  595.  
  596. WBool @CLASSNAME@::checkSystem_Click(
  597.     WObject *           source,
  598.     WEventData *        event )
  599. {
  600.     
  601.     
  602.     return FALSE;
  603. }
  604.  
  605. @end-code;
  606.  
  607. @begin-code Code "Options::ok_Click"
  608.  
  609. WBool @CLASSNAME@::ok_Click(
  610.     WObject *           source,
  611.     WEventData *        event )
  612. {
  613.     _options->checkFree = checkFree->GetChecked();
  614.     _options->checkPrivate = checkPrivate->GetChecked();
  615.     _options->checkCommit = checkCommit->GetChecked();
  616.     _options->checkReserve = checkReserve->GetChecked();
  617.     _options->checkMapped = checkMapped->GetChecked();
  618.     _options->checkImage = checkImage->GetChecked();
  619.     _options->checkReadonly = checkReadonly->GetChecked();
  620.     _options->checkReadwrite = checkReadwrite->GetChecked();
  621.     _options->checkNoaccess = checkNoaccess->GetChecked();
  622.     _options->checkExecute_writecopy = checkExecute_writecopy->GetChecked();
  623.     _options->checkExecute_readwrite = checkExecute_readwrite->GetChecked();
  624.     _options->checkExecute_read = checkExecute_read->GetChecked();
  625.     _options->checkExecute = checkExecute->GetChecked();
  626.     _options->checkWritecopy = checkWritecopy->GetChecked();
  627.     _options->checkGuard = checkGuard->GetChecked();
  628.     _options->checkNocache = checkNocache->GetChecked();
  629.     _options->checkSystem = checkSystem->GetChecked();
  630.     _options->collapse = collapse->GetChecked();
  631.     _okClicked = TRUE;
  632.     Dismiss( TRUE );
  633.     return FALSE;
  634. }
  635.  
  636. @end-code;
  637.  
  638. @begin-code Code "Options::cancel_Click"
  639.  
  640. WBool @CLASSNAME@::cancel_Click(
  641.     WObject *           source,
  642.     WEventData *        event )
  643. {
  644.     Dismiss( TRUE );
  645.     
  646.     return FALSE;
  647. }
  648.  
  649. @end-code;
  650. @end;
  651.