"Address" spelling

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2143 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2011-11-15 19:06:36 +00:00
parent 653b385d69
commit 03b5e24fc4

View File

@ -32,7 +32,7 @@ Type
TInProcessTransport = class(TBaseTransport,ITransport)
Private
FAdress: string;
FAddress: string;
FContentType: string;
FFormat : string;
Public
@ -40,7 +40,7 @@ Type
procedure SendAndReceive(ARequest,AResponse:TStream); override;
Published
property ContentType : string Read FContentType Write FContentType;
property Adress : string Read FAdress Write FAdress;
property Address : string Read FAddress Write FAddress;
property Format : string read FFormat write FFormat;
End;
{$M+}
@ -64,7 +64,7 @@ Var
i : Int64;
{$ENDIF WST_DBG}
begin
bffr := TRequestBuffer.Create(Adress,ContentType,ARequest,AResponse,Format);
bffr := TRequestBuffer.Create(Address,ContentType,ARequest,AResponse,Format);
HandleServiceRequest(bffr);
{$IFDEF WST_DBG}
i := AResponse.Position;