Added template support to BasicAuth command
This commit is contained in:
parent
7cc7705b29
commit
282ae6fa28
|
@ -353,6 +353,10 @@ var
|
||||||
separator: Char;
|
separator: Char;
|
||||||
i: Integer;
|
i: Integer;
|
||||||
begin
|
begin
|
||||||
|
FParser.Content := AData;
|
||||||
|
FParser.Replace;
|
||||||
|
AData := FParser.Content;
|
||||||
|
|
||||||
separator := AData[1];
|
separator := AData[1];
|
||||||
i := 2;
|
i := 2;
|
||||||
while (i < Length(AData)) and (AData[i] <> separator) do
|
while (i < Length(AData)) and (AData[i] <> separator) do
|
||||||
|
|
Loading…
Reference in New Issue