forked from zamronypj/fano
/
HttpHeadFactoryImpl.pas
65 lines (55 loc) · 2.03 KB
/
HttpHeadFactoryImpl.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
{*!
* Fano Web Framework (https://fanoframework.github.io)
*
* @link https://github.com/fanoframework/fano
* @copyright Copyright (c) 2018 Zamrony P. Juhara
* @license https://github.com/fanoframework/fano/blob/master/LICENSE (MIT)
*}
unit HttpHeadFactoryImpl;
interface
{$MODE OBJFPC}
uses
DependencyIntf,
DependencyContainerIntf,
HttpAbstractFactoryImpl;
type
(*!------------------------------------------------
* THttpHead factory class
*------------------------------------------------
* This class can serve as factory class for THttpHead
* and also can be injected into dependency container
* directly to build THttpHead class
*-------------------------------------------------
* @author Zamrony P. Juhara <zamronypj@yahoo.com>
*-----------------------------------------------*)
THttpHeadFactory = class(THttpAbstractFactory)
public
(*!---------------------------------------------------
* build class instance
*----------------------------------------------------
* @param container dependency container instance
*----------------------------------------------------
* This is implementation of IDependencyFactory
*---------------------------------------------------*)
function build(const container : IDependencyContainer) : IDependency; override;
end;
implementation
uses
classes,
HttpHeadImpl,
HttpClientHeadersImpl,
ResponseStreamImpl;
(*!---------------------------------------------------
* build class instance
*----------------------------------------------------
* @param container dependency container instance
*---------------------------------------------------*)
function THttpHeadFactory.build(const container : IDependencyContainer) : IDependency;
begin
result := THttpHead.create(
handle,
THttpClientHeaders.create(handle),
TResponseStream.create(TStringStream.create(''))
);
end;
end.