io Programmo 10/ioProg_10.iso/soft/optima/samples.z/Textt.wxf

Text File | 1996-06-10 | 5.1 KB | 212 lines

Save Format v1.3
@begin Form "WinTextFileTips"
 Exported 0;

 @begin Object "WDialog"
  WSCaption 1;
  WSSizeable 1;
  WSDlgBorder 1;
  WSSysMenu 1;
  WSSystemMenu 1;
  WSMinimizeBox 1;
  WSMaximizeBox 1;
  WSGroup 1;
  WSTabStop 1;
  WSResizeBorder 1;
  WSVisible 1;
  FormPositionType "Centered";
  FormAbsTop "104";
  FormAbsLeft "12";
  FDXStructName "WinTextFileFDXStruct";
  Font "8.MS Sans Serif";
  Text "Using the Intersolv Text File ODBC Driver";
  @begin Event "Create"
   GencodeSrcLine 170;
   FunctionName "WinTextFileTips::WinTextFileTips_Create";
  @end;
  @begin UserFunction "WinTextFileTips()"
   Compiler 1;
   GencodeSrcLine 184;
   FunctionName "WinTextFileTips::WinTextFileTips()";
  @end;
  @begin UserFunction "~WinTextFileTips()"
   Compiler 1;
   GencodeSrcLine 188;
   FunctionName "WinTextFileTips::~WinTextFileTips()";
  @end;
  ResID 107;
  DesignName WinTextFileTips;
  TabIndex 0;
  DesignRect 8,103,260,265;
 @end;

 @begin Object "WTextBox"
  WTextBoxMultiLine 1;
  WTextBoxAutoHScroll 1;
  WTextBoxReadOnly 1;
  WCCSNoResize 1;
  WSHScroll 1;
  WSVScroll 1;
  WSBorder 1;
  WSChild 1;
  WSMinimizeBox 1;
  WSGroup 1;
  WSExClientEdge 1;
  WSVisible 1;
  FDXFieldName "textb_1_data";
  FDXFieldType "WString";
  ResID 101;
  DesignName textb_1;
  TabIndex 0;
  DesignRect 5,5,240,219;
 @end;

 @begin Object "WCommandButton"
  WSChild 1;
  WSMaximizeBox 1;
  WSTabStop 1;
  WSVisible 1;
  Pressed "0";
  FDXFieldName "cb_1_data";
  FDXFieldType "WBool";
  Text "&Help";
  @begin Event "Click"
   GencodeSrcLine 192;
   FunctionName "WinTextFileTips::cb_TextTips_help_Click";
  @end;
  ResID 102;
  DesignName cb_TextTips_help;
  TabIndex 1;
  DesignRect 200,229,45,14;
 @end;

 @begin HPPPrefixBlock
@begin-code HPPPrefix

// Declarations added here will be included at the top of the .HPP file

@end-code;
  GencodeSrcLine 10;
 @end;

 @begin CPPPrefixBlock
@begin-code CPPPrefix

// Code added here will be included at the top of the .CPP file

//  Include definitions for resources.
#include "WRes.h"

#include "applic.hpp"

static WChar *Tips[]={
    "- This example uses the Intersolv 'OEM 2.12 32-Bit Text (*.*)'",
    "  ODBC driver. This driver can be used with text files",
    "  in a variety of formats (comma delimited, fixed, etc). The file",
    "  in this example is delimited with '#' characters.",
    "",
    "- The Intersolv Text File driver does not support bound updates.",
    "  That's the reason why the rows appear as read-only.",
    "  You must execute Insert and Update statements to change",
    "  data in tables.",
    "",
    "- Enter the name of the text file for the name of the table in",
    "  the SQL statement. The directory the Intersolv driver uses",
    "  to find the file is specified by the setting of the 'database'",
    "  option in the ODBC Administrator. Alternatively, set the 'database'",
    "  connection parameter in the transaction object to the directory",
    "  containing the text file named in the SQL query.",
    "",
    "- You cannot specify the filename of the text file in the 'database'",
    "  setting of the ODBC Administrator or the connection parameter",
    "  of the transaction object. The text file is specified as",
    "  the table name in the SQL statement.",
    "",
    "- All columns will display in the text box as strings rather than its",
    "  native type since text box can only display strings.",
    "",
    "- The Intersolv Excel driver does not contain enough ODBC 2.0 support",
    "  to enable the Optima++ SQL query editor to work properly. Queries",
    "  can be entered manually and tested in the properties page of the",
    "  query object.",

    NULL
};


@end-code;
  GencodeSrcLine 10;
 @end;

 @begin ClassContentsBlock
@begin-code ClassContents

    public:
        // add your public instance data here
    private:
        // add your private instance data here
    protected:
        // add your protected instance data here

@end-code;
  GencodeSrcLine 44;
 @end;

@begin-code GeneratedClassContents

        WinTextFileTips();
        ~WinTextFileTips();

@end-code;

@begin-code Code "WinTextFileTips::WinTextFileTips()"

WinTextFileTips::WinTextFileTips()
{

}

@end-code;

@begin-code Code "WinTextFileTips::~WinTextFileTips()"

WinTextFileTips::~WinTextFileTips()
{

}

@end-code;

@begin-code Code "WinTextFileTips::WinTextFileTips_Create"

WBool WinTextFileTips::WinTextFileTips_Create(
    WObject *                 source,
    WCreateEventData *        event )
{
    int                     i;
    WString                 str;

    for( i = 0; Tips[i] != NULL; ++i ) {
        str.Concatf( "%s\r\n", Tips[i] );
    }
    textb_1->SetText( str );

    return FALSE;
}

@end-code;

@begin-code Code "WinTextFileTips::cb_TextTips_help_Click"

WBool WinTextFileTips::cb_TextTips_help_Click(
    WObject *           source,
    WEventData *        event )
{
    Application->InvokeHelp( this, WHelpContents, 0, "wotxt09.hlp", GetHandle() );

    return FALSE;
}

@end-code;
@end;