Skip to content

Commit 097fe1e

Browse files
viniciussanchezviniciussanchez
committed
Horse 3.0 samples
1 parent c20f6a4 commit 097fe1e

File tree

4 files changed

+118
-8
lines changed

4 files changed

+118
-8
lines changed

‎.gitignore‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -62,6 +62,11 @@ __history/
6262
__recovery/
6363
*.~*
6464

65+
# Lazarus
66+
backup/
67+
lib/
68+
*.lps
69+
6570
# Castalia statistics file (since XE7 Castalia is distributed with Delphi)
6671
*.stat
6772

‎samples/delphi/samples.dpr‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@ begin
1313
THorse.Get('/ping',
1414
procedure(Req: THorseRequest; Res: THorseResponse; Next: TProc)
1515
begin
16-
raise EHorseException.Create('My Error!');
16+
raise EHorseException.New.Error('My Error!');
1717
end);
1818

1919
THorse.Listen(9000);

‎samples/delphi/samples.dproj‎

Lines changed: 110 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -207,12 +207,20 @@
207207
<RemoteDir>classes</RemoteDir>
208208
<Operation>1</Operation>
209209
</Platform>
210+
<Platform Name="Android64">
211+
<RemoteDir>classes</RemoteDir>
212+
<Operation>1</Operation>
213+
</Platform>
210214
</DeployClass>
211215
<DeployClass Name="AndroidFileProvider">
212216
<Platform Name="Android">
213217
<RemoteDir>res\xml</RemoteDir>
214218
<Operation>1</Operation>
215219
</Platform>
220+
<Platform Name="Android64">
221+
<RemoteDir>res\xml</RemoteDir>
222+
<Operation>1</Operation>
223+
</Platform>
216224
</DeployClass>
217225
<DeployClass Name="AndroidGDBServer">
218226
<Platform Name="Android">
@@ -225,6 +233,10 @@
225233
<RemoteDir>library\lib\armeabi</RemoteDir>
226234
<Operation>1</Operation>
227235
</Platform>
236+
<Platform Name="Android64">
237+
<RemoteDir>library\lib\armeabi</RemoteDir>
238+
<Operation>1</Operation>
239+
</Platform>
228240
</DeployClass>
229241
<DeployClass Name="AndroidLibnativeArmeabiv7aFile">
230242
<Platform Name="Android64">
@@ -237,12 +249,20 @@
237249
<RemoteDir>library\lib\mips</RemoteDir>
238250
<Operation>1</Operation>
239251
</Platform>
252+
<Platform Name="Android64">
253+
<RemoteDir>library\lib\mips</RemoteDir>
254+
<Operation>1</Operation>
255+
</Platform>
240256
</DeployClass>
241257
<DeployClass Name="AndroidServiceOutput">
242258
<Platform Name="Android">
243259
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
244260
<Operation>1</Operation>
245261
</Platform>
262+
<Platform Name="Android64">
263+
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
264+
<Operation>1</Operation>
265+
</Platform>
246266
</DeployClass>
247267
<DeployClass Name="AndroidServiceOutput_Android32">
248268
<Platform Name="Android64">
@@ -255,120 +275,200 @@
255275
<RemoteDir>res\drawable</RemoteDir>
256276
<Operation>1</Operation>
257277
</Platform>
278+
<Platform Name="Android64">
279+
<RemoteDir>res\drawable</RemoteDir>
280+
<Operation>1</Operation>
281+
</Platform>
258282
</DeployClass>
259283
<DeployClass Name="AndroidSplashStyles">
260284
<Platform Name="Android">
261285
<RemoteDir>res\values</RemoteDir>
262286
<Operation>1</Operation>
263287
</Platform>
288+
<Platform Name="Android64">
289+
<RemoteDir>res\values</RemoteDir>
290+
<Operation>1</Operation>
291+
</Platform>
264292
</DeployClass>
265293
<DeployClass Name="AndroidSplashStylesV21">
266294
<Platform Name="Android">
267295
<RemoteDir>res\values-v21</RemoteDir>
268296
<Operation>1</Operation>
269297
</Platform>
298+
<Platform Name="Android64">
299+
<RemoteDir>res\values-v21</RemoteDir>
300+
<Operation>1</Operation>
301+
</Platform>
270302
</DeployClass>
271303
<DeployClass Name="Android_Colors">
272304
<Platform Name="Android">
273305
<RemoteDir>res\values</RemoteDir>
274306
<Operation>1</Operation>
275307
</Platform>
308+
<Platform Name="Android64">
309+
<RemoteDir>res\values</RemoteDir>
310+
<Operation>1</Operation>
311+
</Platform>
276312
</DeployClass>
277313
<DeployClass Name="Android_DefaultAppIcon">
278314
<Platform Name="Android">
279315
<RemoteDir>res\drawable</RemoteDir>
280316
<Operation>1</Operation>
281317
</Platform>
318+
<Platform Name="Android64">
319+
<RemoteDir>res\drawable</RemoteDir>
320+
<Operation>1</Operation>
321+
</Platform>
282322
</DeployClass>
283323
<DeployClass Name="Android_LauncherIcon144">
284324
<Platform Name="Android">
285325
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
286326
<Operation>1</Operation>
287327
</Platform>
328+
<Platform Name="Android64">
329+
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
330+
<Operation>1</Operation>
331+
</Platform>
288332
</DeployClass>
289333
<DeployClass Name="Android_LauncherIcon36">
290334
<Platform Name="Android">
291335
<RemoteDir>res\drawable-ldpi</RemoteDir>
292336
<Operation>1</Operation>
293337
</Platform>
338+
<Platform Name="Android64">
339+
<RemoteDir>res\drawable-ldpi</RemoteDir>
340+
<Operation>1</Operation>
341+
</Platform>
294342
</DeployClass>
295343
<DeployClass Name="Android_LauncherIcon48">
296344
<Platform Name="Android">
297345
<RemoteDir>res\drawable-mdpi</RemoteDir>
298346
<Operation>1</Operation>
299347
</Platform>
348+
<Platform Name="Android64">
349+
<RemoteDir>res\drawable-mdpi</RemoteDir>
350+
<Operation>1</Operation>
351+
</Platform>
300352
</DeployClass>
301353
<DeployClass Name="Android_LauncherIcon72">
302354
<Platform Name="Android">
303355
<RemoteDir>res\drawable-hdpi</RemoteDir>
304356
<Operation>1</Operation>
305357
</Platform>
358+
<Platform Name="Android64">
359+
<RemoteDir>res\drawable-hdpi</RemoteDir>
360+
<Operation>1</Operation>
361+
</Platform>
306362
</DeployClass>
307363
<DeployClass Name="Android_LauncherIcon96">
308364
<Platform Name="Android">
309365
<RemoteDir>res\drawable-xhdpi</RemoteDir>
310366
<Operation>1</Operation>
311367
</Platform>
368+
<Platform Name="Android64">
369+
<RemoteDir>res\drawable-xhdpi</RemoteDir>
370+
<Operation>1</Operation>
371+
</Platform>
312372
</DeployClass>
313373
<DeployClass Name="Android_NotificationIcon24">
314374
<Platform Name="Android">
315375
<RemoteDir>res\drawable-mdpi</RemoteDir>
316376
<Operation>1</Operation>
317377
</Platform>
378+
<Platform Name="Android64">
379+
<RemoteDir>res\drawable-mdpi</RemoteDir>
380+
<Operation>1</Operation>
381+
</Platform>
318382
</DeployClass>
319383
<DeployClass Name="Android_NotificationIcon36">
320384
<Platform Name="Android">
321385
<RemoteDir>res\drawable-hdpi</RemoteDir>
322386
<Operation>1</Operation>
323387
</Platform>
388+
<Platform Name="Android64">
389+
<RemoteDir>res\drawable-hdpi</RemoteDir>
390+
<Operation>1</Operation>
391+
</Platform>
324392
</DeployClass>
325393
<DeployClass Name="Android_NotificationIcon48">
326394
<Platform Name="Android">
327395
<RemoteDir>res\drawable-xhdpi</RemoteDir>
328396
<Operation>1</Operation>
329397
</Platform>
398+
<Platform Name="Android64">
399+
<RemoteDir>res\drawable-xhdpi</RemoteDir>
400+
<Operation>1</Operation>
401+
</Platform>
330402
</DeployClass>
331403
<DeployClass Name="Android_NotificationIcon72">
332404
<Platform Name="Android">
333405
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
334406
<Operation>1</Operation>
335407
</Platform>
408+
<Platform Name="Android64">
409+
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
410+
<Operation>1</Operation>
411+
</Platform>
336412
</DeployClass>
337413
<DeployClass Name="Android_NotificationIcon96">
338414
<Platform Name="Android">
339415
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
340416
<Operation>1</Operation>
341417
</Platform>
418+
<Platform Name="Android64">
419+
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
420+
<Operation>1</Operation>
421+
</Platform>
342422
</DeployClass>
343423
<DeployClass Name="Android_SplashImage426">
344424
<Platform Name="Android">
345425
<RemoteDir>res\drawable-small</RemoteDir>
346426
<Operation>1</Operation>
347427
</Platform>
428+
<Platform Name="Android64">
429+
<RemoteDir>res\drawable-small</RemoteDir>
430+
<Operation>1</Operation>
431+
</Platform>
348432
</DeployClass>
349433
<DeployClass Name="Android_SplashImage470">
350434
<Platform Name="Android">
351435
<RemoteDir>res\drawable-normal</RemoteDir>
352436
<Operation>1</Operation>
353437
</Platform>
438+
<Platform Name="Android64">
439+
<RemoteDir>res\drawable-normal</RemoteDir>
440+
<Operation>1</Operation>
441+
</Platform>
354442
</DeployClass>
355443
<DeployClass Name="Android_SplashImage640">
356444
<Platform Name="Android">
357445
<RemoteDir>res\drawable-large</RemoteDir>
358446
<Operation>1</Operation>
359447
</Platform>
448+
<Platform Name="Android64">
449+
<RemoteDir>res\drawable-large</RemoteDir>
450+
<Operation>1</Operation>
451+
</Platform>
360452
</DeployClass>
361453
<DeployClass Name="Android_SplashImage960">
362454
<Platform Name="Android">
363455
<RemoteDir>res\drawable-xlarge</RemoteDir>
364456
<Operation>1</Operation>
365457
</Platform>
458+
<Platform Name="Android64">
459+
<RemoteDir>res\drawable-xlarge</RemoteDir>
460+
<Operation>1</Operation>
461+
</Platform>
366462
</DeployClass>
367463
<DeployClass Name="Android_Strings">
368464
<Platform Name="Android">
369465
<RemoteDir>res\values</RemoteDir>
370466
<Operation>1</Operation>
371467
</Platform>
468+
<Platform Name="Android64">
469+
<RemoteDir>res\values</RemoteDir>
470+
<Operation>1</Operation>
471+
</Platform>
372472
</DeployClass>
373473
<DeployClass Name="DebugSymbols">
374474
<Platform Name="iOSSimulator">
@@ -438,6 +538,9 @@
438538
<Platform Name="Android">
439539
<Operation>0</Operation>
440540
</Platform>
541+
<Platform Name="Android64">
542+
<Operation>0</Operation>
543+
</Platform>
441544
<Platform Name="iOSDevice32">
442545
<Operation>0</Operation>
443546
</Platform>
@@ -725,6 +828,9 @@
725828
<Platform Name="Android">
726829
<Operation>1</Operation>
727830
</Platform>
831+
<Platform Name="Android64">
832+
<Operation>1</Operation>
833+
</Platform>
728834
</DeployClass>
729835
<DeployClass Name="ProjectiOSDeviceDebug">
730836
<Platform Name="iOSDevice32">
@@ -768,6 +874,10 @@
768874
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
769875
<Operation>1</Operation>
770876
</Platform>
877+
<Platform Name="Android64">
878+
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
879+
<Operation>1</Operation>
880+
</Platform>
771881
<Platform Name="iOSDevice32">
772882
<Operation>1</Operation>
773883
</Platform>

‎samples/lazarus/Console.lpr‎

Lines changed: 2 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -13,12 +13,7 @@
1313

1414
procedure GetPing(Req: THorseRequest; Res: THorseResponse; Next: TNextProc);
1515
begin
16-
raise EHorseException.Create('My Error');
17-
end;
18-
19-
procedure OnListen(Horse: THorse);
20-
begin
21-
Writeln(Format('Server is runing on %s:%d', [Horse.Host, Horse.Port]));
16+
raise EHorseException.New.Error('My Error!');
2217
end;
2318

2419
begin
@@ -28,5 +23,5 @@ procedure OnListen(Horse: THorse);
2823

2924
THorse.Get('/ping', GetPing);
3025

31-
THorse.Listen(9000, OnListen);
26+
THorse.Listen(9000);
3227
end.

0 commit comments

Comments
 (0)