fpc/packages/fcl-web/examples/webdata/demo4/wmxmlusers.pp
michael 86a5871ba4 * Lazarus is no longer needed for the examples
git-svn-id: trunk@17740 -
2011-06-13 12:57:32 +00:00

35 lines
617 B
ObjectPascal

unit wmxmlusers;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, HTTPDefs, websession, fpHTTP, fpWeb,
fpwebdata, extjsxml;
type
{ TFPWebProviderDataModule2 }
TFPWebProviderDataModule2 = class(TFPWebProviderDataModule)
ExtJSXMLDataFormatter1: TExtJSXMLDataFormatter;
ExtJSXMLWebdataInputAdaptor1: TExtJSXMLWebdataInputAdaptor;
private
{ private declarations }
public
{ public declarations }
end;
var
FPWebProviderDataModule2: TFPWebProviderDataModule2;
implementation
{$R *.lfm}
initialization
RegisterHTTPModule('XMLProvider', TFPWebProviderDataModule2);
end.