【delphi开源代码栏目提醒】:网学会员delphi开源代码为您提供InextXCenterModule.pas参考,解决您在InextXCenterModule.pas学习中工作中的难题,参考学习。
{ InternetExpress sample WebModule
This site provides examples and information that help
browsers understand the makeup of InternetExpress.
Each page component is a TINetXCenterProducer component.
This producer component was developed specifically for
this application. The InetXCenterComponent.bpl package
must be installed to display the web module designer.
Information about InternetExpress components is stored
in a local ClientDataSet generated file. See
ComponentsInfoDS.FileName. This file is edited with the
ComponentsInfoEditor sample application.
You may see warning messages when viewing a Producer
component in the Web Page property editor. For example,
'XMLBroker: XMLBrokerAllCustomers is not connected'. This
indicates that the XMLBrokerAllCustomers.Connected property
is False. This is not an indication of a problem. In some
cases the design time appearance of a page will be different
when the component is connnected. For example, if the page
contains a TFieldSelectList component that is populated using
data retrieved through the connection, the list will not be
populated unless connected = True.
}
unit InextXCenterModule;
interface
uses
Windows, Messages, SysUtils, Classes, HTTPApp, MidItems, Db, DBClient,
MConnect, XMLBrokr, CompProd, PagItems, MidProd, LinkFlds, SortFlds,
RowSetStatus, ShowXML, FieldAttr, ImgButtons, INetXCenterProd, CustLayout,
QueryComps, WebCombo, ReconcileProd, ReadFileClientDataSet, WebComp,
HTTPProd;
type
TWebModule2 = class(TWebModule)
Home: TInetXCenterProducer;
XMLBrokerAllCustomers: TXMLBroker;
DCOMConnection1: TDCOMConnection;
CustomComponentGrid: TInetXCenterProducer;
DataForm1: TDataForm;
DataNavigator1: TDataNavigator;
DataGrid1: TDataGrid;
StatusColumn1: TStatusColumn;
LinkColumn1: TLinkColumn;
FirstButton1: TFirstButton;
PriorPageButton1: TPriorPageButton;
PriorButton1: TPriorButton;
NextButton1: TNextButton;
NextPageButton1: TNextPageButton;
LastButton1: TLastButton;
UndoButton1: TUndoButton;
PostButton1: TPostButton;
ApplyUpdatesButton1: TApplyUpdatesButton;
CustOrders: TInetXCenterProducer;
DataForm2: TDataForm;
FieldGroup1: TFieldGroup;
XMLBrokerCustOrders: TXMLBroker;
DataNavigator2: TDataNavigator;
OrderNo: TFieldText;
CustNo2: TFieldText;
ItemsTotal: TFieldText;
AmountPaid: TFieldText;
FieldStatus1: TFieldStatus;
SortCustNo: TSortTextColumn;
SortCompany: TSortTextColumn;
SortLastInvoiceDate: TSortTextColumn;
FieldGroup2: TFieldGroup;
RowSetStatus1: TRowSetStatus;
FieldGroup3: TFieldGroup;
RowSetStatus2: TRowSetStatus;
LayoutGroup2: TLayoutGroup;
FirstButton2: TFirstButton;
PriorPageButton2: TPriorPageButton;
PriorButton2: TPriorButton;
NextButton2: TNextButton;
NextPageButton2: TNextPageButton;
LastButton2: TLastButton;
InsertButton1: TInsertButton;
DeleteButton1: TDeleteButton;
UndoButton2: TUndoButton;
PostButton2: TPostButton;
ApplyUpdatesButton2: TApplyUpdatesButton;
ShowXMLButton1: TShowXMLButton;
LayoutGroup4: TLayoutGroup;
LayoutGroup1: TLayoutGroup;
ShowDeltaButton1: TShowDeltaButton;
CountriesRadioGroup: TInetXCenterProducer;
DataForm3: TDataForm;
FieldGroup4: TFieldGroup;
DataNavigator3: TDataNavigator;
XMLBrokerAllCountries: TXMLBroker;
Name: TFieldText;
Capital: TFieldText;
Area: TFieldText;
Population: TFieldText;
FieldStatus2: TFieldStatus;
ContinentRadioGroup: TFieldRadioGroup;
CountriesSelectOptions: TInetXCenterProducer;
DataForm4: TDataForm;
FieldGroup5: TFieldGroup;
FieldText1: TFieldText;
FieldText2: TFieldText;
FieldText3: TFieldText;
FieldText4: TFieldText;
FieldStatus3: TFieldStatus;
DataNavigator4: TDataNavigator;
FieldSelectOptions: TFieldSelectOptions;
FieldAttr: TInetXCenterProducer;
DataForm5: TDataForm;
DataNavigator5: TDataNavigator;
DataGrid2: TDataGrid;
SubmitFieldAttr: TQueryForm;
FirstButton3: TFirstButton;
PriorPageButton3: TPriorPageButton;
PriorButton3: TPriorButton;
NextButton3: TNextButton;
NextPageButton3: TNextPageButton;
LastButton3: TLastButton;
QueryFieldGroup3: TQueryFieldGroup;
QueryMinValue: TQueryText;
QueryMaxValue: TQueryText;
QueryDecimals: TQueryText;
QueryFixedDecimals: TQueryText;
PostButton3: TPostButton;
UndoButton3: TUndoButton;
QueryButtons1: TQueryButtons;
QueryCurrencySymbol: TQueryText;
ImgButtons: TInetXCenterProducer;
DataForm6: TDataForm;
FieldGroup6: TFieldGroup;
Name3: TFieldText;
Capital2: TFieldText;
Continent: TFieldText;
Area2: TFieldText;
Population2: TFieldText;
FieldStatus4: TFieldStatus;
ImgDataNavigator1: TImgDataNavigator;
ImgFirstButton1: TImgFirstButton;
ImgPriorPageButton1: TImgPriorPageButton;
ImgPriorButton1: TImgPriorButton;
ImgNextButton1: TImgNextButton;
ImgNextPageButton1: TImgNextPageButton;
ImgLastButton1: TImgLastButton;
ImgInsertButton1: TImgInsertButton;
ImgDeleteButton1: TImgDeleteButton;
ImgUndoButton1: TImgUndoButton;
ImgPostButton1: TImgPostButton;
ImgApplyUpdatesButton1: TImgApplyUpdatesButton;
ComponentsFilter: TInetXCenterProducer;
Examples: TInetXCenterProducer;
LayoutGroup3: TLayoutGroup;
TitleLayoutGroup1: TTitleLayoutGroup;
SelectOptionsPage: TInetXCenterProducer;
SelectOptionsQueryForm: TQueryForm;
QueryFieldGroup2: TQueryFieldGroup;
QuerySelectOptions: TQuerySelectOptions;
QueryButtons2: TQueryButtons;
SearchSelectOptionsPage: TInetXCenterProducer;
SearchSelectOptionsQueryForm: TQueryForm;
QueryFieldGroup1: TQueryFieldGroup;
QuerySearchSelectOptions: TQuerySearchSelectOptions;
QueryButtons3: TQueryButtons;
PromptButtonPage: TInetXCenterProducer;
QueryForm3: TQueryForm;
QueryButtons4: TQueryButtons;
PromptQueryButton1: TPromptQueryButton;
QueryPasswordPage: TInetXCenterProducer;
QueryForm1: TQueryForm;
QueryFieldGroup4: TQueryFieldGroup;
QueryPassword: TQueryPassword;
QueryButtons5: TQueryButtons;
DumpRequest: TInetXCenterProducer;
CustNamesDS: TClientDataSet;
QueryForm2: TQueryForm;
QueryRadioGroupPackageFilter: TQueryRadioGroup;
QueryRadioGroupUsageFilter: TQueryRadioGroup;
SubmitQueryButton1: TSubmitQueryButton;
QueryFieldGroup8: TQueryFieldGroup;
QueryFieldGroup9: TQueryFieldGroup;
QueryButtons9: TQueryButtons;
LayoutGroup5: TLayoutGroup;
LayoutGroup6: TLayoutGroup;
ComponentsList: TInetXCenterProducer;
CloseFilter: TSubmitValueButton;
CustOrdersQuery: TInetXCenterProducer;
QueryForm4: TQueryForm;
QueryFieldGroup5: TQueryFieldGroup;
QuerySelectOptions1: TQuerySelectOptio
上一篇:
InetXPageU.pas
下一篇:
法律专业开题报告范文