Skip to content

Commit

Permalink
Code improvements samples console lazarus
Browse files Browse the repository at this point in the history
  • Loading branch information
@viniciussanchez
viniciussanchez committed Jul 5, 2022
1 parent 7f60c52 commit 0f20f4f
Show file tree
Hide file tree
Showing 2 changed files with 168 additions and 14 deletions.
2 changes: 1 addition & 1 deletion samples/lazarus/console/Console.lpr
View file
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@

procedure GetPing(Req: THorseRequest; Res: THorseResponse; Next: TNextProc);
begin
Res.AddHeader('Teste', 'Alexandre').Send('Ping');
Res.Send('Ping');
end;

begin
Expand Down
180 changes: 167 additions & 13 deletions samples/lazarus/console/Console.lps
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,13 +4,13 @@
<PathDelim Value="\"/>
<Version Value="12"/>
<BuildModes Active="Default"/>
<Units Count="27">
<Units Count="32">
<Unit0>
<Filename Value="Console.lpr"/>
<IsPartOfProject Value="True"/>
<IsVisibleTab Value="True"/>
<CursorPos X="36" Y="18"/>
<UsageCount Value="56"/>
<CursorPos X="34" Y="11"/>
<UsageCount Value="57"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
Expand Down Expand Up @@ -180,14 +180,15 @@
</Unit24>
<Unit25>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="346"/>
<CursorPos X="38" Y="370"/>
<EditorIndex Value="1"/>
<TopLine Value="85"/>
<CursorPos X="5" Y="87"/>
<UsageCount Value="10"/>
<Bookmarks Count="2">
<Item0 X="91" Y="58" ID="2"/>
<Item1 X="3" Y="287" ID="1"/>
<Item0 Y="447" ID="1"/>
<Item1 X="20" Y="51" ID="2"/>
</Bookmarks>
<Loaded Value="True"/>
</Unit25>
<Unit26>
<Filename Value="..\..\..\src\Horse.Response.pas"/>
Expand All @@ -196,16 +197,169 @@
<CursorPos X="3" Y="21"/>
<UsageCount Value="10"/>
</Unit26>
<Unit27>
<Filename Value="..\..\..\src\Horse.Callback.pas"/>
<EditorIndex Value="6"/>
<TopLine Value="4"/>
<CursorPos X="30" Y="22"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit27>
<Unit28>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<EditorIndex Value="2"/>
<TopLine Value="36"/>
<CursorPos X="5" Y="38"/>
<UsageCount Value="10"/>
<Bookmarks Count="2">
<Item0 X="93" Y="226" ID="3"/>
<Item1 X="93" Y="233" ID="4"/>
</Bookmarks>
<Loaded Value="True"/>
</Unit28>
<Unit29>
<Filename Value="..\..\..\src\Horse.Core.Route.Contract.pas"/>
<EditorIndex Value="5"/>
<TopLine Value="4"/>
<CursorPos X="5" Y="24"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit29>
<Unit30>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<EditorIndex Value="3"/>
<TopLine Value="39"/>
<CursorPos X="5" Y="41"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit30>
<Unit31>
<Filename Value="..\..\..\src\Horse.Core.Group.Contract.pas"/>
<EditorIndex Value="4"/>
<TopLine Value="10"/>
<CursorPos X="5" Y="29"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit31>
</Units>
<JumpHistory Count="2" HistoryIndex="1">
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="Console.lpr"/>
<Caret Line="12" Column="11"/>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="85" Column="86" TopLine="62"/>
</Position1>
<Position2>
<Filename Value="Console.lpr"/>
<Caret Line="13" Column="18"/>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="458" Column="25" TopLine="438"/>
</Position2>
<Position3>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="85" Column="20" TopLine="72"/>
</Position3>
<Position4>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="458" Column="3" TopLine="439"/>
</Position4>
<Position5>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="53" Column="20" TopLine="40"/>
</Position5>
<Position6>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
</Position6>
<Position7>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="53" Column="78" TopLine="28"/>
</Position7>
<Position8>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="442" TopLine="429"/>
</Position8>
<Position9>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="55" TopLine="34"/>
</Position9>
<Position10>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="51" Column="20" TopLine="34"/>
</Position10>
<Position11>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="455" Column="13" TopLine="422"/>
</Position11>
<Position12>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="228" Column="30" TopLine="213"/>
</Position12>
<Position13>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="455" Column="13" TopLine="422"/>
</Position13>
<Position14>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="87" Column="26" TopLine="75"/>
</Position14>
<Position15>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="228" Column="31" TopLine="213"/>
</Position15>
<Position16>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="18" Column="64" TopLine="3"/>
</Position16>
<Position17>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="38" Column="18" TopLine="15"/>
</Position17>
<Position18>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
</Position18>
<Position19>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="38" Column="78" TopLine="13"/>
</Position19>
<Position20>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="226" Column="29" TopLine="201"/>
</Position20>
<Position21>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="36" Column="78" TopLine="24"/>
</Position21>
<Position22>
<Filename Value="..\..\..\src\Horse.Core.Route.pas"/>
<Caret Line="232" Column="9" TopLine="211"/>
</Position22>
<Position23>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<Caret Line="102" Column="31" TopLine="87"/>
</Position23>
<Position24>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<Caret Line="41" Column="97" TopLine="26"/>
</Position24>
<Position25>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
</Position25>
<Position26>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<Caret Line="41" Column="97" TopLine="16"/>
</Position26>
<Position27>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<Caret Line="103" Column="29" TopLine="84"/>
</Position27>
<Position28>
<Filename Value="..\..\..\src\Horse.Core.Group.pas"/>
<Caret Line="20" Column="54" TopLine="3"/>
</Position28>
<Position29>
<Filename Value="..\..\..\src\Horse.Core.Group.Contract.pas"/>
<Caret Line="29" Column="109" TopLine="10"/>
</Position29>
<Position30>
<Filename Value="..\..\..\src\Horse.Core.pas"/>
<Caret Line="280" Column="79" TopLine="258"/>
</Position30>
</JumpHistory>
<RunParams>
<FormatVersion Value="2"/>
Expand Down

0 comments on commit 0f20f4f

Please sign in to comment.